Subroutine:   GDSD_RFRCOM

Purpose:      Reads comment section of a FITS record.

File:         gdsd_wfrcom.c

Author:       K.G. Begeman

Use:          CALL GDSD_RFRCOM( SET ,        Input       CHARACTER*(*)
                                NAME ,       Input       CHARACTER*(*)
                                SUBSET ,     Input       INTEGER
                                COMMENT ,    Output      CHARACTER*(*)
                                ERROR )    In/Output     INTEGER

              SET             Name of GDS set.
              NAME            Name of FITS descriptor.
              SUBSET          Subset coordinate word.
              COMMENT         On return contains comment stored in FITS
                              descriptor. A maximum of 60 characters maybe
                              returned.
              ERROR           Error return code.

Rel. Docs.:   gdsd_wfrcom.dc2

Update:       Dec 21, 1995: KGB, Document created.