subroutine zommbc_2D_empty() return end