      subroutine wrt_surf_empty
      end
