| 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 |
262 |
DO_FIZHI |
. nswcld(bi,bj),cldtot_sw,cldras_sw,cldlsp_sw,nswlz(bi,bj),swlz, |
|
./pkg/fizhi/do_fizhi.F |
72 |
DO_FIZHI |
integer nswcld(Nsxin,Nsyin),nswlz(Nsxin,Nsyin) |
|
./pkg/fizhi/fizhi_coms.h |
46 |
NO PROCEDURE |
. iras,nlwcld,nlwlz,nswcld,nswlz, |
|
./pkg/fizhi/fizhi_coms.h |
66 |
NO PROCEDURE |
integer nswcld(Nsx,Nsy),nswlz(Nsx,Nsy) |
|
./pkg/fizhi/fizhi_driver.F |
167 |
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 |
247 |
FIZHI_DRIVER |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
|
./pkg/fizhi/fizhi_driver.F |
53 |
FIZHI_DRIVER |
integer iras,nlwcld,nlwlz,nswcld,nswlz |
|
./pkg/fizhi/fizhi_init_vars.F |
257 |
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 |
271 |
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 |
72 |
DO_FIZHI |
integer nswcld(Nsxin,Nsyin),nswlz(Nsxin,Nsyin) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
249 |
FIZHI_INIT_VARS |
nswcld(bi,bj) = 0 |