subroutine wrt_sta_empty
      return
      end