| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
136 |
DO_FIZHI |
_RL cldlsp_lw(sNx,sNy,Nrphys) |
|
./pkg/fizhi/do_fizhi.F |
219 |
DO_FIZHI |
cldlsp_lw(i,j,L) = cldlsplwin(i,j,L,bi,bj) |
|
./pkg/fizhi/do_fizhi.F |
263 |
DO_FIZHI |
& nlwcld(bi,bj),cldtot_lw,cldras_lw,cldlsp_lw,nlwlz(bi,bj),lwlz, |
|
./pkg/fizhi/do_fizhi.F |
272 |
DO_FIZHI |
cldlsplwin(i,j,L,bi,bj) = cldlsp_lw(i,j,L) |
|
./pkg/fizhi/fizhi_coms.h |
41 |
NO PROCEDURE |
COMMON /physics_saver/ cldtot_lw,cldras_lw,cldlsp_lw,lwlz, |
|
./pkg/fizhi/fizhi_coms.h |
50 |
NO PROCEDURE |
_RL cldlsp_lw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,nSx,nSy) |
|
./pkg/fizhi/fizhi_driver.F |
18 |
FIZHI_DRIVER |
& cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz,nswcld,cldtot_sw, |
|
./pkg/fizhi/fizhi_driver.F |
251 |
FIZHI_DRIVER |
& nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz, |
|
./pkg/fizhi/fizhi_driver.F |
92 |
FIZHI_DRIVER |
_RL cldlsp_lw(im,jm,lm) |
|
./pkg/fizhi/fizhi_init_vars.F |
274 |
FIZHI_INIT_VARS |
cldlsp_lw(i,j,L,bi,bj) = 0. |
|
./pkg/fizhi/fizhi_moist.F |
1057 |
MOISTIO |
cldlsp = min( max( cldlsp_lw(i,j,L)*cldlsp_mem,cldls(i,j,L)), |
|
./pkg/fizhi/fizhi_moist.F |
1067 |
MOISTIO |
cldlsp_lw(i,j,L) = (nlwcld*cldlsp_lw(i,j,L) + cldlsp)/(nlwcld+1) |
|
./pkg/fizhi/fizhi_moist.F |
12 |
MOISTIO |
. nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz, |
|
./pkg/fizhi/fizhi_moist.F |
38 |
MOISTIO |
_RL cldlsp_lw(im,jm,lm),cldras_lw(im,jm,lm) |
|
./pkg/fizhi/fizhi_read_pickup.F |
62 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldlsp_lw, 7,myIter,myThid ) |
|
./pkg/fizhi/fizhi_wrapper.F |
271 |
FIZHI_WRAPPER |
& iras,nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz, |
|
./pkg/fizhi/fizhi_write_pickup.F |
80 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldlsp_lw, 7,myIter,myThid) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
136 |
DO_FIZHI |
_RL cldlsp_lw(sNx,sNy,Nrphys) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
266 |
FIZHI_INIT_VARS |
cldlsp_lw(i,j,L,bi,bj) = 0. |