Function:     irds_rd_sampxy

Purpose:      To read raw samples and projected positions from an IRDS

Category:     IR

File:         irds_samples.c

Author:       P.R. Roelfsema

Use:          IRDS_RD_SAMPXY(  IRDS   ,    Input   character*(*)
                               SNIP   ,    Input   integer
                               SDET   ,    Input   integer
                               TICK   ,    Input   integer
                               DATA   ,    Output  real( >=NDATA )
                               X      ,    Output  double( >=NDATA )
                               Y      ,    Output  double( >=NDATA )
                               NDATA  ,    In/Out  integer
                               STATUS )    Output  integer
                                       
              IRDS        Name of IRDS to read from.
              SNIP        Sequential snip number to read.
              SDET        Sequential detector number to read.
              TICK        Sequential tick of first sample to read.
              DATA        Data array to receive samples.
              X           Array to receive X coordinates
              Y           Array to receive Y coordinates
              NDATA       I - max number of samples to write.
                          O - number of samples actually written.
              STATUS      Error return code:
                           0  - no error.
                          -1  - IRDS does not exist
                          -2  - IRDS is not a legal irds
                          -3  - SNIP not in IRDS
                          -4  - SDET not in IRDS
                          -5  - TICK not in IRDS
                          -6  - gds read error
                          -7  - no coordinate info in header
                         -10  - not yet implemented

Updates:      Aug 20, 1990: PRR, Creation date