| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/THSICE_PARAMS.h |
153 |
NO PROCEDURE |
& stepFwd_oceMxL, thSIce_skipThermo, |
|
./pkg/thsice/THSICE_PARAMS.h |
161 |
NO PROCEDURE |
LOGICAL stepFwd_oceMxL |
|
./pkg/thsice/thsice_check.F |
115 |
THSICE_CHECK |
IF ( useAIM .AND. .NOT.( stepFwd_oceMxL .OR. useCoupler ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
104 |
THSICE_DIAGNOSTICS_STATE |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_output.F |
136 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_output.F |
176 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_output.F |
228 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_output.F |
304 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_output.F |
339 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_read_pickup.F |
64 |
THSICE_READ_PICKUP |
IF ( stepFwd_oceMxL .AND. startIceModel.EQ.0 ) THEN |
|
./pkg/thsice/thsice_read_pickup.F |
86 |
THSICE_READ_PICKUP |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_readparms.F |
150 |
THSICE_READPARMS |
stepFwd_oceMxL = .FALSE. |
|
./pkg/thsice/thsice_readparms.F |
340 |
THSICE_READPARMS |
WRITE(iUnit,fmtL) 'ThSI:','stepFwd_oceMxL =',stepFwd_oceMxL |
|
./pkg/thsice/thsice_readparms.F |
66 |
THSICE_READPARMS |
& startIceModel, stepFwd_oceMxL, thSIce_calc_albNIR, |
|
./pkg/thsice/thsice_slab_ocean.F |
71 |
THSICE_SLAB_OCEAN |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_write_pickup.F |
100 |
THSICE_WRITE_PICKUP |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/thsice/thsice_write_pickup.F |
67 |
THSICE_WRITE_PICKUP |
IF ( stepFwd_oceMxL ) THEN |
|
./pkg/aim_v23/aim_sice2aim.F |
130 |
AIM_SICE2AIM |
& .OR. ( stepFwd_oceMxL .AND. StartIceModel.NE.0 |