subroutine step3d_fast_empty
      end