File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
132 |
DO_FIZHI |
_RL getcon, kappa, p0kappa, s0, ra |
./pkg/fizhi/do_fizhi.F |
178 |
DO_FIZHI |
call ASTRO ( 20040321,nhms, xlats,xlons, im2*jm2, cosz,ra ) |
./pkg/fizhi/do_fizhi.F |
180 |
DO_FIZHI |
call ASTRO ( nymd,nhms, xlats,xlons, im2*jm2, cosz,ra ) |
./pkg/fizhi/do_fizhi.F |
184 |
DO_FIZHI |
radswt(i,j,bi,bj) = S0*(1.0/ra**2)*cosz(i,j) |
./pkg/fizhi/fizhi_clockstuff.F |
894 |
ASTRO |
_RL getcon, cosz(irun), alat(irun), alon(irun), ra |
./pkg/fizhi/fizhi_swrad.F |
45 |
SWRIO |
_RL ra,alf,reffw,reffi,tminv |
./pkg/fizhi/fizhi_turb.F |
248 |
TURBIO |
_RL heatw,undef,timstp,delttrb,dttrb,ra |
./pkg/fizhi/fizhi_turb.F |
505 |
TURBIO |
call ASTRO ( 20040321,nhms,lats,lons,istrip,cosz,ra ) |
./pkg/fizhi/fizhi_turb.F |
507 |
TURBIO |
call ASTRO ( nymd,nhms,lats,lons,istrip,cosz,ra ) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
132 |
DO_FIZHI |
_RL getcon, kappa, p0kappa, s0, ra |
./pkg/chronos/chronos.F |
731 |
ASTRO |
_RL cosz(irun), alat(irun), alon(irun), ra |