      subroutine zoombc_3Dfast_empty()
      return
      end
