      subroutine scal0d_oa_out_full_empty
      return
      end subroutine scal0d_oa_out_full_empty
