Doxygen Source Code Documentation
cdf_77.c
Go to the documentation of this file.00001 #include "cdflib.h" 00002 long fifidint(double a) 00003 /************************************************************************ 00004 FIFIDINT: 00005 Truncates a double precision number to a long integer 00006 ************************************************************************/ 00007 /* a - number to be truncated */ 00008 { 00009 if (a < 1.0) return (long) 0; 00010 else return (long) a; 00011 } /* END */