Searched refs:myisnan (Results 1 – 7 of 7) sorted by relevance
12 function myisnan(x)16 logical :: myisnan19 @HAVE_FORTRAN_ISNAN_FALSE@ myisnan = (x.ne.x)20 @HAVE_FORTRAN_ISNAN_TRUE@ myisnan = isnan(x)
173 if (myisnan(zg(i,j))) then184 (.not.myisnan(zg(ii,jj))) ) then
139 int myisnan(double);
252 int myisnan(double);
565 myisnan(double n) in myisnan() function