File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
127 |
DO_FIZHI |
_RL tg0(sNx,sNy,nSx,nSy),radlwg(sNx,sNy,nSx,nSy) |
./pkg/fizhi/do_fizhi.F |
157 |
DO_FIZHI |
COMMON /saver/ radswg,swgclr,fdirpar,fdifpar,osr,osrclr,tg0,radlwg |
./pkg/fizhi/do_fizhi.F |
260 |
DO_FIZHI |
& tg0(1,1,bi,bj),radlwg(1,1,bi,bj),lwgclr(1,1,bi,bj), |
./pkg/fizhi/do_fizhi.F |
304 |
DO_FIZHI |
& dlwdtg(i,j,L,bi,bj) * (tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) + |
./pkg/fizhi/do_fizhi.F |
313 |
DO_FIZHI |
& radswt,radswg,swgclr,osr,osrclr,st4,dst4,tgz,tg0,radlwg,lwgclr, |
./pkg/fizhi/fizhi_driver.F |
16 |
FIZHI_DRIVER |
& radswg,swgclr,fdirpar,fdifpar,osr,osrclr,tg0,radlwg,lwgclr, |
./pkg/fizhi/fizhi_driver.F |
183 |
FIZHI_DRIVER |
tg0(i,j) = tgz(i,j) |
./pkg/fizhi/fizhi_driver.F |
211 |
FIZHI_DRIVER |
& fdifpar,fdirpar,rainlsp,raincon,snowfall,tg0, |
./pkg/fizhi/fizhi_driver.F |
87 |
FIZHI_DRIVER |
_RL tg0(im,jm),radlwg(im,jm),lwgclr(im,jm),st4(im,jm) |
./pkg/fizhi/fizhi_step_diag.F |
132 |
FIZHI_STEP_DIAG |
& + dst4(i,j,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) |
./pkg/fizhi/fizhi_step_diag.F |
144 |
FIZHI_STEP_DIAG |
& dst4(i,j,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) |
./pkg/fizhi/fizhi_step_diag.F |
156 |
FIZHI_STEP_DIAG |
& dst4(i,j,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) |
./pkg/fizhi/fizhi_step_diag.F |
195 |
FIZHI_STEP_DIAG |
& dlwdtg(i,j,L,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) + |
./pkg/fizhi/fizhi_step_diag.F |
223 |
FIZHI_STEP_DIAG |
& dlwdtg (i,j,L,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) ) |
./pkg/fizhi/fizhi_step_diag.F |
237 |
FIZHI_STEP_DIAG |
& dlwdtg (i,j,L,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) ) |
./pkg/fizhi/fizhi_step_diag.F |
25 |
FIZHI_STEP_DIAG |
_RL tg0(im2,jm2,Nbi,Nbj),radlwg(im2,jm2,Nbi,Nbj) |
./pkg/fizhi/fizhi_step_diag.F |
389 |
FIZHI_STEP_DIAG |
& dlwdtg(i,j,L,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj)) ) |
./pkg/fizhi/fizhi_step_diag.F |
6 |
FIZHI_STEP_DIAG |
& radswt,radswg,swgclr,osr,osrclr,st4,dst4,tgz,tg0,radlwg,lwgclr, |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
127 |
DO_FIZHI |
_RL tg0(sNx,sNy,nSx,nSy),radlwg(sNx,sNy,nSx,nSy) |