| File |
Line number |
Procedure |
Code |
|
./pkg/shelfice/shelfice_thermodynamics.F |
163 |
SHELFICE_THERMODYNAMICS |
print *, 'ml-shelfice: Cp_W = ', HeatCapacity_Cp |
|
./pkg/shelfice/shelfice_thermodynamics.F |
73 |
SHELFICE_THERMODYNAMICS |
eps1 = rhoConst*HeatCapacity_Cp*SHELFICEheatTransCoeff |
|
./pkg/shelfice/shelfice_thermodynamics.F |
95 |
SHELFICE_THERMODYNAMICS |
& *HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./model/inc/PARAMS.h |
785 |
NO PROCEDURE |
COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp |
|
./model/inc/PARAMS.h |
786 |
NO PROCEDURE |
_RL HeatCapacity_Cp |
|
./pkg/offline/offline_fields_load.F |
416 |
OFFLINE_FIELDS_LOAD |
& (HeatCapacity_Cp*recip_horiVertRatio*rhoConst) |
|
./model/src/ini_parms.F |
186 |
INI_PARMS |
& rhoConst, rhoConstFresh, buoyancyRelation, HeatCapacity_Cp, |
|
./model/src/ini_parms.F |
593 |
INI_PARMS |
IF ( HeatCapacity_Cp .LE. 0. ) THEN |
|
./model/src/ini_parms.F |
599 |
INI_PARMS |
recip_Cp = 1.D0 / HeatCapacity_Cp |
|
./model/src/external_forcing_surf.F |
136 |
EXTERNAL_FORCING_SURF |
tmpFac = HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./model/src/set_defaults.F |
128 |
SET_DEFAULTS |
HeatCapacity_Cp = 3994. _d 0 |
|
./model/src/diags_oceanic_surf_flux.F |
115 |
DIAGS_OCEANIC_SURF_FLUX |
tmpFac = HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./model/src/diags_oceanic_surf_flux.F |
78 |
DIAGS_OCEANIC_SURF_FLUX |
& *HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./model/src/diags_oceanic_surf_flux.F |
88 |
DIAGS_OCEANIC_SURF_FLUX |
& *theta(i,j,ks,bi,bj)*HeatCapacity_Cp |
|
./pkg/cost/cost_atlantic_heat.F |
175 |
COST_ATLANTIC_HEAT |
& sum*HeatCapacity_Cp*rhoConst/petawatt |
|
./pkg/timeave/timeave_surf_flux.F |
79 |
TIMEAVE_SURF_FLUX |
& *HeatCapacity_Cp*recip_horiVertRatio*rhoConst |
|
./pkg/timeave/timeave_surf_flux.F |
89 |
TIMEAVE_SURF_FLUX |
& *theta(i,j,k,bi,bj)*HeatCapacity_Cp |
|
./pkg/ecco/cost_trans_zonal.F |
193 |
COST_TRANS_ZONAL |
$ *HeatCapacity_Cp*rhoNil |
|
./pkg/ecco/cost_atlantic.F |
163 |
COST_ATLANTIC |
$ *HeatCapacity_Cp*rhoNil |
|
./pkg/ecco/cost_atlantic.F |
207 |
COST_ATLANTIC |
$ *HeatCapacity_Cp*rhoNil |
|
./pkg/ecco/cost_trans_merid.F |
204 |
COST_TRANS_MERID |
$ *HeatCapacity_Cp*rhoNil |
|
./pkg/thsice/thsice_readparms.F |
91 |
THSICE_READPARMS |
cpwater = HeatCapacity_Cp |
|
./pkg/seaice/growth.F |
273 |
GROWTH |
& *HeatCapacity_Cp*recip_horiVertRatio*rhoConst |