File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_utils.F |
735 |
CHPPRM |
_RL facm,facp |
./pkg/fizhi/fizhi_utils.F |
866 |
CHPPRM |
call INTERP_TIME ( nymd,nhms, nymd1,nhms1, nymd2,nhms2, facm,facp) |
./pkg/fizhi/fizhi_utils.F |
870 |
CHPPRM |
zoch(i) = vgz0(k2,ityp(i))*facp + vgz0(k1,ityp(i))*facm |
./pkg/fizhi/fizhi_utils.F |
871 |
CHPPRM |
rdcs(i) = vgrd(k2,ityp(i))*facp + vgrd(k1,ityp(i))*facm |
./pkg/fizhi/fizhi_utils.F |
873 |
CHPPRM |
rootl = vgrt(k2,ityp(i))*facp + vgrt(k1,ityp(i))*facm |
./pkg/fizhi/fizhi_utils.F |
887 |
CHPPRM |
d = vgdd(k2,ityp(i))*facp + vgdd(k1,ityp(i))*facm |
./pkg/fizhi/update_chemistry_exports.F |
38 |
UPDATE_CHEMISTRY_EXPORTS |
_RL facm, facp |
./pkg/fizhi/update_chemistry_exports.F |
82 |
UPDATE_CHEMISTRY_EXPORTS |
call INTERP_TIME(nymd,nhms,nymd1,nhms1,nymd2,nhms2,facm,facp) |
./pkg/fizhi/update_chemistry_exports.F |
86 |
UPDATE_CHEMISTRY_EXPORTS |
oz1(j,L) = ozone(j,L,imns)*facm + ozone(j,L,ipls)*facp |
./pkg/fizhi/update_chemistry_exports.F |
92 |
UPDATE_CHEMISTRY_EXPORTS |
strq1(j,L) = stratq(j,L,imns)*facm + stratq(j,L,ipls)*facp |