C+ C NAME: C BadI4 C PURPOSE: C Provides a generic identifier for integer*4 'bad values' C CATEGORY: C gen/for/lib C CALLING SEQUENCE: integer function BadI4() C INPUTS: C (none) C OUTPUTS: C I integer bad integer identifier C CALLS: C (none) C SEE ALSO: C BadR4, BadR8, pInfR4, TinyR4 C INCLUDE: include 'math.h' C PROCEDURE: C The BadI4 number is pulled out of the include file. C It is set to the largest negative integer*4 number C MODIFICATION HISTORY: C SEP-1999, Paul Hick (UCSD/CASS; pphick@ucsd.edu) C- BadI4 = MATH__NAIN return end