| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
908 |
NO PROCEDURE |
& celsius2K, |
|
./model/inc/PARAMS.h |
911 |
NO PROCEDURE |
_RL celsius2K |
|
./pkg/seaice/seaice_growth.F |
360 |
SEAICE_GROWTH |
TICE(I,J,bi,bj)=celsius2K |
|
./pkg/seaice/seaice_growth.F |
502 |
SEAICE_GROWTH |
TMIX(I,J,bi,bj)=theta(I,J,kSurface,bi,bj)+celsius2K |
|
./pkg/seaice/seaice_model.F |
99 |
SEAICE_MODEL |
TICE(i,j,bi,bj) = celsius2K |
|
./pkg/seaice/seaice_solve4temp.F |
188 |
SEAICE_SOLVE4TEMP |
TMELT = celsius2K |
|
./pkg/seaice/seaice_solve4temp.F |
248 |
SEAICE_SOLVE4TEMP |
& + celsius2K |
|
./pkg/seaice/seaice_solve4temp.F |
254 |
SEAICE_SOLVE4TEMP |
TB(I,J) = celsius2K + SEAICE_freeze |
|
./pkg/thsice/thsice_readparms.F |
114 |
THSICE_READPARMS |
Tf0kel = celsius2K |
|
./pkg/thsice/thsice_slab_ocean.F |
114 |
THSICE_SLAB_OCEAN |
& ) - celsius2K |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
200 |
AIM_SURF_BC |
oceTfreez = celsius2K - 1.9 _d 0 |
|
./model/src/set_defaults.F |
229 |
SET_DEFAULTS |
celsius2K = 273.16 _d 0 |
|
./pkg/aim_compon_interf/atm_apply_import.F |
124 |
ATM_APPLY_IMPORT |
aimTsoce(i,j) = SSTocn(i,j,bi,bj)+celsius2K |
|
./pkg/aim_compon_interf/atm_apply_import.F |
128 |
ATM_APPLY_IMPORT |
aimTsoce(i,j) = SSTocn(i,j,bi,bj)+celsius2K |
|
./pkg/aim_v23/aim_land2aim.F |
104 |
AIM_LAND2AIM |
land_groundT(i,j,k,bi,bj) = aimTld(i,j)-celsius2K |
|
./pkg/aim_v23/aim_land2aim.F |
96 |
AIM_LAND2AIM |
aimTld(i,j) = land_skinT(i,j,bi,bj)+celsius2K |
|
./pkg/aim_v23/aim_sice2aim.F |
101 |
AIM_SICE2AIM |
Tsrf (i,j,bi,bj) = aimTsice(i,j)-celsius2K |
|
./pkg/aim_v23/aim_sice2aim.F |
146 |
AIM_SICE2AIM |
tOceMxL(i,j,bi,bj) = aimTsoce(i,j)-celsius2K |
|
./pkg/aim_v23/aim_sice2aim.F |
165 |
AIM_SICE2AIM |
aimTsoce(i,j) = tOceMxL(i,j,bi,bj)+celsius2K |
|
./pkg/aim_v23/aim_sice2aim.F |
93 |
AIM_SICE2AIM |
aimTsice(i,j) = Tsrf(i,j,bi,bj)+celsius2K |
|
./pkg/aim_v23/aim_surf_bc.F |
189 |
AIM_SURF_BC |
oceTfreez = celsius2K - 1.9 _d 0 |
|
./pkg/aim_v23/phy_inphys.F |
75 |
INPHYS |
tFreeze= celsius2K |
|
./pkg/bulk_force/bulkf_formula_aim.F |
152 |
BULKF_FORMULA_AIM |
TSKIN(J) = Tsurf(J) + celsius2K |
|
./pkg/bulk_force/bulkf_readparms.F |
83 |
BULKF_READPARMS |
Tf0kel = celsius2K |
|
./pkg/exf/exf_readparms.F |
295 |
EXF_READPARMS |
atempconst = celsius2K |