Function:     FTSD_RLOG

Purpose:      Reads a FITS logical descriptor from a FITS header.

Category:     FITS

File:         ftsd_access.c

Author:       K.G. Begeman

Use:          INTEGER FTSD_RLOG( HEADER,      Input     CHARACTER*(*)
                                 DESCRIPTOR,  Input     CHARACTER*(*)
                                 VALUE )      Output    LOGICAL*(*)

              FTSD_RLOG     Returns:
                             >=0 : Offset of record in header
                             -1	 : FITS descriptor not present
                             -2	 : descriptor does not carry info
                             -3	 : conversion error
              HEADER        Contains FITS records where to look
                            for the descriptor.
              DESCRIPTOR    FITS descriptor to search for in HEADER.
              VALUE         If present, the contents of the FITS record
                            associated with DESCRIPTOR is returned.

Updates:      Jun 25, 1990: KGB, Document created.
	      Aug 14, 1990: Sjag; Offset of record is returned.