module wem_dsrext_mod
  implicit none

contains

  integer function dsr_ssf() result(stat)
  end function
end module 
