File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
741 |
NO PROCEDURE |
& rhoConstFresh, rho1Ref, tRef, sRef, phiRef, dBdrRef, |
./model/inc/PARAMS.h |
837 |
NO PROCEDURE |
_RL rhoConstFresh |
./pkg/land/land_readparms.F |
146 |
LAND_READPARMS |
land_rhoLiqW = rhoConstFresh |
./model/src/config_summary.F |
227 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( rhoConstFresh, INDEX_NONE,'rhoConstFresh =', |
./pkg/seaice/seaice_growth.F |
1121 |
SEAICE_GROWTH |
& /SEAICE_deltaTtherm * ICE2WATR * rhoConstFresh |
./pkg/seaice/seaice_growth.F |
1125 |
SEAICE_GROWTH |
& /SEAICE_deltaTtherm * ICE2WATR * rhoConstFresh |
./pkg/seaice/seaice_growth.F |
1166 |
SEAICE_GROWTH |
& *tmpscal1*ICE2WATR*rhoConstFresh |
./pkg/seaice/seaice_growth.F |
1172 |
SEAICE_GROWTH |
& *tmpscal1*ICE2WATR*rhoConstFresh |
./pkg/seaice/seaice_growth.F |
1449 |
SEAICE_GROWTH |
& )*rhoConstFresh |
./pkg/seaice/seaice_growth.F |
1461 |
SEAICE_GROWTH |
& )*rhoConstFresh |
./pkg/seaice/seaice_growth.F |
232 |
SEAICE_GROWTH |
convertPRECIP2HI=SEAICE_deltaTtherm*rhoConstFresh/SEAICE_rhoIce |
./pkg/seaice/seaice_growth.F |
647 |
SEAICE_GROWTH |
& )*rhoConstFresh |
./pkg/seaice/seaice_growth_if.F |
941 |
SEAICE_GROWTH_IF |
& SEAICE_deltaTtherm )*rhoConstFresh |
./pkg/seaice/seaice_init_varia.F |
396 |
SEAICE_INIT_VARIA |
& ICE2WATR*rhoConstFresh*SEAICE_salinity |
./model/src/external_fields_load.F |
139 |
EXTERNAL_FIELDS_LOAD |
EmPmR0(i,j,bi,bj) = EmPmR0(i,j,bi,bj)*rhoConstFresh |
./model/src/external_fields_load.F |
140 |
EXTERNAL_FIELDS_LOAD |
EmPmR1(i,j,bi,bj) = EmPmR1(i,j,bi,bj)*rhoConstFresh |
./pkg/thsice/thsice_map_exf.F |
68 |
THSICE_MAP_EXF |
totPrc(i,j) = precip(i,j,bi,bj)*rhoConstFresh |
./pkg/thsice/thsice_map_exf.F |
71 |
THSICE_MAP_EXF |
totPrc(i,j) = totPrc(i,j) + runoff(i,j,bi,bj)*rhoConstFresh |
./pkg/thsice/thsice_map_exf.F |
87 |
THSICE_MAP_EXF |
snowPrc(i,j) = snowPrecip(i,j,bi,bj)*rhoConstFresh |
./pkg/thsice/thsice_map_exf.F |
98 |
THSICE_MAP_EXF |
snowPrc(i,j) = precip(i,j,bi,bj)*rhoConstFresh |
./pkg/thsice/thsice_readparms.F |
90 |
THSICE_READPARMS |
rhofw = rhoConstFresh |
./pkg/timeave/timeave_surf_flux.F |
103 |
TIMEAVE_SURF_FLUX |
& + PmEpR(i,j,bi,bj)*rhoConstFresh |
./pkg/timeave/timeave_surf_flux.F |
81 |
TIMEAVE_SURF_FLUX |
& + PmEpR(i,j,bi,bj)*rhoConstFresh |
./model/src/ini_forcing.F |
135 |
INI_FORCING |
EmPmR(i,j,bi,bj) = EmPmR(i,j,bi,bj)*rhoConstFresh |
./model/src/ini_parms.F |
195 |
INI_PARMS |
& rhoConst, rhoConstFresh, buoyancyRelation, HeatCapacity_Cp, |
./model/src/ini_parms.F |
349 |
INI_PARMS |
rhoConstFresh = UNSET_RL |
./model/src/ini_parms.F |
413 |
INI_PARMS |
IF ( rhoConstFresh .EQ. UNSET_RL ) rhoConstFresh=rhoConst |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
137 |
INI_FORCING |
EmPmR(i,j,bi,bj) = EmPmR(i,j,bi,bj)*rhoConstFresh |
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
87 |
ATM_CPL_READ_PICKUP |
EvMPrFlux (i,j,bi,bj) = EvMPrFlux (i,j,bi,bj)*rhoConstFresh |
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
88 |
ATM_CPL_READ_PICKUP |
RunOffFlux(i,j,bi,bj) = RunOffFlux(i,j,bi,bj)*rhoConstFresh |
./pkg/atm2d/put_ocnvars.F |
60 |
PUT_OCNVARS |
& + pass_runoff(i,j)) * rhoConstFresh |
./pkg/atm2d/put_ocnvars.F |
80 |
PUT_OCNVARS |
& + pass_runoff(i,j)) * rhoConstFresh |
./pkg/bulk_force/bulkf_fields_load.F |
296 |
BULKF_FIELDS_LOAD |
empch0(i,j,bi,bj) = empch0(i,j,bi,bj)*rhoConstFresh |
./pkg/bulk_force/bulkf_fields_load.F |
297 |
BULKF_FIELDS_LOAD |
empch1(i,j,bi,bj) = empch1(i,j,bi,bj)*rhoConstFresh |
./pkg/bulk_force/bulkf_forcing.F |
191 |
BULKF_FORCING |
& - runoff(i,j,bi,bj))*rhoConstFresh |
./pkg/bulk_force/bulkf_readparms.F |
77 |
BULKF_READPARMS |
rhoFW = rhoConstFresh |
./pkg/ebm/ebm_atmosphere.F |
339 |
EBM_ATMOSPHERE |
EmPmR(i,j,bi,bj) = EmPmR(i,j,bi,bj)*rhoConstFresh |
./pkg/ebm/ebm_forcing_surf.F |
83 |
EBM_FORCING_SURF |
& *convertFW2Salt*rhoConstFresh*mass2rUnit |
./pkg/ecco/cost_mean_saltflux.F |
118 |
COST_MEAN_SALTFLUX |
& + tmpx* _rA(i,j,bi,bj)/rhoConstFresh |
./pkg/exf/exf_bulkformulae.F |
237 |
EXF_BULKFORMULAE |
recip_rhoConstFresh = 1. _d 0/rhoConstFresh |
./pkg/exf/exf_mapfields.F |
117 |
EXF_MAPFIELDS |
& *rhoConstFresh |
./pkg/exf/exf_mapfields.F |
123 |
EXF_MAPFIELDS |
EmPmR(i,j,bi,bj) = EmPmR(i,j,bi,bj) - rhoConstFresh* |