| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_gwdrag.F |
371 |
GWDD |
_RL richsn,crifro,crif2,fro2,coef |
|
./pkg/fizhi/fizhi_gwdrag.F |
515 |
GWDD |
richsn = delz*delz*vsqua/delve2 |
|
./pkg/fizhi/fizhi_gwdrag.F |
517 |
GWDD |
richsn = 99999.0 |
|
./pkg/fizhi/fizhi_gwdrag.F |
520 |
GWDD |
if( richsn.le.0.25 ) then |
|
./pkg/fizhi/fizhi_gwdrag.F |
528 |
GWDD |
crifro = 1.0 - 0.25/richsn |
|
./pkg/fizhi/fizhi_gwdrag.F |
603 |
GWDD |
richsn = delz*delz*vsqua/delve2 |
|
./pkg/fizhi/fizhi_gwdrag.F |
605 |
GWDD |
richsn = 99999.0 |
|
./pkg/fizhi/fizhi_gwdrag.F |
608 |
GWDD |
if( richsn.le.0.25 ) then |
|
./pkg/fizhi/fizhi_gwdrag.F |
617 |
GWDD |
crifro = 1.0 - 0.25/richsn |