Functions/Subroutines | |
subroutine, public | gfs_rrtmgp_pre_init (ngases, active_gases, active_gases_array, errmsg, errflg) |
subroutine, public | gfs_rrtmgp_pre_run (me, ncol, nlev, i_o3, doswrad, dolwrad, fhswr, fhlwr, xlat, xlon, prsl, tgrs, prslk, prsi, qgrs, tsfc, coslat, sinlat, con_g, con_rd, con_eps, con_epsm1, con_fvirt, con_epsqs, solhr, raddt, p_lay, t_lay, p_lev, t_lev, vmr_o2, vmr_h2o, vmr_o3, vmr_ch4, vmr_n2o, vmr_co2, tsfg, tsfa, qs_lay, q_lay, tv_lay, relhum, deltaz, deltazc, deltap, active_gases_array, tsfc_radtime, coszen, coszdg, top_at_1, isfc, itoa, nday, idxday, semis, sfc_emiss_byband, ico2, ozphys, con_pi, errmsg, errflg) |
Variables | |
real(kind_phys), parameter | amd = 28.9644_kind_phys |
Molecular weight of dry-air (g/mol) | |
real(kind_phys), parameter | amw = 18.0154_kind_phys |
Molecular weight of water vapor (g/mol) | |
real(kind_phys), parameter | amo3 = 47.9982_kind_phys |
Modelular weight of ozone (g/mol) | |
real(kind_phys), parameter | amdw = amd/amw |
Molecular weight of dry air / water vapor. | |
real(kind_phys), parameter | amdo3 = amd/amo3 |
Molecular weight of dry air / ozone. | |
real(kind_phys), parameter | eps = 1.0e-6_kind_phys |
real(kind_phys), parameter | oneminus = 1.0_kind_phys - eps |
real(kind_phys), parameter | ftiny = 1.0e-12_kind_phys |
integer | istr_h2o |
integer | istr_co2 |
integer | istr_o3 |
integer | istr_n2o |
integer | istr_ch4 |
integer | istr_o2 |
integer | istr_ccl4 |
integer | istr_cfc11 |
integer | istr_cfc12 |
integer | istr_cfc22 |