UFO
|
Fortran module for gnssro bending angle Met Office forward operator. More...
Functions/Subroutines | |
subroutine, public | ops_gpsro_rootsolv_ba (nstate, nlevp, nb, nlevq, Nobs, za, zb, xb, yobs, zobs, Bsig, Bm1, Om1, it, x, yb, ycalc, J_pen, Amat, converged, BAerr, Do1DVar_error, Iter_max, Delta, Delta_ct2, GPSRO_pseudo_ops, GPSRO_vert_interp_ops, GPSRO_min_temp_grad, capsupersat, O_Bdiff, RO_Rad_Curv, Latitude, RO_geoid_und, Tb, Ts, DFS) |
Fortran module for gnssro bending angle Met Office forward operator.
subroutine, public ufo_gnssroonedvarcheck_rootsolv_mod::ops_gpsro_rootsolv_ba | ( | integer, intent(in) | nstate, |
integer, intent(in) | nlevp, | ||
integer, intent(in) | nb, | ||
integer, intent(in) | nlevq, | ||
integer, intent(in) | Nobs, | ||
real(kind_real), dimension(:), intent(in) | za, | ||
real(kind_real), dimension(:), intent(in) | zb, | ||
real(kind_real), dimension(:), intent(in) | xb, | ||
real(kind_real), dimension(:), intent(in) | yobs, | ||
real(kind_real), dimension(:), intent(in) | zobs, | ||
real(kind_real), dimension(:), intent(in) | Bsig, | ||
real(kind_real), dimension(:,:), intent(in) | Bm1, | ||
real(kind_real), dimension(:,:), intent(in) | Om1, | ||
integer, intent(out) | it, | ||
real(kind_real), dimension(:), intent(out) | x, | ||
real(kind_real), dimension(:), intent(out) | yb, | ||
real(kind_real), dimension(:), intent(out) | ycalc, | ||
real(kind_real), intent(out) | J_pen, | ||
real(kind_real), dimension(:,:), intent(out) | Amat, | ||
logical, intent(out) | converged, | ||
logical, intent(out) | BAerr, | ||
logical, intent(out) | Do1DVar_error, | ||
integer, intent(in) | Iter_max, | ||
real(kind_real), intent(in) | Delta, | ||
real(kind_real), intent(in) | Delta_ct2, | ||
logical, intent(in) | GPSRO_pseudo_ops, | ||
logical, intent(in) | GPSRO_vert_interp_ops, | ||
real(kind_real), intent(in) | GPSRO_min_temp_grad, | ||
logical, intent(in) | capsupersat, | ||
real(kind_real), intent(out) | O_Bdiff, | ||
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(nlevq), intent(inout) | Tb, | ||
real(kind_real), dimension(nlevq), intent(inout) | Ts, | ||
real(kind_real), intent(inout) | DFS | ||
) |
Definition at line 25 of file ufo_gnssroonedvarcheck_rootsolv_mod.f90.