File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
134 |
DO_FIZHI |
_RL cldras_lw(sNx,sNy,Nrphys) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
216 |
DO_FIZHI |
cldras_lw(i,j,L) = cldraslwin(i,j,L,bi,bj) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
258 |
DO_FIZHI |
. nlwcld(bi,bj),cldtot_lw,cldras_lw,cldlsp_lw,nlwlz(bi,bj),lwlz, |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
268 |
DO_FIZHI |
cldraslwin(i,j,L,bi,bj) = cldras_lw(i,j,L) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
264 |
FIZHI_INIT_VARS |
cldras_lw(i,j,L,bi,bj) = 0. |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
134 |
DO_FIZHI |
_RL cldras_lw(sNx,sNy,Nrphys) |
./pkg/fizhi/fizhi_moist.F |
1011 |
MOISTIO |
cldras_lw(i,1,L) = (nlwcld*cldras_lw(i,1,L) + cldras)/(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_moist.F |
995 |
MOISTIO |
cldras = min( max( cldras_lw(i,1,L)*cldras_mem,cpen(i,1,L)), |
./pkg/fizhi/fizhi_driver.F |
188 |
FIZHI_DRIVER |
. nlwcld,cldtot_lw,cldras_lw,nlwlz,lwlz, |
./pkg/fizhi/fizhi_driver.F |
18 |
FIZHI_DRIVER |
. cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz,nswcld,cldtot_sw, |
./pkg/fizhi/fizhi_driver.F |
246 |
FIZHI_DRIVER |
. nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz, |
./pkg/fizhi/fizhi_driver.F |
89 |
FIZHI_DRIVER |
_RL cldtot_lw(im,jm,lm),cldras_lw(im,jm,lm) |
./pkg/fizhi/fizhi_coms.h |
42 |
NO PROCEDURE |
common /physics_saver/ cldtot_lw,cldras_lw,cldlsp_lw,lwlz, |
./pkg/fizhi/fizhi_coms.h |
50 |
NO PROCEDURE |
_RL cldras_lw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
./pkg/fizhi/fizhi_read_pickup.F |
62 |
FIZHI_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',Nrphys,cldras_lw,6,myThid) |
./pkg/fizhi/fizhi_init_vars.F |
252 |
FIZHI_INIT_VARS |
cldras_lw(i,j,L,bi,bj) = 0. |
./pkg/fizhi/fizhi_write_pickup.F |
80 |
FIZHI_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nrphys,cldras_lw,6,myIter, |
./pkg/fizhi/fizhi_wrapper.F |
146 |
FIZHI_WRAPPER |
. iras,nlwcld,cldtot_lw,cldras_lw,cldlsp_lw,nlwlz,lwlz, |
./pkg/fizhi/do_fizhi.F |
134 |
DO_FIZHI |
_RL cldras_lw(sNx,sNy,Nrphys) |
./pkg/fizhi/do_fizhi.F |
215 |
DO_FIZHI |
cldras_lw(i,j,L) = cldraslwin(i,j,L,bi,bj) |
./pkg/fizhi/do_fizhi.F |
257 |
DO_FIZHI |
. nlwcld(bi,bj),cldtot_lw,cldras_lw,cldlsp_lw,nlwlz(bi,bj),lwlz, |
./pkg/fizhi/do_fizhi.F |
267 |
DO_FIZHI |
cldraslwin(i,j,L,bi,bj) = cldras_lw(i,j,L) |