File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
12 |
DO_FIZHI |
& o3,qstr,co2,cfc11,cfc12,cfc22,n2o,methane, |
./pkg/fizhi/do_fizhi.F |
253 |
DO_FIZHI |
& co2,cfc11,cfc12,cfc22,methane,n2o, |
./pkg/fizhi/do_fizhi.F |
69 |
DO_FIZHI |
_RL co2,cfc11,cfc12,cfc22,n2o(Nrphin),methane(Nrphin) |
./pkg/fizhi/fizhi_chemistry_coms.h |
19 |
NO PROCEDURE |
. co2, cfc11, cfc12, cfc22, ozone, stratq, n2o, methane |
./pkg/fizhi/fizhi_chemistry_coms.h |
20 |
NO PROCEDURE |
_RL co2 |
./pkg/fizhi/fizhi_driver.F |
13 |
FIZHI_DRIVER |
& chemq,chemo3,co2,cfc11,cfc12,cfc22,methane,n2o, |
./pkg/fizhi/fizhi_driver.F |
166 |
FIZHI_DRIVER |
& p,pl,ple,dpres,pkht,pkl,t,chemq,chemo3,co2, |
./pkg/fizhi/fizhi_driver.F |
189 |
FIZHI_DRIVER |
& p,pl,ple,dpres,pkht,pkl,t,chemq,chemo3,co2, |
./pkg/fizhi/fizhi_driver.F |
74 |
FIZHI_DRIVER |
_RL co2,cfc11,cfc12,cfc22,methane(lm),n2o(lm) |
./pkg/fizhi/fizhi_init_chem.F |
28 |
FIZHI_INIT_CHEM |
_RL co2,cfc11,cfc12,cfc22 |
./pkg/fizhi/fizhi_init_chem.F |
40 |
FIZHI_INIT_CHEM |
co2 = getcon('CO2' )*1.e-6 |
./pkg/fizhi/fizhi_init_chem.F |
8 |
FIZHI_INIT_CHEM |
. Nrphys,pressure,n2o,methane,co2,cfc11,cfc12,cfc22) |
./pkg/fizhi/fizhi_init_fixed.F |
140 |
FIZHI_INIT_FIXED |
& Nrphys,pressure,n2o,methane,co2,cfc11,cfc12,cfc22) |
./pkg/fizhi/fizhi_lwrad.F |
213 |
LWRIO |
call IRRAD ( istrip,1,1,lm,ple,tzl,shzl,ozl,tsurf,co2, |
./pkg/fizhi/fizhi_lwrad.F |
25 |
LWRIO |
_RL co2,cfc11,cfc12,cfc22,methane(lm),n2o(lm) |
./pkg/fizhi/fizhi_lwrad.F |
346 |
IRRAD |
subroutine IRRAD (m,n,ndim,np,pl,ta,wa,oa,ts,co2, |
./pkg/fizhi/fizhi_lwrad.F |
571 |
IRRAD |
_RL co2,n2o(np),ch4(np),cfc11,cfc12,cfc22,emiss(m,ndim,10) |
./pkg/fizhi/fizhi_lwrad.F |
916 |
IRRAD |
dco2 (i,j,k) = 789.*co2*dp+1.e-10 |
./pkg/fizhi/fizhi_lwrad.F |
9 |
LWRIO |
. co2,cfc11,cfc12,cfc22,methane,n2o,emissivity, |
./pkg/fizhi/fizhi_swrad.F |
26 |
SWRIO |
_RL co2 |
./pkg/fizhi/fizhi_swrad.F |
461 |
SWRIO |
call SORAD ( istrip,1,1,lm,ple,tzl,qzl,ozl,co2, |
./pkg/fizhi/fizhi_swrad.F |
665 |
SORAD |
subroutine SORAD(m,n,ndim,np,pl,ta,wa,oa,co2, |
./pkg/fizhi/fizhi_swrad.F |
776 |
SORAD |
* rsuvbm(m,ndim),rsuvdf(m,ndim),cosz(m,ndim),co2 |
./pkg/fizhi/fizhi_swrad.F |
7 |
SWRIO |
. pz,plz,plze,dpres,pkht,pkz,tz,qz,oz,co2, |
./pkg/fizhi/fizhi_swrad.F |
896 |
SORAD |
so2(i,j,k+1)=so2(i,j,k)+co2*789.*scal(i,j,k) |
./pkg/fizhi/fizhi_wrapper.F |
270 |
FIZHI_WRAPPER |
& o3,qstr,co2,cfc11,cfc12,cfc22,n2o,methane, |
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
119 |
FIZHI_INIT_FIXED |
& Nrphys,pressure,n2o,methane,co2,cfc11,cfc12,cfc22) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
12 |
DO_FIZHI |
& o3,qstr,co2,cfc11,cfc12,cfc22,n2o,methane, |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
69 |
DO_FIZHI |
_RL co2,cfc11,cfc12,cfc22,n2o(Nrphin),methane(Nrphin) |
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
119 |
FIZHI_INIT_FIXED |
& Nrphys,pressure,n2o,methane,co2,cfc11,cfc12,cfc22) |