| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
525 |
MOISTIO |
saveq (i,L) = shl(i,L) |
|
./pkg/fizhi/fizhi_moist.F |
552 |
MOISTIO |
CVQ (I,L) = (SHL(I,L) - saveq (i,l)) |
|
./pkg/fizhi/fizhi_moist.F |
565 |
MOISTIO |
SHL(I,L) = saveq (i,l) + cvq (i,l) |
|
./pkg/fizhi/fizhi_moist.F |
650 |
MOISTIO |
saveq (I,L) = SHL(I,L) |
|
./pkg/fizhi/fizhi_moist.F |
665 |
MOISTIO |
TMP1(I,L) = sp(i) * (SHL(I,L)-saveq(I,L)) * tminv |
|
./pkg/fizhi/fizhi_moist.F |
682 |
MOISTIO |
TMP1(I,L) = (SHL(I,L)-saveq(I,L)) * 1000. * sday * tminv |
|
./pkg/fizhi/fizhi_moist.F |
700 |
MOISTIO |
call SRCLOUDS (saveth,saveq,plk,pl,plke,clsbth,cldlz,istrip,lm, |
|
./pkg/fizhi/fizhi_moist.F |
99 |
MOISTIO |
_RL saveq (istrip,lm) |