File |
Line number |
Procedure |
Code |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
201 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
212 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
420 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
428 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
436 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
442 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
81 |
AIM_SURF_BC |
_RL oice1(NGP) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
82 |
AIM_SURF_BC |
_RL snow1(NGP) |
./pkg/aim_v23/AIM_CO2.h |
25 |
NO PROCEDURE |
_RL aim_CO2(NGP,MAX_NO_THREADS) |
./pkg/aim_v23/AIM_GRID.h |
17 |
NO PROCEDURE |
_RL fOrogr(NGP,MAX_NO_THREADS) |
./pkg/aim_v23/AIM_GRID.h |
18 |
NO PROCEDURE |
_RL WVSurf(NGP,MAX_NO_THREADS) |
./pkg/aim_v23/AIM_GRID.h |
19 |
NO PROCEDURE |
_RL snLat (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/AIM_GRID.h |
20 |
NO PROCEDURE |
_RL csLat (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/AIM_SIZE.h |
16 |
NO PROCEDURE |
INTEGER NLON, NLAT, NLEV, NGP |
./pkg/aim_v23/AIM_SIZE.h |
17 |
NO PROCEDURE |
PARAMETER ( NLON=sNx, NLAT=sNy, NLEV=Nr, NGP=NLON*NLAT ) |
./pkg/aim_v23/aim_diagnostics.F |
298 |
AIM_DIAGNOSTICS |
DO J=1,NGP |
./pkg/aim_v23/aim_diagnostics.F |
426 |
AIM_DIAGNOSTICS |
DO J=1,NGP |
./pkg/aim_v23/aim_diagnostics.F |
61 |
AIM_DIAGNOSTICS |
_RL tmpVar(NGP) |
./pkg/aim_v23/aim_diagnostics.F |
70 |
AIM_DIAGNOSTICS |
DO J=1,NGP |
./pkg/aim_v23/aim_do_physics.F |
63 |
AIM_DO_PHYSICS |
_RL phi0 (NGP) |
./pkg/aim_v23/aim_dyn2aim.F |
206 |
AIM_DYN2AIM |
DO I2=1,NGP |
./pkg/aim_v23/aim_dyn2aim.F |
54 |
AIM_DYN2AIM |
_RL TA(NGP,NLEV), QA(NGP,NLEV), ThA(NGP,NLEV) |
./pkg/aim_v23/aim_dyn2aim.F |
55 |
AIM_DYN2AIM |
_RL Vsurf2(NGP), PSA(NGP), dpFac(NGP,NLEV) |
./pkg/aim_v23/aim_dyn2aim.F |
56 |
AIM_DYN2AIM |
INTEGER kGrd(NGP) |
./pkg/aim_v23/aim_land_impl.F |
122 |
AIM_LAND_IMPL |
DO J=1,NGP |
./pkg/aim_v23/aim_land_impl.F |
150 |
AIM_LAND_IMPL |
DO J=1,NGP |
./pkg/aim_v23/aim_land_impl.F |
68 |
AIM_LAND_IMPL |
_RL FMASK(NGP), dTskin(NGP) |
./pkg/aim_v23/aim_land_impl.F |
69 |
AIM_LAND_IMPL |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
./pkg/aim_v23/aim_land_impl.F |
70 |
AIM_LAND_IMPL |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
./pkg/aim_v23/aim_land_impl.F |
71 |
AIM_LAND_IMPL |
_RL Tsurf(NGP), SHF(NGP), EVAP(NGP), SLRU(NGP) |
./pkg/aim_v23/aim_land_impl.F |
72 |
AIM_LAND_IMPL |
_RL dTsurf(NGP) |
./pkg/aim_v23/aim_sice_impl.F |
66 |
AIM_SICE_IMPL |
_RL FMASK(NGP), netSW(NGP), sFlx(NGP,0:2) |
./pkg/aim_v23/aim_sice_impl.F |
67 |
AIM_SICE_IMPL |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
./pkg/aim_v23/aim_sice_impl.F |
68 |
AIM_SICE_IMPL |
_RL Slr0(NGP), dSlr(NGP) |
./pkg/aim_v23/aim_sice_impl.F |
69 |
AIM_SICE_IMPL |
_RL Tsurf(NGP), SHF(NGP), EVAP(NGP), SLRU(NGP) |
./pkg/aim_v23/aim_sice_impl.F |
70 |
AIM_SICE_IMPL |
_RL dTsurf(NGP) |
./pkg/aim_v23/aim_sice_impl.F |
85 |
AIM_SICE_IMPL |
DO J=1,NGP |
./pkg/aim_v23/aim_sice_impl.F |
98 |
AIM_SICE_IMPL |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
190 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
201 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
401 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
409 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
417 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
423 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
81 |
AIM_SURF_BC |
_RL oice1(NGP) |
./pkg/aim_v23/aim_surf_bc.F |
82 |
AIM_SURF_BC |
_RL snow1(NGP) |
./pkg/aim_v23/com_forcing.h |
15 |
NO PROCEDURE |
_RL fmask1(NGP,3,MAX_NO_THREADS) |
./pkg/aim_v23/com_forcing.h |
48 |
NO PROCEDURE |
_RL sst1 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_forcing.h |
50 |
NO PROCEDURE |
_RL sti1 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_forcing.h |
51 |
NO PROCEDURE |
_RL stl1 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_forcing.h |
53 |
NO PROCEDURE |
_RL soilw1 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_forcing.h |
54 |
NO PROCEDURE |
_RL alb1 (NGP,0:3,MAX_NO_THREADS) |
./pkg/aim_v23/com_forcing.h |
55 |
NO PROCEDURE |
_RL dTsurf (NGP,3,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
100 |
NO PROCEDURE |
_RL PRECNV (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
101 |
NO PROCEDURE |
_RL PRECLS (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
102 |
NO PROCEDURE |
_RL EnPrec (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
103 |
NO PROCEDURE |
_RL CBMF (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
104 |
NO PROCEDURE |
_RL TSR (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
105 |
NO PROCEDURE |
_RL SSR (NGP,0:3,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
106 |
NO PROCEDURE |
_RL SLR (NGP,0:3,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
107 |
NO PROCEDURE |
_RL OLR (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
110 |
NO PROCEDURE |
_RL SHF (NGP,0:3,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
111 |
NO PROCEDURE |
_RL EVAP (NGP,0:3,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
112 |
NO PROCEDURE |
_RL SPEED0 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
113 |
NO PROCEDURE |
_RL DRAG (NGP,0:3,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
125 |
NO PROCEDURE |
_RL TT_SWclr(NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
126 |
NO PROCEDURE |
_RL TSWclr (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
127 |
NO PROCEDURE |
_RL SSWclr (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
128 |
NO PROCEDURE |
_RL TT_LWclr(NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
129 |
NO PROCEDURE |
_RL OLWclr (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
130 |
NO PROCEDURE |
_RL SLWclr (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
34 |
NO PROCEDURE |
_RL RH (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
51 |
NO PROCEDURE |
_RL TS (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
52 |
NO PROCEDURE |
_RL TSKIN (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
54 |
NO PROCEDURE |
_RL T0 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
55 |
NO PROCEDURE |
_RL Q0 (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
56 |
NO PROCEDURE |
_RL CLTOP (NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
57 |
NO PROCEDURE |
_RL CLOUDC(NGP,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
72 |
NO PROCEDURE |
_RL TT_CNV (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
73 |
NO PROCEDURE |
_RL QT_CNV (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
74 |
NO PROCEDURE |
_RL TT_LSC (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
75 |
NO PROCEDURE |
_RL QT_LSC (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
76 |
NO PROCEDURE |
_RL TT_RSW (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
77 |
NO PROCEDURE |
_RL TT_RLW (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
80 |
NO PROCEDURE |
_RL TT_PBL (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_physvar.h |
81 |
NO PROCEDURE |
_RL QT_PBL (NGP,NLEV,MAX_NO_THREADS) |
./pkg/aim_v23/com_radvar.h |
18 |
NO PROCEDURE |
_RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP) |
./pkg/aim_v23/com_radvar.h |
27 |
NO PROCEDURE |
_RL TAU2(NGP,NLEV,NBAND), ST4A(NGP,NLEV,2) |
./pkg/aim_v23/com_radvar.h |
28 |
NO PROCEDURE |
_RL STRATC(NGP), FLUX(NGP,NBAND) |
./pkg/aim_v23/phy_convmf.F |
103 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
123 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
141 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
172 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
188 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
200 |
CONVMF |
DO 300 J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
50 |
CONVMF |
_RL PSA(NGP), SE(NGP,NLEV), QA(NGP,NLEV), QSAT(NGP,NLEV) |
./pkg/aim_v23/phy_convmf.F |
51 |
CONVMF |
_RL dpFac(NGP,NLEV) |
./pkg/aim_v23/phy_convmf.F |
52 |
CONVMF |
INTEGER IDEPTH(NGP) |
./pkg/aim_v23/phy_convmf.F |
53 |
CONVMF |
_RL CBMF(NGP), PRECNV(NGP), DFSE(NGP,NLEV), DFQA(NGP,NLEV) |
./pkg/aim_v23/phy_convmf.F |
54 |
CONVMF |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_convmf.F |
60 |
CONVMF |
INTEGER ITOP(NGP) |
./pkg/aim_v23/phy_convmf.F |
62 |
CONVMF |
_RL QATHR(NGP), ENTR(2:NLEV-1) |
./pkg/aim_v23/phy_convmf.F |
63 |
CONVMF |
_RL ENTR_PS(NGP,2:NLEV-1), FM0(NGP) |
./pkg/aim_v23/phy_convmf.F |
66 |
CONVMF |
_RL dSEdp(NGP,NLEV), factP, PSA_1 |
./pkg/aim_v23/phy_convmf.F |
82 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
92 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_convmf.F |
98 |
CONVMF |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
116 |
PHY_DRIVER |
INTEGER ICLTOP(NGP) |
./pkg/aim_v23/phy_driver.F |
117 |
PHY_DRIVER |
INTEGER kGround(NGP) |
./pkg/aim_v23/phy_driver.F |
118 |
PHY_DRIVER |
_RL dpFac(NGP,NLEV) |
./pkg/aim_v23/phy_driver.F |
120 |
PHY_DRIVER |
_RL ST4S(NGP) |
./pkg/aim_v23/phy_driver.F |
121 |
PHY_DRIVER |
_RL PSG_1(NGP), RPS_1 |
./pkg/aim_v23/phy_driver.F |
122 |
PHY_DRIVER |
_RL dTskin(NGP), T1s(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_driver.F |
123 |
PHY_DRIVER |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
./pkg/aim_v23/phy_driver.F |
124 |
PHY_DRIVER |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
./pkg/aim_v23/phy_driver.F |
125 |
PHY_DRIVER |
_RL UPSWG(NGP) |
./pkg/aim_v23/phy_driver.F |
130 |
PHY_DRIVER |
_RL dummyR(NGP) |
./pkg/aim_v23/phy_driver.F |
131 |
PHY_DRIVER |
INTEGER dummyI(NGP) |
./pkg/aim_v23/phy_driver.F |
147 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
166 |
PHY_DRIVER |
CALL SHTORH (1,NGP,TG1(1,K),PSG_1,SIG(K),QG1(1,K), |
./pkg/aim_v23/phy_driver.F |
183 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
208 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
246 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
251 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
337 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
373 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
414 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
435 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
94 |
PHY_DRIVER |
_RL TG1 (NGP,NLEV) |
./pkg/aim_v23/phy_driver.F |
95 |
PHY_DRIVER |
_RL QG1 (NGP,NLEV) |
./pkg/aim_v23/phy_driver.F |
96 |
PHY_DRIVER |
_RL VsurfSq(NGP) |
./pkg/aim_v23/phy_driver.F |
97 |
PHY_DRIVER |
_RL SE (NGP,NLEV) |
./pkg/aim_v23/phy_driver.F |
98 |
PHY_DRIVER |
_RL QSAT (NGP,NLEV) |
./pkg/aim_v23/phy_driver.F |
99 |
PHY_DRIVER |
_RL PSG (NGP) |
./pkg/aim_v23/phy_lscond.F |
100 |
LSCOND |
DO J=1,NGP |
./pkg/aim_v23/phy_lscond.F |
108 |
LSCOND |
DO J=1,NGP |
./pkg/aim_v23/phy_lscond.F |
45 |
LSCOND |
_RL PSA(NGP), dpFac(NGP,NLEV), QA(NGP,NLEV), QSAT(NGP,NLEV) |
./pkg/aim_v23/phy_lscond.F |
46 |
LSCOND |
_RL PRECLS(NGP), DTLSC(NGP,NLEV), DQLSC(NGP,NLEV) |
./pkg/aim_v23/phy_lscond.F |
47 |
LSCOND |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_lscond.F |
54 |
LSCOND |
_RL PSA2(NGP) |
./pkg/aim_v23/phy_lscond.F |
69 |
LSCOND |
DO J=1,NGP |
./pkg/aim_v23/phy_lscond.F |
84 |
LSCOND |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
191 |
RADSW |
_RL PSA(NGP),dpFac(NGP,NLEV),QA(NGP,NLEV),RH(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
192 |
RADSW |
_RL ALB(NGP,0:3) |
./pkg/aim_v23/phy_radiat.F |
193 |
RADSW |
INTEGER ICLTOP(NGP) |
./pkg/aim_v23/phy_radiat.F |
194 |
RADSW |
_RL CLOUDC(NGP), FTOP(NGP), FSFC(NGP,0:3), DFABS(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
195 |
RADSW |
_RL UPSWG(NGP) |
./pkg/aim_v23/phy_radiat.F |
197 |
RADSW |
_RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP) |
./pkg/aim_v23/phy_radiat.F |
198 |
RADSW |
_RL TAU2(NGP,NLEV,NBAND),STRATC(NGP) |
./pkg/aim_v23/phy_radiat.F |
201 |
RADSW |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_radiat.F |
210 |
RADSW |
_RL QCLOUD(NGP), ACLOUD(NGP), |
./pkg/aim_v23/phy_radiat.F |
211 |
RADSW |
& ALBTOP(NGP,NLEV), FREFL(NGP,NLEV), FLUX(NGP,2) |
./pkg/aim_v23/phy_radiat.F |
214 |
RADSW |
_RL CLDCLW(NGP,NLEV), ACLDLW(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
221 |
RADSW |
INTEGER NL1(NGP) |
./pkg/aim_v23/phy_radiat.F |
233 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
248 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
256 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
268 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
283 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
308 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
313 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
319 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
338 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
346 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
360 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
370 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
378 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
388 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
401 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
413 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
420 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
434 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
446 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
451 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
456 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
466 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
46 |
SOL_OZ |
_RL SLAT(NGP), CLAT(NGP) |
./pkg/aim_v23/phy_radiat.F |
47 |
SOL_OZ |
_RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP) |
./pkg/aim_v23/phy_radiat.F |
547 |
RADLW |
_RL TA(NGP,NLEV), TS(NGP), ST4S(NGP) |
./pkg/aim_v23/phy_radiat.F |
548 |
RADLW |
_RL FTOP(NGP), FSFC(NGP), DFABS(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
549 |
RADLW |
_RL OZUPP(NGP), STRATC(NGP) |
./pkg/aim_v23/phy_radiat.F |
550 |
RADLW |
_RL TAU2(NGP,NLEV,NBAND), FLUX(NGP,NBAND), ST4A(NGP,NLEV,2) |
./pkg/aim_v23/phy_radiat.F |
552 |
RADLW |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_radiat.F |
560 |
RADLW |
INTEGER NL1(NGP) |
./pkg/aim_v23/phy_radiat.F |
566 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
580 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
587 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
594 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
603 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
610 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
624 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
633 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
641 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
653 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
668 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
677 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
683 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
692 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
707 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
718 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
723 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
97 |
SOL_OZ |
DO J=1,NGP |
./pkg/aim_v23/phy_shtorh.F |
103 |
SHTORH |
DO 210 J=1,NGP |
./pkg/aim_v23/phy_shtorh.F |
111 |
SHTORH |
DO 220 J=1,NGP |
./pkg/aim_v23/phy_shtorh.F |
29 |
SHTORH |
INTEGER IMODE, NGP |
./pkg/aim_v23/phy_shtorh.F |
32 |
SHTORH |
_RL TA(NGP), PS(NGP), QSAT(NGP), QA(*), RH(*) |
./pkg/aim_v23/phy_shtorh.F |
62 |
SHTORH |
DO J=1,NGP |
./pkg/aim_v23/phy_shtorh.F |
6 |
SHTORH |
SUBROUTINE SHTORH (IMODE,NGP,TA,PS,SIG,QA,RH,QSAT,myThid) |
./pkg/aim_v23/phy_shtorh.F |
81 |
SHTORH |
DO 110 J=1,NGP |
./pkg/aim_v23/phy_shtorh.F |
91 |
SHTORH |
DO 120 J=1,NGP |
./pkg/aim_v23/phy_shtorh.F |
95 |
SHTORH |
DO 130 J=1,NGP |
./pkg/aim_v23/phy_snow_precip.F |
105 |
SNOW_PRECIP |
DO J=1,NGP |
./pkg/aim_v23/phy_snow_precip.F |
59 |
SNOW_PRECIP |
_RL PSA(NGP), dpFac(NGP,NLEV), ThA(NGP,NLEV) |
./pkg/aim_v23/phy_snow_precip.F |
60 |
SNOW_PRECIP |
_RL PRECLS(NGP), DTLSC(NGP,NLEV), DQLSC(NGP,NLEV) |
./pkg/aim_v23/phy_snow_precip.F |
61 |
SNOW_PRECIP |
_RL PRECNV(NGP), DTCNV(NGP,NLEV), DQCNV(NGP,NLEV) |
./pkg/aim_v23/phy_snow_precip.F |
62 |
SNOW_PRECIP |
_RL EnPrec(NGP) |
./pkg/aim_v23/phy_snow_precip.F |
63 |
SNOW_PRECIP |
INTEGER IDEPTH(NGP) |
./pkg/aim_v23/phy_snow_precip.F |
64 |
SNOW_PRECIP |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_snow_precip.F |
73 |
SNOW_PRECIP |
_RL T1(NGP) |
./pkg/aim_v23/phy_snow_precip.F |
82 |
SNOW_PRECIP |
DO J=1,NGP |
./pkg/aim_v23/phy_snow_precip.F |
97 |
SNOW_PRECIP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
106 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
118 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
127 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
138 |
SUFLUX_LAND |
CALL SHTORH (2, NGP, TSKIN, PSA, 1. _d 0, QDUMMY, dEvp, |
./pkg/aim_v23/phy_suflux_land.F |
140 |
SUFLUX_LAND |
CALL SHTORH (0, NGP, TSFC, PSA, 1. _d 0, QDUMMY, RDUMMY, |
./pkg/aim_v23/phy_suflux_land.F |
147 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
154 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
164 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
171 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
186 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
198 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
207 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
216 |
SUFLUX_LAND |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_land.F |
78 |
SUFLUX_LAND |
_RL PSA(NGP), FMASK(NGP), EMISloc |
./pkg/aim_v23/phy_suflux_land.F |
79 |
SUFLUX_LAND |
_RL Tsurf(NGP), dTskin(NGP), SWAV(NGP) |
./pkg/aim_v23/phy_suflux_land.F |
80 |
SUFLUX_LAND |
_RL SSR(NGP), SLRD(NGP) |
./pkg/aim_v23/phy_suflux_land.F |
81 |
SUFLUX_LAND |
_RL T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_suflux_land.F |
83 |
SUFLUX_LAND |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
./pkg/aim_v23/phy_suflux_land.F |
84 |
SUFLUX_LAND |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
./pkg/aim_v23/phy_suflux_land.F |
85 |
SUFLUX_LAND |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
./pkg/aim_v23/phy_suflux_land.F |
86 |
SUFLUX_LAND |
_RL TSFC(NGP), TSKIN(NGP) |
./pkg/aim_v23/phy_suflux_land.F |
95 |
SUFLUX_LAND |
_RL CDENVV(NGP), RDTH, FSLAND |
./pkg/aim_v23/phy_suflux_land.F |
97 |
SUFLUX_LAND |
_RL QSAT0(NGP,2) |
./pkg/aim_v23/phy_suflux_ocean.F |
100 |
SUFLUX_OCEAN |
CALL SHTORH (0, NGP, Tsurf, PSA, 1. _d 0, QDUMMY, RDUMMY, |
./pkg/aim_v23/phy_suflux_ocean.F |
103 |
SUFLUX_OCEAN |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_ocean.F |
109 |
SUFLUX_OCEAN |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_ocean.F |
58 |
SUFLUX_OCEAN |
_RL PSA(NGP) |
./pkg/aim_v23/phy_suflux_ocean.F |
59 |
SUFLUX_OCEAN |
_RL FMASK(NGP), Tsurf(NGP) |
./pkg/aim_v23/phy_suflux_ocean.F |
60 |
SUFLUX_OCEAN |
_RL SSR(NGP), SLRD(NGP) |
./pkg/aim_v23/phy_suflux_ocean.F |
61 |
SUFLUX_OCEAN |
_RL T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_suflux_ocean.F |
63 |
SUFLUX_OCEAN |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
./pkg/aim_v23/phy_suflux_ocean.F |
72 |
SUFLUX_OCEAN |
_RL CDENVV(NGP), RDTH, FSSEA |
./pkg/aim_v23/phy_suflux_ocean.F |
73 |
SUFLUX_OCEAN |
_RL QSAT0(NGP) |
./pkg/aim_v23/phy_suflux_ocean.F |
89 |
SUFLUX_OCEAN |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_ocean.F |
94 |
SUFLUX_OCEAN |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_post.F |
109 |
SUFLUX_POST |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_post.F |
126 |
SUFLUX_POST |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_post.F |
135 |
SUFLUX_POST |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_post.F |
143 |
SUFLUX_POST |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_post.F |
78 |
SUFLUX_POST |
_RL FMASK(NGP,3), EMISloc |
./pkg/aim_v23/phy_suflux_post.F |
79 |
SUFLUX_POST |
_RL TLAND(NGP), TSEA(NGP), TSICE(NGP), dTskin(NGP), SLRD(NGP) |
./pkg/aim_v23/phy_suflux_post.F |
80 |
SUFLUX_POST |
_RL T0(NGP), Q0(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_suflux_post.F |
82 |
SUFLUX_POST |
_RL DRAG(NGP,0:3), SHF(NGP,0:3), EVAP(NGP,0:3), SLRup(NGP,3) |
./pkg/aim_v23/phy_suflux_post.F |
83 |
SUFLUX_POST |
_RL SLRU(NGP), TSFC(NGP), TSKIN(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
100 |
SUFLUX_PREP |
_RL tmpRH(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
128 |
SUFLUX_PREP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
146 |
SUFLUX_PREP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
155 |
SUFLUX_PREP |
CALL SHTORH (-1,NGP,T0, PSA, 1. _d 0, Q0, tmpRH, QSAT0, myThid) |
./pkg/aim_v23/phy_suflux_prep.F |
157 |
SUFLUX_PREP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
169 |
SUFLUX_PREP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
180 |
SUFLUX_PREP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
191 |
SUFLUX_PREP |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
243 |
SFLSET |
_RL PHI0(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
244 |
SFLSET |
_RL FOROG(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
254 |
SFLSET |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_prep.F |
81 |
SUFLUX_PREP |
_RL PSA(NGP), TA(NGP,NLEV), QA(NGP,NLEV), RH(NGP,NLEV) |
./pkg/aim_v23/phy_suflux_prep.F |
82 |
SUFLUX_PREP |
_RL ThA(NGP,NLEV) |
./pkg/aim_v23/phy_suflux_prep.F |
83 |
SUFLUX_PREP |
_RL Vsurf2(NGP), WVS(NGP), CLAT(NGP), FOROG(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
84 |
SUFLUX_PREP |
_RL FMASK(NGP,3), TLAND(NGP), TSEA(NGP), TSICE(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
85 |
SUFLUX_PREP |
_RL SSR(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
87 |
SUFLUX_PREP |
_RL SPEED0(NGP), DRAG(NGP,0:3), T1(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
88 |
SUFLUX_PREP |
_RL dTskin(NGP), T0(NGP), Q0(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
90 |
SUFLUX_PREP |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_suflux_prep.F |
97 |
SUFLUX_PREP |
_RL QSAT0(NGP,2) |
./pkg/aim_v23/phy_suflux_sice.F |
111 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
124 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
133 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
148 |
SUFLUX_SICE |
CALL SHTORH (2, NGP, TSKIN, PSA, 1. _d 0, QDUMMY, dEvp, |
./pkg/aim_v23/phy_suflux_sice.F |
150 |
SUFLUX_SICE |
CALL SHTORH (0, NGP, TSFC, PSA, 1. _d 0, QDUMMY, RDUMMY, |
./pkg/aim_v23/phy_suflux_sice.F |
155 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
162 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
173 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
185 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
194 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
203 |
SUFLUX_SICE |
DO J=1,NGP |
./pkg/aim_v23/phy_suflux_sice.F |
78 |
SUFLUX_SICE |
_RL PSA(NGP), FMASK(NGP), EMISloc |
./pkg/aim_v23/phy_suflux_sice.F |
79 |
SUFLUX_SICE |
_RL Tsurf(NGP), dTskin(NGP) |
./pkg/aim_v23/phy_suflux_sice.F |
80 |
SUFLUX_SICE |
_RL SSR(NGP), SLRD(NGP) |
./pkg/aim_v23/phy_suflux_sice.F |
81 |
SUFLUX_SICE |
_RL T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_suflux_sice.F |
83 |
SUFLUX_SICE |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
./pkg/aim_v23/phy_suflux_sice.F |
84 |
SUFLUX_SICE |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
./pkg/aim_v23/phy_suflux_sice.F |
85 |
SUFLUX_SICE |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
./pkg/aim_v23/phy_suflux_sice.F |
86 |
SUFLUX_SICE |
_RL TSFC(NGP), TSKIN(NGP) |
./pkg/aim_v23/phy_suflux_sice.F |
96 |
SUFLUX_SICE |
_RL CDENVV(NGP), RDTH, FSSICE |
./pkg/aim_v23/phy_suflux_sice.F |
98 |
SUFLUX_SICE |
_RL QSAT0(NGP,2) |
./pkg/aim_v23/phy_vdifsc.F |
106 |
VDIFSC |
DO J=1,NGP |
./pkg/aim_v23/phy_vdifsc.F |
121 |
VDIFSC |
DO J=1,NGP |
./pkg/aim_v23/phy_vdifsc.F |
129 |
VDIFSC |
DO J=1,NGP |
./pkg/aim_v23/phy_vdifsc.F |
168 |
VDIFSC |
DO J=1,NGP |
./pkg/aim_v23/phy_vdifsc.F |
189 |
VDIFSC |
DO J=1,NGP |
./pkg/aim_v23/phy_vdifsc.F |
55 |
VDIFSC |
_RL dpFac(NGP,NLEV) |
./pkg/aim_v23/phy_vdifsc.F |
56 |
VDIFSC |
_RL SE(NGP,NLEV), RH(NGP,NLEV), QA(NGP,NLEV), QSAT(NGP,NLEV) |
./pkg/aim_v23/phy_vdifsc.F |
60 |
VDIFSC |
_RL TTENVD(NGP,NLEV), QTENVD(NGP,NLEV) |
./pkg/aim_v23/phy_vdifsc.F |
62 |
VDIFSC |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_vdifsc.F |
70 |
VDIFSC |
_RL dSEdp(NGP,NLEV-1), DeltaPI(NLEV-1), factP |
./pkg/aim_v23/phy_vdifsc.F |
73 |
VDIFSC |
_RL CVDI(NGP), FSHCQ |
./pkg/aim_v23/phy_vdifsc.F |
93 |
VDIFSC |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
113 |
BULKF_FORMULA_AIM |
_RL PSA(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
114 |
BULKF_FORMULA_AIM |
_RL DENVV(NGP), PRD |
./pkg/bulk_force/bulkf_formula_aim.F |
115 |
BULKF_FORMULA_AIM |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
116 |
BULKF_FORMULA_AIM |
_RL Slr0(NGP), dSlr(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
117 |
BULKF_FORMULA_AIM |
_RL TSFC(NGP), TSKIN(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
118 |
BULKF_FORMULA_AIM |
_RL CDENVV(NGP), RDTH, FSSICE |
./pkg/bulk_force/bulkf_formula_aim.F |
120 |
BULKF_FORMULA_AIM |
_RL QSAT0(NGP,2) |
./pkg/bulk_force/bulkf_formula_aim.F |
140 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
151 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
162 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
171 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
182 |
BULKF_FORMULA_AIM |
CALL BULKF_SH2RH_AIM( 2, NGP, TSKIN, PSA, 1. _d 0, |
./pkg/bulk_force/bulkf_formula_aim.F |
184 |
BULKF_FORMULA_AIM |
CALL BULKF_SH2RH_AIM( 0, NGP, TSFC, PSA, 1. _d 0, |
./pkg/bulk_force/bulkf_formula_aim.F |
189 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
196 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
207 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
219 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
228 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
237 |
BULKF_FORMULA_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
64 |
BULKF_FORMULA_AIM |
INTEGER NGP |
./pkg/bulk_force/bulkf_formula_aim.F |
65 |
BULKF_FORMULA_AIM |
PARAMETER ( NGP = 1 ) |
./pkg/bulk_force/bulkf_formula_aim.F |
67 |
BULKF_FORMULA_AIM |
_RL Tsurf(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
69 |
BULKF_FORMULA_AIM |
_RL SLRD(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
70 |
BULKF_FORMULA_AIM |
_RL T1(NGP), T0(NGP), Q0(NGP), Vsurf(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
72 |
BULKF_FORMULA_AIM |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
./pkg/bulk_force/bulkf_formula_aim.F |
73 |
BULKF_FORMULA_AIM |
_RL dEvp(NGP), sFlx(NGP,0:2) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
103 |
BULKF_SH2RH_AIM |
DO 210 J=1,NGP |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
111 |
BULKF_SH2RH_AIM |
DO 220 J=1,NGP |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
29 |
BULKF_SH2RH_AIM |
INTEGER IMODE, NGP |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
32 |
BULKF_SH2RH_AIM |
_RL TA(NGP), PS(NGP), QSAT(NGP), QA(*), RH(*) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
62 |
BULKF_SH2RH_AIM |
DO J=1,NGP |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
6 |
BULKF_SH2RH_AIM |
SUBROUTINE BULKF_SH2RH_AIM(IMODE,NGP,TA,PS,SIG,QA,RH,QSAT,myThid) |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
81 |
BULKF_SH2RH_AIM |
DO 110 J=1,NGP |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
91 |
BULKF_SH2RH_AIM |
DO 120 J=1,NGP |
./pkg/bulk_force/bulkf_sh2rh_aim.F |
95 |
BULKF_SH2RH_AIM |
DO 130 J=1,NGP |