Detecting NaN values in NEMO

[joakim]

NEMO checks for unrealistically high velocities and negative surface salinities each time step.
However, it does not check for NaNs?, which may occur under some circumstances.
Line 114 in stpctl.F90 could be replaced by

IF( tmask(ji,jj,1) == 1) THEN     
   zsmin = MIN(zsmin,tsn(ji,jj,1,jp_sal))
   IF ( isnan(tsn(ji,jj,1,jp_sal)) ) THEN  
      WRITE(numout,*) ' SSS is NaN '
      tsn(ji,jj,1,jp_sal) = -999. 
      zsmin = -999. 
   END IF 
END IF

This would make NEMO point to the problematic point and dump the output.abort files.
However, the "isnan" function seems to be specific to Intel compilers. "ieee_is_nan" is a similar function that is supported by most compilers.
Do we wish to put this functionality into NEMO?

/Joakim

[cbricaud]

there are some options in compilers which can do the same.It is not necessary to put it in the code.