if ( useDiagnostics ) then
IF ( useDiagnostics ) THEN
& .AND. useDiagnostics ) THEN
IF ( useDiagnostics .AND. implicitDiffusion ) THEN
IF ( useDiagnostics .AND.
IF ( useDiagnostics ) CALL LAND_DIAGNOSTICS_INIT( myThid )
IF (useDiagnostics) THEN