Определите, является ли вход конечным
#include "matrix.h" bool mxIsFinite(double value);
#include "fintrf.h" integer*4 mxIsFinite(value) real*8 value
valueДвойная точность, число с плавающей запятой для тестирования
Логический 1 (true), если value является конечным и логическим 0 (false) в противном случае.
Звонить mxIsFinite определить, value ли является конечным. Число конечно, если оно больше -Inf и менее Inf.