File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_write_pickup.F |
67 |
THSICE_WRITE_PICKUP |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_write_pickup.F |
88 |
THSICE_WRITE_PICKUP |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/THSICE_PARAMS.h |
133 |
NO PROCEDURE |
& stepFwd_oceMxL, |
./pkg/thsice/THSICE_PARAMS.h |
140 |
NO PROCEDURE |
LOGICAL stepFwd_oceMxL |
./pkg/thsice/thsice_ave.F |
110 |
THSICE_AVE |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_readparms.F |
122 |
THSICE_READPARMS |
stepFwd_oceMxL = .FALSE. |
./pkg/thsice/thsice_readparms.F |
237 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: stepFwd_oceMxL=',stepFwd_oceMxL |
./pkg/thsice/thsice_readparms.F |
62 |
THSICE_READPARMS |
& startIceModel, stepFwd_oceMxL, |
./pkg/thsice/thsice_slab_ocean.F |
56 |
THSICE_SLAB_OCEAN |
IF ( .NOT.stepFwd_oceMxL ) RETURN |
./pkg/thsice/thsice_diagnostics_fill.F |
93 |
THSICE_DIAGNOSTICS_FILL |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_read_pickup.F |
53 |
THSICE_READ_PICKUP |
IF ( stepFwd_oceMxL .AND. startIceModel.EQ.0 ) THEN |
./pkg/thsice/thsice_read_pickup.F |
73 |
THSICE_READ_PICKUP |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_output.F |
131 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_output.F |
222 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_output.F |
260 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_output.F |
326 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
./pkg/thsice/thsice_output.F |
355 |
THSICE_OUTPUT |
IF ( stepFwd_oceMxL ) THEN |
./pkg/aim_v23/aim_sice2aim.F |
129 |
AIM_SICE2AIM |
& .OR. ( stepFwd_oceMxL .AND. StartIceModel.NE.0 |