! source file: /raid23/csomes/UVic/2.9/c_n_isotopes/last_glacial_experiments/dlghotnfe25/updates/setsed.F
      subroutine setsed (is, ie, js, je)

      return
      end
