INTERFACE
subroutine mwave_obsop_tl (kstart, kend, kproma, klev, kmaxchannels,&
 & yd_mwave_phys_fw, yd_mwave_phys_tl, yd_mwave_rad) 
use parkind1, only: jpim, jprb
use yommwave, only: mwave_phys_type, mwave_rad_type, mwave_id, mwave_ok,&
 & n_satsens,&
 & ldmwave_test, mwave_ok_a1, rlimit_obs_err,&
 & ldmwave_land 
integer (kind=jpim), intent (in) :: kstart, kend, kproma, klev, kmaxchannels
type (mwave_phys_type), intent (inout) :: yd_mwave_phys_fw (kproma), yd_mwave_phys_tl (kproma)
type (mwave_rad_type) , intent (inout) :: yd_mwave_rad (kproma, n_satsens)
end subroutine mwave_obsop_tl
END INTERFACE
