File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
139 |
DO_FIZHI |
_RL cldras_sw(sNx,sNy,Nrphys) |
./pkg/fizhi/do_fizhi.F |
226 |
DO_FIZHI |
cldras_sw(i,j,L) = cldrasswin(i,j,L,bi,bj) |
./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 |
279 |
DO_FIZHI |
cldrasswin(i,j,L,bi,bj) = cldras_sw(i,j,L) |
./pkg/fizhi/fizhi_coms.h |
42 |
NO PROCEDURE |
& cldtot_sw,cldras_sw,cldlsp_sw,swlz, |
./pkg/fizhi/fizhi_coms.h |
53 |
NO PROCEDURE |
_RL cldras_sw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,nSx,nSy) |
./pkg/fizhi/fizhi_driver.F |
169 |
FIZHI_DRIVER |
& ptop,nswcld,cldtot_sw,cldras_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_driver.F |
19 |
FIZHI_DRIVER |
& cldras_sw,cldlsp_sw,nswlz,swlz,imstturbsw,imstturblw,qliqavesw, |
./pkg/fizhi/fizhi_driver.F |
250 |
FIZHI_DRIVER |
& nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_driver.F |
94 |
FIZHI_DRIVER |
_RL cldtot_sw(im,jm,lm),cldras_sw(im,jm,lm) |
./pkg/fizhi/fizhi_init_vars.F |
270 |
FIZHI_INIT_VARS |
cldras_sw(i,j,L,bi,bj) = 0. |
./pkg/fizhi/fizhi_moist.F |
1075 |
MOISTIO |
cldras = min( max(cldras_sw(i,j,L)*cldras_mem, cpen(i,j,L)), |
./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 |
11 |
MOISTIO |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_moist.F |
35 |
MOISTIO |
_RL cldlsp_sw(im,jm,lm),cldras_sw(im,jm,lm) |
./pkg/fizhi/fizhi_read_pickup.F |
65 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldras_sw,10,myIter,myThid ) |
./pkg/fizhi/fizhi_wrapper.F |
272 |
FIZHI_WRAPPER |
& nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_write_pickup.F |
83 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldras_sw,10,myIter,myThid) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
139 |
DO_FIZHI |
_RL cldras_sw(sNx,sNy,Nrphys) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
262 |
FIZHI_INIT_VARS |
cldras_sw(i,j,L,bi,bj) = 0. |