| File |
Line number |
Procedure |
Code |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
137 |
BULKF_FORMULA_LANL |
if (iceornot.gt.0) lath=Lvap+Lfresh |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
13 |
BULKF_FORMULA_LANL |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
205 |
BULKF_FORMULA_LANL |
if (iceornot.eq.0) then |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
208 |
BULKF_FORMULA_LANL |
elseif (iceornot.eq.2) then |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
51 |
BULKF_FORMULA_LANL |
INTEGER iceornot ! 0=open water, 1=sea-ice, 2=sea-ice with snow |
|
./pkg/bulk_force/bulkf_formula_lay.F |
13 |
BULKF_FORMULA_LAY |
I iceornot, i,j,bi,bj,myThid ) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
156 |
BULKF_FORMULA_LAY |
IF ( iceornot.EQ.0 ) THEN |
|
./pkg/bulk_force/bulkf_formula_lay.F |
245 |
BULKF_FORMULA_LAY |
IF ( iceornot.EQ.0 ) THEN |
|
./pkg/bulk_force/bulkf_formula_lay.F |
248 |
BULKF_FORMULA_LAY |
ELSEIF (iceornot.EQ.2) THEN |
|
./pkg/bulk_force/bulkf_formula_lay.F |
56 |
BULKF_FORMULA_LAY |
INTEGER iceornot ! 0=open water, 1=sea-ice, 2=sea-ice with snow |
|
./pkg/bulk_force/bulkf_formula_aim.F |
132 |
BULKF_FORMULA_AIM |
IF ( iceornot.GE.1 ) ALHevp = ALHC + ALHF |
|
./pkg/bulk_force/bulkf_formula_aim.F |
14 |
BULKF_FORMULA_AIM |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
78 |
BULKF_FORMULA_AIM |
INTEGER iceornot |
|
./pkg/bulk_force/bulkf_forcing.F |
116 |
BULKF_FORCING |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_forcing.F |
132 |
BULKF_FORCING |
I iceornot, i,j,bi,bj,myThid ) |
|
./pkg/bulk_force/bulkf_forcing.F |
64 |
BULKF_FORCING |
INTEGER ks, iceornot |
|
./pkg/bulk_force/bulkf_forcing.F |
76 |
BULKF_FORCING |
iceornot = 0 |
|
./pkg/bulk_force/bulkf_forcing.F |
93 |
BULKF_FORCING |
I iceornot, myThid ) |
|
./pkg/thsice/thsice_get_exf.F |
123 |
THSICE_GET_EXF |
IF ( iceornot.EQ.0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
13 |
THSICE_GET_EXF |
I iceornot, tsfCel, |
|
./pkg/thsice/thsice_get_exf.F |
233 |
THSICE_GET_EXF |
IF ( iceornot.EQ.0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
235 |
THSICE_GET_EXF |
ELSEIF (iceornot.EQ.2) THEN |
|
./pkg/thsice/thsice_get_exf.F |
49 |
THSICE_GET_EXF |
INTEGER iceornot |
|
./pkg/thsice/thsice_get_bulkf.F |
103 |
THSICE_GET_BULKF |
I iceornot, myThid ) |
|
./pkg/thsice/thsice_get_bulkf.F |
109 |
THSICE_GET_BULKF |
I iceornot, i,j,bi,bj,myThid ) |
|
./pkg/thsice/thsice_get_bulkf.F |
13 |
THSICE_GET_BULKF |
I iceornot, Tsf, |
|
./pkg/thsice/thsice_get_bulkf.F |
47 |
THSICE_GET_BULKF |
INTEGER iceornot |
|
./pkg/thsice/thsice_get_bulkf.F |
81 |
THSICE_GET_BULKF |
I iceornot, myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
153 |
THSICE_SOLVE4TEMP |
INTEGER iceornot |
|
./pkg/thsice/thsice_solve4temp.F |
262 |
THSICE_SOLVE4TEMP |
iceornot=2 |
|
./pkg/thsice/thsice_solve4temp.F |
264 |
THSICE_SOLVE4TEMP |
iceornot=1 |
|
./pkg/thsice/thsice_solve4temp.F |
268 |
THSICE_SOLVE4TEMP |
I iceornot, Tsf, |
|
./pkg/thsice/thsice_solve4temp.F |
273 |
THSICE_SOLVE4TEMP |
I iceornot, Tsf, |
|
./pkg/thsice/thsice_solve4temp.F |
307 |
THSICE_SOLVE4TEMP |
iceornot=2 |
|
./pkg/thsice/thsice_solve4temp.F |
309 |
THSICE_SOLVE4TEMP |
iceornot=1 |
|
./pkg/thsice/thsice_solve4temp.F |
313 |
THSICE_SOLVE4TEMP |
I iceornot, Tsf, |
|
./pkg/thsice/thsice_solve4temp.F |
318 |
THSICE_SOLVE4TEMP |
I iceornot, Tsf, |