File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_gwdrag.F |
172 |
GWDRAG |
. plstr,plestr,dpresstr,grav,rgas,cp, |
./pkg/fizhi/fizhi_gwdrag.F |
297 |
GWDD |
. grav,rgas,cp,irun,Lm,nthin,nbase,lstar ) |
./pkg/fizhi/fizhi_gwdrag.F |
347 |
GWDD |
_RL grav, rgas, cp |
./pkg/fizhi/fizhi_gwdrag.F |
379 |
GWDD |
gocp = grav/cp |
./pkg/fizhi/fizhi_gwdrag.F |
80 |
GWDRAG |
_RL grav, rgas, cp, cpinv, lstar |
./pkg/fizhi/fizhi_gwdrag.F |
92 |
GWDRAG |
cp = getcon('CP') |
./pkg/fizhi/fizhi_gwdrag.F |
93 |
GWDRAG |
cpinv = 1.0/cp |
./pkg/fizhi/fizhi_moist.F |
1180 |
RAS |
*, cp,grav,rkappa,alhl,rhfrac,rasmax ) |
./pkg/fizhi/fizhi_moist.F |
1199 |
RAS |
_RL cp,grav,rkappa,alhl,rhfrac(lng),rasmax |
./pkg/fizhi/fizhi_moist.F |
140 |
MOISTIO |
_RL tmstp,tminv,sday,grav,alhl,cp,elocp,gamfac |
./pkg/fizhi/fizhi_moist.F |
1638 |
CLOUD |
_RL frac, cp, alhl, rkap, grav, p00, crtmsf |
./pkg/fizhi/fizhi_moist.F |
2367 |
RNEVP |
2 tmfrc,cp,gravity,alhl,gamfac,cldlz,RHCRIT,offset,alpha) |
./pkg/fizhi/fizhi_moist.F |
2379 |
RNEVP |
_RL tmscl,tmfrc,cp,gravity,alhl,gamfac,offset,alpha |
./pkg/fizhi/fizhi_moist.F |
2429 |
RNEVP |
ELOCP = alhl/cp |
./pkg/fizhi/fizhi_moist.F |
2430 |
RNEVP |
CPOG = cp/gravity |
./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 |
2642 |
SRCLOUDS |
elocp = alhl/cp |
./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 |
2684 |
CTEI |
cpoel = cp/alhl |
./pkg/fizhi/fizhi_moist.F |
2685 |
CTEI |
elocp = alhl/cp |
./pkg/fizhi/fizhi_moist.F |
536 |
MOISTIO |
8, cp,grav,rkappa,alhl,rhfrac(num),rasmax ) |
./pkg/fizhi/fizhi_moist.F |
656 |
MOISTIO |
. CLSBTH,TMSTP,one,cp,grav,alhl,gamfac,cldlz,rhcrit,offset,alpha) |
./pkg/fizhi/fizhi_swrad.F |
106 |
SWRIO |
cp = getcon('CP') |
./pkg/fizhi/fizhi_swrad.F |
44 |
SWRIO |
_RL getcon,grav,cp,undef |
./pkg/fizhi/fizhi_swrad.F |
473 |
SWRIO |
alf = grav*(ple(i,Lm+1)-ptop)/(cp*dpstrip(i,L)*100) |
./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 |
218 |
FIZHI_TENDENCY_APPLY_T |
rayleighdrag = 1./((31.*86400.*2.)*(pNrkappa*cp)) |
./pkg/fizhi/fizhi_turb.F |
1271 |
TRBFLX |
4 irun,nlev,nltop,NYMD,NHMS,grav,cp,rgas,faceps,virtcon,undef, |
./pkg/fizhi/fizhi_turb.F |
1334 |
TRBFLX |
_RL grav,cp,rgas,faceps,virtcon,undef |
./pkg/fizhi/fizhi_turb.F |
1770 |
TRBFLX |
2 cp,rgas,undef, |
./pkg/fizhi/fizhi_turb.F |
2324 |
SFCFLX |
5 cp,rgas,undef, |
./pkg/fizhi/fizhi_turb.F |
2372 |
SFCFLX |
_RL aitr,cp,rgas,undef |
./pkg/fizhi/fizhi_turb.F |
246 |
TURBIO |
_RL pi,secday,sdayopi2,rgas,akap,cp,alhl |
./pkg/fizhi/fizhi_turb.F |
274 |
TURBIO |
cp = getcon('CP') |
./pkg/fizhi/fizhi_turb.F |
3375 |
TRBLEN |
_RL cp |
./pkg/fizhi/fizhi_turb.F |
3642 |
TRBITP |
_RL cp |
./pkg/fizhi/fizhi_turb.F |
598 |
TURBIO |
4 stq10m,istrip,nlay,nltop,nymd,nhms,grav,cp,rgas,faceps,virtcon, |
./pkg/fizhi/fizhi_turb.F |
944 |
TURBIO |
tmpstrip(i) = sttflux(i,nlay) * cp |
./pkg/fizhi/fizhi_turb.F |
960 |
TURBIO |
sttflux(i,l) = sttflux(i,l) * cp |
./pkg/ebm/EBM.h |
50 |
NO PROCEDURE |
_RL t_mlt, lv, cp, rho_air |
./pkg/ebm/EBM.h |
53 |
NO PROCEDURE |
PARAMETER ( cp = 1004. _d 0 ) |
./pkg/ebm/ebm_atmosphere.F |
193 |
EBM_ATMOSPHERE |
Cs = rho_air*cp*C* |