File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
14 |
DO_FIZHI |
& nswcld,cldtotswin,cldrasswin,cldlspswin,nswlz,swlzin,imstturbsw, |
./pkg/fizhi/do_fizhi.F |
264 |
DO_FIZHI |
& nswcld(bi,bj),cldtot_sw,cldras_sw,cldlsp_sw,nswlz(bi,bj),swlz, |
./pkg/fizhi/do_fizhi.F |
73 |
DO_FIZHI |
INTEGER nswcld(nSxIn,nSyIn),nswlz(nSxIn,nSyIn) |
./pkg/fizhi/fizhi_coms.h |
45 |
NO PROCEDURE |
& iras,nlwcld,nlwlz,nswcld,nswlz, |
./pkg/fizhi/fizhi_coms.h |
65 |
NO PROCEDURE |
INTEGER nswcld(nSx,nSy),nswlz(nSx,nSy) |
./pkg/fizhi/fizhi_driver.F |
169 |
FIZHI_DRIVER |
& ptop,nswcld,cldtot_sw,cldras_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_driver.F |
18 |
FIZHI_DRIVER |
& cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz,nswcld,cldtot_sw, |
./pkg/fizhi/fizhi_driver.F |
250 |
FIZHI_DRIVER |
& nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_driver.F |
55 |
FIZHI_DRIVER |
INTEGER iras,nlwcld,nlwlz,nswcld,nswlz |
./pkg/fizhi/fizhi_init_vars.F |
258 |
FIZHI_INIT_VARS |
nswcld(bi,bj) = 0 |
./pkg/fizhi/fizhi_moist.F |
1089 |
MOISTIO |
cldtot_sw(i,j,L) = (nswcld*cldtot_sw(i,j,L) + cldnow)/(nswcld+1) |
./pkg/fizhi/fizhi_moist.F |
1090 |
MOISTIO |
cldlsp_sw(i,j,L) = (nswcld*cldlsp_sw(i,j,L) + cldlsp)/(nswcld+1) |
./pkg/fizhi/fizhi_moist.F |
1091 |
MOISTIO |
cldras_sw(i,j,L) = (nswcld*cldras_sw(i,j,L) + cldras)/(nswcld+1) |
./pkg/fizhi/fizhi_moist.F |
1173 |
MOISTIO |
nswcld = nswcld + 1 |
./pkg/fizhi/fizhi_moist.F |
11 |
MOISTIO |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_moist.F |
34 |
MOISTIO |
integer nswcld,nswlz |
./pkg/fizhi/fizhi_read_pickup.F |
87 |
FIZHI_READ_PICKUP |
nswcld(bi,bj) = NINT(temp(4,1,4,bi,bj)) |
./pkg/fizhi/fizhi_swrad.F |
11 |
SWRIO |
. ptop,nswcld,cldsw,cswmo,nswlz,swlz, |
./pkg/fizhi/fizhi_swrad.F |
200 |
SWRIO |
if( nswcld.ne.0 ) then |
./pkg/fizhi/fizhi_swrad.F |
32 |
SWRIO |
integer nswcld,nswlz |
./pkg/fizhi/fizhi_swrad.F |
533 |
SWRIO |
nswcld = 0 |
./pkg/fizhi/fizhi_wrapper.F |
272 |
FIZHI_WRAPPER |
& nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_write_pickup.F |
104 |
FIZHI_WRITE_PICKUP |
temp(4,1,4,bi,bj) = float(nswcld(bi,bj)) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
14 |
DO_FIZHI |
& nswcld,cldtotswin,cldrasswin,cldlspswin,nswlz,swlzin,imstturbsw, |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
73 |
DO_FIZHI |
INTEGER nswcld(nSxin,nSyin),nswlz(nSxin,nSyin) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
250 |
FIZHI_INIT_VARS |
nswcld(bi,bj) = 0 |