| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
132 |
DO_FIZHI |
_RL getcon, kappa, p0kappa, s0, ra |
|
./pkg/fizhi/do_fizhi.F |
165 |
DO_FIZHI |
kappa = getcon('KAPPA') |
|
./pkg/fizhi/do_fizhi.F |
167 |
DO_FIZHI |
S0 = getcon('S0') |
|
./pkg/fizhi/fizhi_clockstuff.F |
894 |
ASTRO |
_RL getcon, cosz(irun), alat(irun), alon(irun), ra |
|
./pkg/fizhi/fizhi_clockstuff.F |
928 |
ASTRO |
pi = getcon('PI') |
|
./pkg/fizhi/fizhi_clockstuff.F |
929 |
ASTRO |
dg2rd = getcon('DEG2RAD') |
|
./pkg/fizhi/fizhi_clockstuff.F |
930 |
ASTRO |
yrlen = getcon('YRLEN') |
|
./pkg/fizhi/fizhi_clockstuff.F |
931 |
ASTRO |
ob = getcon('OBLDEG') * dg2rd |
|
./pkg/fizhi/fizhi_clockstuff.F |
932 |
ASTRO |
daylen = getcon('SDAY') |
|
./pkg/fizhi/fizhi_clockstuff.F |
933 |
ASTRO |
eqnx = getcon('VERNAL EQUINOX') |
|
./pkg/fizhi/fizhi_clockstuff.F |
934 |
ASTRO |
ecc = getcon('ECCENTRICITY') |
|
./pkg/fizhi/fizhi_clockstuff.F |
935 |
ASTRO |
per = getcon('PERIHELION') * dg2rd |
|
./pkg/fizhi/fizhi_driver.F |
120 |
FIZHI_DRIVER |
_RL akap,getcon |
|
./pkg/fizhi/fizhi_driver.F |
129 |
FIZHI_DRIVER |
akap = getcon('KAPPA') |
|
./pkg/fizhi/fizhi_fillnegs.F |
108 |
TRACER_FILL |
a = getcon('EARTH RADIUS') |
|
./pkg/fizhi/fizhi_fillnegs.F |
183 |
TRACER_FILL |
undef = getcon('UNDEF') |
|
./pkg/fizhi/fizhi_fillnegs.F |
92 |
TRACER_FILL |
_RL pi,a,getcon,undef |
|
./pkg/fizhi/fizhi_gwdrag.F |
79 |
GWDRAG |
_RL getcon, pi |
|
./pkg/fizhi/fizhi_gwdrag.F |
90 |
GWDRAG |
grav = getcon('GRAVITY') |
|
./pkg/fizhi/fizhi_gwdrag.F |
91 |
GWDRAG |
rgas = getcon('RGAS') |
|
./pkg/fizhi/fizhi_gwdrag.F |
92 |
GWDRAG |
cp = getcon('CP') |
|
./pkg/fizhi/fizhi_gwdrag.F |
94 |
GWDRAG |
lstar = 2*getcon('EARTH RADIUS')*cos(pi/3.0)/imglobal |
|
./pkg/fizhi/fizhi_init_chem.F |
30 |
FIZHI_INIT_CHEM |
_RL getcon |
|
./pkg/fizhi/fizhi_init_chem.F |
40 |
FIZHI_INIT_CHEM |
co2 = getcon('CO2' )*1.e-6 |
|
./pkg/fizhi/fizhi_init_chem.F |
41 |
FIZHI_INIT_CHEM |
cfc11 = getcon('CFC11')*1.e-9 |
|
./pkg/fizhi/fizhi_init_chem.F |
42 |
FIZHI_INIT_CHEM |
cfc12 = getcon('CFC12')*1.e-9 |
|
./pkg/fizhi/fizhi_init_chem.F |
43 |
FIZHI_INIT_CHEM |
cfc22 = getcon('CFC22')*1.e-9 |
|
./pkg/fizhi/fizhi_lwrad.F |
73 |
LWRIO |
_RL getcon,secday,convrt |
|
./pkg/fizhi/fizhi_moist.F |
142 |
MOISTIO |
_RL tice,getcon,pi |
|
./pkg/fizhi/fizhi_moist.F |
196 |
MOISTIO |
tice = getcon('FREEZING-POINT') |
|
./pkg/fizhi/fizhi_moist.F |
2404 |
RNEVP |
_RL getcon,rphf,elocp,cpog,relax |
|
./pkg/fizhi/fizhi_moist.F |
2417 |
RNEVP |
tice = getcon('FREEZING-POINT') |
|
./pkg/fizhi/fizhi_moist.F |
2624 |
SRCLOUDS |
_RL cp, alhl, getcon, akap |
|
./pkg/fizhi/fizhi_moist.F |
2640 |
SRCLOUDS |
cp = getcon('CP') |
|
./pkg/fizhi/fizhi_moist.F |
2641 |
SRCLOUDS |
alhl = getcon('LATENT HEAT COND') |
|
./pkg/fizhi/fizhi_moist.F |
2643 |
SRCLOUDS |
akap = getcon('KAPPA') |
|
./pkg/fizhi/fizhi_moist.F |
2679 |
CTEI |
_RL getcon,cp,alhl,elocp,cpoel,t,p,s,qs,dqsdt,dq |
|
./pkg/fizhi/fizhi_moist.F |
2682 |
CTEI |
cp = getcon('CP') |
|
./pkg/fizhi/fizhi_moist.F |
2683 |
CTEI |
alhl = getcon('LATENT HEAT COND') |
|
./pkg/fizhi/fizhi_rayleigh.F |
48 |
RAYLEIGH |
_RL cpog, cpinv, virtcon, getcon, dampcoef |
|
./pkg/fizhi/fizhi_rayleigh.F |
59 |
RAYLEIGH |
cpog = getcon('CP')/getcon('GRAVITY') |
|
./pkg/fizhi/fizhi_rayleigh.F |
60 |
RAYLEIGH |
cpinv = 1.0/getcon('CP') |
|
./pkg/fizhi/fizhi_rayleigh.F |
61 |
RAYLEIGH |
virtcon = getcon('VIRTCON') |
|
./pkg/fizhi/fizhi_step_diag.F |
42 |
FIZHI_STEP_DIAG |
_RL getcon, gravity |
|
./pkg/fizhi/fizhi_step_diag.F |
430 |
FIZHI_STEP_DIAG |
gravity = getcon('GRAVITY') |
|
./pkg/fizhi/fizhi_swrad.F |
105 |
SWRIO |
grav = getcon('GRAVITY') |
|
./pkg/fizhi/fizhi_swrad.F |
106 |
SWRIO |
cp = getcon('CP') |
|
./pkg/fizhi/fizhi_swrad.F |
107 |
SWRIO |
undef = getcon('UNDEF') |
|
./pkg/fizhi/fizhi_swrad.F |
44 |
SWRIO |
_RL getcon,grav,cp,undef |
|
./pkg/fizhi/fizhi_tendency_apply.F |
206 |
FIZHI_TENDENCY_APPLY_T |
_RL rayleighdrag,getcon,cp,kappa,pNrkappa |
|
./pkg/fizhi/fizhi_tendency_apply.F |
215 |
FIZHI_TENDENCY_APPLY_T |
cp = getcon('CP') |
|
./pkg/fizhi/fizhi_tendency_apply.F |
216 |
FIZHI_TENDENCY_APPLY_T |
kappa = getcon('KAPPA') |
|
./pkg/fizhi/fizhi_turb.F |
1440 |
TRBFLX |
_RL getcon,dum,errf |
|
./pkg/fizhi/fizhi_turb.F |
1445 |
TRBFLX |
vk = getcon('VON KARMAN') |
|
./pkg/fizhi/fizhi_turb.F |
2415 |
SFCFLX |
_RL getcon,vk,rvk,vk2,bmdl |
|
./pkg/fizhi/fizhi_turb.F |
2419 |
SFCFLX |
vk = getcon('VON KARMAN') |
|
./pkg/fizhi/fizhi_turb.F |
247 |
TURBIO |
_RL faceps,grav,caltoj,virtcon,getcon |
|
./pkg/fizhi/fizhi_turb.F |
270 |
TURBIO |
secday = getcon('SDAY') |
|
./pkg/fizhi/fizhi_turb.F |
271 |
TURBIO |
sdayopi2 = getcon('SDAY') / (pi*2.) |
|
./pkg/fizhi/fizhi_turb.F |
272 |
TURBIO |
rgas = getcon('RGAS') |
|
./pkg/fizhi/fizhi_turb.F |
273 |
TURBIO |
akap = getcon('KAPPA') |
|
./pkg/fizhi/fizhi_turb.F |
274 |
TURBIO |
cp = getcon('CP') |
|
./pkg/fizhi/fizhi_turb.F |
275 |
TURBIO |
alhl = getcon('LATENT HEAT COND') |
|
./pkg/fizhi/fizhi_turb.F |
276 |
TURBIO |
faceps = getcon('EPSFAC') |
|
./pkg/fizhi/fizhi_turb.F |
277 |
TURBIO |
grav = getcon('GRAVITY') |
|
./pkg/fizhi/fizhi_turb.F |
278 |
TURBIO |
caltoj = getcon('CALTOJ') |
|
./pkg/fizhi/fizhi_turb.F |
279 |
TURBIO |
virtcon = getcon('VIRTCON') |
|
./pkg/fizhi/fizhi_turb.F |
280 |
TURBIO |
heatw = getcon('HEATW') |
|
./pkg/fizhi/fizhi_turb.F |
281 |
TURBIO |
undef = getcon('UNDEF') |
|
./pkg/fizhi/fizhi_turb.F |
305 |
TURBIO |
tice = getcon('FREEZING-POINT') |
|
./pkg/fizhi/fizhi_turb.F |
4157 |
LINADJ |
_RL getcon,vk,bmdl,b2uhs |
|
./pkg/fizhi/fizhi_turb.F |
4160 |
LINADJ |
vk = getcon('VON KARMAN') |
|
./pkg/fizhi/fizhi_turb.F |
4541 |
SEAICE |
_RL faceps,getcon,latent,codt,deltg,hice |
|
./pkg/fizhi/fizhi_turb.F |
4544 |
SEAICE |
faceps = getcon('EPSFAC') |
|
./pkg/fizhi/fizhi_turb.F |
4545 |
SEAICE |
latent = getcon('HEATI') * getcon('CALTOJ') |
|
./pkg/fizhi/fizhi_utils.F |
625 |
PASTE2GRD |
_RL undef,getcon |
|
./pkg/fizhi/fizhi_utils.F |
632 |
PASTE2GRD |
undef = getcon('UNDEF') |
|
./pkg/fizhi/fizhi_utils.F |
734 |
CHPPRM |
_RL getcon,vkrm,rootl,vroot,dum1,dum2,alphaf |
|
./pkg/fizhi/fizhi_utils.F |
924 |
PKAPPA |
_RL akap1,getcon |
|
./pkg/fizhi/fizhi_utils.F |
927 |
PKAPPA |
akap1 = 1.0 + getcon('KAPPA') |
|
./pkg/fizhi/fizhi_wrapper.F |
55 |
FIZHI_WRAPPER |
_RL grav, getcon |
|
./pkg/fizhi/fizhi_wrapper.F |
57 |
FIZHI_WRAPPER |
grav = getcon('GRAVITY') |
|
./pkg/fizhi/slprs.F |
31 |
SLPRS |
_RL getcon,g,r,ak |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
52 |
INI_SALT |
_RL getcon, kappa, dum, pinmb |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
66 |
INI_SALT |
kappa = getcon('KAPPA') |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
253 |
GETSST |
_RL getcon |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
259 |
GETSST |
deg2rad = getcon('DEG2RAD') |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
260 |
GETSST |
pi = getcon('PI') |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
132 |
DO_FIZHI |
_RL getcon, kappa, p0kappa, s0, ra |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
165 |
DO_FIZHI |
pi = getcon('PI') |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
166 |
DO_FIZHI |
atm_kappa = getcon('KAPPA') |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
167 |
DO_FIZHI |
atm_po = getcon('ATMPOPA') |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
168 |
DO_FIZHI |
deg2rad = getcon('DEG2RAD') |
|
./pkg/diagnostics/diag_vegtile_fill.F |
75 |
DIAG_VEGTILE_FILL |
_RL getcon |
|
./pkg/diagnostics/diag_vegtile_fill.F |
84 |
DIAG_VEGTILE_FILL |
IF ( check ) undef = getcon('UNDEF') |
|
./pkg/diagnostics/diagnostics_fill_state.F |
414 |
DIAGNOSTICS_FILL_STATE |
kappa = getcon('KAPPA') |
|
./pkg/diagnostics/diagnostics_fill_state.F |
56 |
DIAGNOSTICS_FILL_STATE |
_RL dummy1, dummy2, dummy3, dummy4, kappa, getcon |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
60 |
DIAGNOSTICS_INTERP_VERT |
_RL getcon |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
87 |
DIAGNOSTICS_INTERP_VERT |
IF ( useFIZHI ) kappa = getcon('KAPPA') |
|
./pkg/diagnostics/diagnostics_readparms.F |
245 |
DIAGNOSTICS_READPARMS |
IF ( useFIZHI ) misValFlt(n) = getcon('UNDEF') |
|
./pkg/diagnostics/diagnostics_readparms.F |
36 |
DIAGNOSTICS_READPARMS |
_RL getcon |
|
./pkg/diagnostics/diagstats_local.F |
103 |
DIAGSTATS_LOCAL |
specialVal = getcon('UNDEF') |
|
./pkg/diagnostics/diagstats_local.F |
80 |
DIAGSTATS_LOCAL |
_RL getcon |
|
./pkg/diagnostics/diagstats_output.F |
43 |
DIAGSTATS_OUTPUT |
_RL getcon |
|
./pkg/diagnostics/diagstats_output.F |
63 |
DIAGSTATS_OUTPUT |
IF ( useFIZHI ) undef = getcon('UNDEF') |