Function: FTSD_TYPE Purpose: Returns the type (i.e. CHAR, INT, LOG, REAL, DBLE) of the contents of a FITS header record. Category: FITS File: ftsd_type.c Author: K.G. Begeman Use: CHARACTER*(*) FTSD_TYPE( RECORD ) Input CHARACTER*80 FTSD_TYPE Returns: 'CHAR' : record contains characters 'INT ' : record contains integer 'LOG ' : record contains logical 'DBLE' : record contains double prec. float 'REAL' : record contains single prec. float ' ' : type could not be determined RECORD Contains FITS header record of 80 bytes long. Only the first 30 bytes are examined. Updates: Nov 23, 1990: KGB Document created.