LOGICAL useICEFRONT
& useICEFRONT, useThSIce,
IF ( useICEFRONT .AND. fluidIsWater ) THEN
IF ( useICEFRONT )
useICEFRONT =.FALSE.
& useICEFRONT,
IF (useICEFRONT) CALL ICEFRONT_CHECK( myThid )
IF (useICEFRONT) CALL PACKAGES_ERROR_MSG('ICEFRONT',' ',myThid)
IF (useICEFRONT) CALL ICEFRONT_INIT_FIXED( myThid )
IF (useICEFRONT) THEN
IF (useICEFRONT) CALL ICEFRONT_READPARMS( myThid )