! source file: /Users/jfidler/work/UVic_ESCM/2.9/source/sed/sedio.F
       subroutine sedout (is, ie, js, je)

      return
      end
