| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
125 |
DO_FIZHI |
_RL fdirpar(sNx,sNy,nSx,nSy),fdifpar(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 |
258 |
DO_FIZHI |
& radswg(1,1,bi,bj),swgclr(1,1,bi,bj),fdirpar(1,1,bi,bj), |
|
./pkg/fizhi/fizhi_driver.F |
168 |
FIZHI_DRIVER |
& radswg,swgclr,fdifpar,fdirpar,osr,osrclr, |
|
./pkg/fizhi/fizhi_driver.F |
16 |
FIZHI_DRIVER |
& radswg,swgclr,fdirpar,fdifpar,osr,osrclr,tg0,radlwg,lwgclr, |
|
./pkg/fizhi/fizhi_driver.F |
211 |
FIZHI_DRIVER |
& fdifpar,fdirpar,rainlsp,raincon,snowfall,tg0, |
|
./pkg/fizhi/fizhi_driver.F |
86 |
FIZHI_DRIVER |
_RL fdirpar(im,jm),fdifpar(im,jm),osr(im,jm),osrclr(im,jm) |
|
./pkg/fizhi/fizhi_swrad.F |
10 |
SWRIO |
. fdifpar,fdirpar,osr,osrclr, |
|
./pkg/fizhi/fizhi_swrad.F |
1571 |
SOLUV |
* ,fdirpar,fdifpar,fdiruv,fdifuv) |
|
./pkg/fizhi/fizhi_swrad.F |
1664 |
SOLUV |
_RL fdirpar(m,ndim),fdifpar(m,ndim) |
|
./pkg/fizhi/fizhi_swrad.F |
1928 |
SOLUV |
fdirpar(i,j)=fsdir(i,j)*hk(ib) |
|
./pkg/fizhi/fizhi_swrad.F |
29 |
SWRIO |
_RL radswg(im,jm),swgclr(im,jm),fdifpar(im,jm),fdirpar(im,jm) |
|
./pkg/fizhi/fizhi_swrad.F |
488 |
SWRIO |
call PASTE ( dirpar,fdirpar,istrip,im*jm,1,nn ) |
|
./pkg/fizhi/fizhi_swrad.F |
668 |
SORAD |
* flx,flc,fdirir,fdifir,fdirpar,fdifpar, |
|
./pkg/fizhi/fizhi_swrad.F |
782 |
SORAD |
_RL fdirpar(m,ndim),fdifpar(m,ndim) |
|
./pkg/fizhi/fizhi_swrad.F |
866 |
SORAD |
* ,fdirpar,fdifpar,fdiruv,fdifuv) |
|
./pkg/fizhi/fizhi_turb.F |
138 |
TURBIO |
_RL fdifpar(im*jm,1),fdirpar(im*jm,1) |
|
./pkg/fizhi/fizhi_turb.F |
342 |
TURBIO |
tmpdiag(i,1) = fdirpar(i,1) * radswt(i,1) |
|
./pkg/fizhi/fizhi_turb.F |
34 |
TURBIO |
9 ,fdifpar,fdirpar,rainlsp,rainconv,snowfall,tempref |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
125 |
DO_FIZHI |
_RL fdirpar(sNx,sNy,nSx,nSy),fdifpar(sNx,sNy,nSx,nSy) |