subroutine ufo_gnssro_bendmetoffice_mod::ops_gpsro_forwardmodel |
( |
integer, intent(in) |
nlevp, |
|
|
integer, intent(in) |
nlevq, |
|
|
real(kind_real), dimension(1:nlevp), intent(in) |
za, |
|
|
real(kind_real), dimension(1:nlevq), intent(in) |
zb, |
|
|
real(kind_real), dimension(1:nlevp), intent(in) |
pressure, |
|
|
real(kind_real), dimension(1:nlevq), intent(in) |
humidity, |
|
|
logical, intent(in) |
GPSRO_pseudo_ops, |
|
|
logical, intent(in) |
GPSRO_vert_interp_ops, |
|
|
real(kind_real), intent(in) |
GPSRO_min_temp_grad, |
|
|
integer, intent(in) |
nobs, |
|
|
real(kind_real), dimension(1:nobs), intent(in) |
zobs, |
|
|
real(kind_real), intent(in) |
RO_Rad_Curv, |
|
|
real(kind_real), intent(in) |
Latitude, |
|
|
real(kind_real), intent(in) |
RO_geoid_und, |
|
|
real(kind_real), dimension(1:nobs), intent(inout) |
ycalc, |
|
|
logical, intent(out) |
BAErr, |
|
|
real(kind_real), dimension(:), intent(inout), allocatable |
refractivity, |
|
|
real(kind_real), dimension(:), intent(inout), allocatable |
model_heights |
|
) |
| |
|
private |