subroutine zoombc_3D_empty() return end