& stepFwd_oceMxL,
LOGICAL stepFwd_oceMxL
IF ( stepFwd_oceMxL ) THEN
IF ( stepFwd_oceMxL .AND. startIceModel.EQ.0 ) THEN
stepFwd_oceMxL = .FALSE.
WRITE(iUnit,*) 'ThSI: stepFwd_oceMxL=',stepFwd_oceMxL
& startIceModel, stepFwd_oceMxL, thSIce_calc_albNIR,
& .OR. ( stepFwd_oceMxL .AND. StartIceModel.NE.0