File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
11 |
SWRIO |
. ptop,nswcld,cldsw,cswmo,nswlz,swlz, |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
176 |
SWRIO |
swlz(i,j,L)=swlz(i,j,L)+qliqave(i,j,L)/imstturb |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
269 |
SWRIO |
tmpdiag(i,j) = swlz(i,j,L) * 1.0e6 |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
298 |
SWRIO |
call OPTHK(tdry,plz,plze,swlz,cldtot,cldmxo,landtype,im,jm,lm, |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
33 |
SWRIO |
_RL cldsw(im,jm,lm),cswmo(im,jm,lm),swlz(im,jm,lm) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
140 |
DO_FIZHI |
_RL swlz(sNx,sNy,Nrphys) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
223 |
DO_FIZHI |
swlz(i,j,L) = swlzin(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 |
275 |
DO_FIZHI |
swlzin(i,j,L,bi,bj) = swlz(i,j,L) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
254 |
FIZHI_INIT_VARS |
swlz(i,j,L,bi,bj) = 0. |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
140 |
DO_FIZHI |
_RL swlz(sNx,sNy,Nrphys) |
./pkg/fizhi/fizhi_swrad.F |
11 |
SWRIO |
. ptop,nswcld,cldsw,cswmo,nswlz,swlz, |
./pkg/fizhi/fizhi_swrad.F |
175 |
SWRIO |
swlz(i,j,L)=swlz(i,j,L)+qliqave(i,j,L)/imstturb |
./pkg/fizhi/fizhi_swrad.F |
268 |
SWRIO |
tmpdiag(i,j) = swlz(i,j,L) * 1.0e6 |
./pkg/fizhi/fizhi_swrad.F |
297 |
SWRIO |
call OPTHK(tdry,plz,plze,swlz,cldtot,cldmxo,landtype,im,jm,lm, |
./pkg/fizhi/fizhi_swrad.F |
33 |
SWRIO |
_RL cldsw(im,jm,lm),cswmo(im,jm,lm),swlz(im,jm,lm) |
./pkg/fizhi/fizhi_moist.F |
1031 |
MOISTIO |
swlz(i,1,L) = ( nswlz*swlz(i,1,L) + watnow)/(nswlz +1) |
./pkg/fizhi/fizhi_moist.F |
11 |
MOISTIO |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/fizhi_moist.F |
36 |
MOISTIO |
_RL cldtot_sw(im,jm,lm),swlz(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 |
94 |
FIZHI_DRIVER |
_RL swlz(im,jm,lm) |
./pkg/fizhi/fizhi_coms.h |
43 |
NO PROCEDURE |
. cldtot_sw,cldras_sw,cldlsp_sw,swlz, |
./pkg/fizhi/fizhi_coms.h |
56 |
NO PROCEDURE |
_RL swlz(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,Nsx,Nsy) |
./pkg/fizhi/fizhi_read_pickup.F |
68 |
FIZHI_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',Nrphys,swlz,12,myThid) |
./pkg/fizhi/fizhi_init_vars.F |
242 |
FIZHI_INIT_VARS |
swlz(i,j,L,bi,bj) = 0. |
./pkg/fizhi/fizhi_write_pickup.F |
92 |
FIZHI_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nrphys,swlz,12,myIter, |
./pkg/fizhi/fizhi_wrapper.F |
147 |
FIZHI_WRAPPER |
. nswcld,cldtot_sw,cldras_sw,cldlsp_sw,nswlz,swlz, |
./pkg/fizhi/do_fizhi.F |
140 |
DO_FIZHI |
_RL swlz(sNx,sNy,Nrphys) |
./pkg/fizhi/do_fizhi.F |
222 |
DO_FIZHI |
swlz(i,j,L) = swlzin(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 |
274 |
DO_FIZHI |
swlzin(i,j,L,bi,bj) = swlz(i,j,L) |