File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_gwdrag.F |
173 |
GWDRAG |
. istrip,Lm,nthinstr,nbasestr,lstar ) |
./pkg/fizhi/fizhi_gwdrag.F |
297 |
GWDD |
. grav,rgas,cp,irun,Lm,nthin,nbase,lstar ) |
./pkg/fizhi/fizhi_gwdrag.F |
349 |
GWDD |
_RL lstar |
./pkg/fizhi/fizhi_gwdrag.F |
378 |
GWDD |
akwnmb = 1.0/lstar |
./pkg/fizhi/fizhi_gwdrag.F |
462 |
GWDD |
. / (nbar(i)*lstar) |
./pkg/fizhi/fizhi_gwdrag.F |
80 |
GWDRAG |
_RL grav, rgas, cp, cpinv, lstar |
./pkg/fizhi/fizhi_gwdrag.F |
94 |
GWDRAG |
lstar = 2*getcon('EARTH RADIUS')*cos(pi/3.0)/imglobal |