File |
Line number |
Procedure |
Code |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
207 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
218 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
432 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
440 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
448 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
454 |
AIM_SURF_BC |
DO J=1,NGP |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
87 |
AIM_SURF_BC |
_RL oice1(NGP) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
88 |
AIM_SURF_BC |
_RL snow1(NGP) |
./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 |
309 |
AIM_DIAGNOSTICS |
DO J=1,NGP |
./pkg/aim_v23/aim_diagnostics.F |
437 |
AIM_DIAGNOSTICS |
DO J=1,NGP |
./pkg/aim_v23/aim_diagnostics.F |
61 |
AIM_DIAGNOSTICS |
_RL tmpVar(NGP) |
./pkg/aim_v23/aim_diagnostics.F |
72 |
AIM_DIAGNOSTICS |
DO J=1,NGP |
./pkg/aim_v23/aim_do_physics.F |
64 |
AIM_DO_PHYSICS |
_RL phi0 (NGP) |
./pkg/aim_v23/aim_dyn2aim.F |
219 |
AIM_DYN2AIM |
DO I2=1,NGP |
./pkg/aim_v23/aim_dyn2aim.F |
55 |
AIM_DYN2AIM |
_RL TA(NGP,NLEV), QA(NGP,NLEV), ThA(NGP,NLEV) |
./pkg/aim_v23/aim_dyn2aim.F |
56 |
AIM_DYN2AIM |
_RL Vsurf2(NGP), PSA(NGP), dpFac(NGP,NLEV) |
./pkg/aim_v23/aim_dyn2aim.F |
57 |
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 |
400 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
408 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
416 |
AIM_SURF_BC |
DO J=1,NGP |
./pkg/aim_v23/aim_surf_bc.F |
422 |
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 |
117 |
PHY_DRIVER |
INTEGER ICLTOP(NGP) |
./pkg/aim_v23/phy_driver.F |
118 |
PHY_DRIVER |
INTEGER kGround(NGP) |
./pkg/aim_v23/phy_driver.F |
120 |
PHY_DRIVER |
_RL dpFac(NGP,NLEV) |
./pkg/aim_v23/phy_driver.F |
122 |
PHY_DRIVER |
_RL ST4S(NGP) |
./pkg/aim_v23/phy_driver.F |
123 |
PHY_DRIVER |
_RL PSG_1(NGP), RPS_1 |
./pkg/aim_v23/phy_driver.F |
124 |
PHY_DRIVER |
_RL dTskin(NGP), T1s(NGP), DENVV(NGP) |
./pkg/aim_v23/phy_driver.F |
125 |
PHY_DRIVER |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
./pkg/aim_v23/phy_driver.F |
126 |
PHY_DRIVER |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
./pkg/aim_v23/phy_driver.F |
127 |
PHY_DRIVER |
_RL UPSWG(NGP) |
./pkg/aim_v23/phy_driver.F |
132 |
PHY_DRIVER |
_RL dummyR(NGP) |
./pkg/aim_v23/phy_driver.F |
133 |
PHY_DRIVER |
INTEGER dummyI(NGP) |
./pkg/aim_v23/phy_driver.F |
149 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
168 |
PHY_DRIVER |
CALL SHTORH (1,NGP,TG1(1,K),PSG_1,SIG(K),QG1(1,K), |
./pkg/aim_v23/phy_driver.F |
185 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
210 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
256 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
261 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
347 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
383 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
424 |
PHY_DRIVER |
DO J=1,NGP |
./pkg/aim_v23/phy_driver.F |
445 |
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 |
104 |
SOL_OZ |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
199 |
RADSW |
_RL PSA(NGP),dpFac(NGP,NLEV),QA(NGP,NLEV),RH(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
200 |
RADSW |
_RL ALB(NGP,0:3) |
./pkg/aim_v23/phy_radiat.F |
201 |
RADSW |
INTEGER ICLTOP(NGP) |
./pkg/aim_v23/phy_radiat.F |
202 |
RADSW |
_RL CLOUDC(NGP), FTOP(NGP), FSFC(NGP,0:3), DFABS(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
203 |
RADSW |
_RL UPSWG(NGP) |
./pkg/aim_v23/phy_radiat.F |
205 |
RADSW |
_RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP) |
./pkg/aim_v23/phy_radiat.F |
206 |
RADSW |
_RL TAU2(NGP,NLEV,NBAND),STRATC(NGP) |
./pkg/aim_v23/phy_radiat.F |
210 |
RADSW |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_radiat.F |
219 |
RADSW |
_RL QCLOUD(NGP), ACLOUD(NGP), |
./pkg/aim_v23/phy_radiat.F |
220 |
RADSW |
& ALBTOP(NGP,NLEV), FREFL(NGP,NLEV), FLUX(NGP,2) |
./pkg/aim_v23/phy_radiat.F |
223 |
RADSW |
_RL CLDCLW(NGP,NLEV), ACLDLW(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
229 |
RADSW |
INTEGER NL1(NGP) |
./pkg/aim_v23/phy_radiat.F |
240 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
255 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
263 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
275 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
290 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
315 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
320 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
326 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
345 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
353 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
367 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
377 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
385 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
395 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
408 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
420 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
427 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
441 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
453 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
458 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
463 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
473 |
RADSW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
553 |
RADLW |
_RL TA(NGP,NLEV), TS(NGP), ST4S(NGP) |
./pkg/aim_v23/phy_radiat.F |
554 |
RADLW |
_RL FTOP(NGP), FSFC(NGP), DFABS(NGP,NLEV) |
./pkg/aim_v23/phy_radiat.F |
555 |
RADLW |
_RL OZUPP(NGP), STRATC(NGP) |
./pkg/aim_v23/phy_radiat.F |
556 |
RADLW |
_RL TAU2(NGP,NLEV,NBAND), FLUX(NGP,NBAND), ST4A(NGP,NLEV,2) |
./pkg/aim_v23/phy_radiat.F |
558 |
RADLW |
INTEGER kGrd(NGP) |
./pkg/aim_v23/phy_radiat.F |
55 |
SOL_OZ |
_RL SLAT(NGP), CLAT(NGP) |
./pkg/aim_v23/phy_radiat.F |
566 |
RADLW |
INTEGER NL1(NGP) |
./pkg/aim_v23/phy_radiat.F |
56 |
SOL_OZ |
_RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP) |
./pkg/aim_v23/phy_radiat.F |
571 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
585 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
592 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
599 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
608 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
615 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
629 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
638 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
646 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
658 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
673 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
682 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
688 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
697 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
712 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
723 |
RADLW |
DO J=1,NGP |
./pkg/aim_v23/phy_radiat.F |
728 |
RADLW |
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 |