File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
138 |
DO_FIZHI |
_RL cldras_sw(sNx,sNy,Nrphys) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
222 |
DO_FIZHI |
cldras_sw(i,j,L) = cldrasswin(i,j,L,bi,bj) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
259 |
DO_FIZHI |
. nswcld(bi,bj),cldtot_sw,cldras_sw,cldlsp_sw,nswlz(bi,bj),swlz, |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
274 |
DO_FIZHI |
cldrasswin(i,j,L,bi,bj) = cldras_sw(i,j,L) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
261 |
FIZHI_INIT_VARS |
cldras_sw(i,j,L,bi,bj) = 0. |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
138 |
DO_FIZHI |
_RL cldras_sw(sNx,sNy,Nrphys) |
./pkg/fizhi/fizhi_moist.F |
1018 |
MOISTIO |
cldras = min( max(cldras_sw(i,1,L)*cldras_mem, cpen(i,1,L)), |
./pkg/fizhi/fizhi_moist.F |
1034 |
MOISTIO |
cldras_sw(i,1,L) = (nswcld*cldras_sw(i,1,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_driver.F |
165 |
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 |
245 |
FIZHI_DRIVER |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_driver.F |
92 |
FIZHI_DRIVER |
_RL cldtot_sw(im,jm,lm),cldras_sw(im,jm,lm) |
./pkg/fizhi/fizhi_coms.h |
43 |
NO PROCEDURE |
. cldtot_sw,cldras_sw,cldlsp_sw,swlz, |
./pkg/fizhi/fizhi_coms.h |
54 |
NO PROCEDURE |
_RL cldras_sw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
./pkg/fizhi/fizhi_read_pickup.F |
66 |
FIZHI_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',Nrphys,cldras_sw,10,myThid) |
./pkg/fizhi/fizhi_init_vars.F |
249 |
FIZHI_INIT_VARS |
cldras_sw(i,j,L,bi,bj) = 0. |
./pkg/fizhi/fizhi_write_pickup.F |
88 |
FIZHI_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nrphys,cldras_sw,10,myIter, |
./pkg/fizhi/fizhi_wrapper.F |
147 |
FIZHI_WRAPPER |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/do_fizhi.F |
138 |
DO_FIZHI |
_RL cldras_sw(sNx,sNy,Nrphys) |
./pkg/fizhi/do_fizhi.F |
221 |
DO_FIZHI |
cldras_sw(i,j,L) = cldrasswin(i,j,L,bi,bj) |
./pkg/fizhi/do_fizhi.F |
258 |
DO_FIZHI |
. nswcld(bi,bj),cldtot_sw,cldras_sw,cldlsp_sw,nswlz(bi,bj),swlz, |
./pkg/fizhi/do_fizhi.F |
273 |
DO_FIZHI |
cldrasswin(i,j,L,bi,bj) = cldras_sw(i,j,L) |