Subroutine:   GDSD_WFRCOM

Purpose:      Writes comment section of a FITS record.

File:         gdsd_wfrcom.c

Author:       K.G. Begeman

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

              SET             Name of GDS set.
              NAME            Name of FITS descriptor.
              SUBSET          Subset coordinate word.
              COMMENT         Comment to be written to FITS descriptor.
                              Normally not more than 48 characters can be
                              stored in a FITS record.
              ERROR           Error return code.

Rel. Docs.:   gdsd_rfrcom.dc2

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