File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_gwdrag.F |
370 |
GWDD |
_RL vaisd,velco,deluu,delvv,delve2,delz,vsqua |
./pkg/fizhi/fizhi_gwdrag.F |
437 |
GWDD |
vsqua = vai1*vai2 |
./pkg/fizhi/fizhi_gwdrag.F |
438 |
GWDD |
bv(i,L) = sqrt(vsqua) |
./pkg/fizhi/fizhi_gwdrag.F |
514 |
GWDD |
vsqua = bv(i,L)*bv(i,L) |
./pkg/fizhi/fizhi_gwdrag.F |
515 |
GWDD |
richsn = delz*delz*vsqua/delve2 |
./pkg/fizhi/fizhi_gwdrag.F |
579 |
GWDD |
vsqua = vai1*vai2 |
./pkg/fizhi/fizhi_gwdrag.F |
580 |
GWDD |
vaisd = sqrt(vsqua) |
./pkg/fizhi/fizhi_gwdrag.F |
603 |
GWDD |
richsn = delz*delz*vsqua/delve2 |