Identifier   respcal
 
 Purpose      Does responsivity calibration for the in_spd.
 
 Synopsis     out_spd = respcal( in_spd [,AOT_NUMBER=AOT_NUMBER], 
                               [,AOT_SPEED=AOT_SPEED] [,fortran]
                               [, CAL13 = cal13]
                               [, CAL19 = cal19]
                               [, CAL25_1A = cal25_1a] [, CAL25_1B = cal25_1b]
                               [, CAL25_1D = cal25_1d] [, CAL25_1E = cal25_1e]
                               [, CAL25_2A = cal25_2a] [, CAL25_2B = cal25_2b]
                               [, CAL25_2C = cal25_2c] [, CAL25_3A = cal25_3a]
                               [, CAL25_3C = cal25_3c] [, CAL25_3D = cal25_3d]
                               [, CAL25_3E = cal25_3e]
                               [, CAL25_4  = cal25_4]  [, CAL25_5A = cal25_5a]
                               [, CAL25_5B = cal25_5b] [, CAL25_5C = cal25_5c]
                               [, CAL25_5D = cal25_5d] [, CAL25_6  = cal25_6]
                               [, /noclearbuffer ]
                               )
 
 Arguments    Name    I/O    Type:   Description
              ---------------------------------------------------------------
              out_spd    O     struct  Name of output SPD in IDL format
              in_spd     I     struct  Name of input SPD in IDL format
              aot_number I     int     AOT number
              aot_speed  I     int     AOT 1 speed : 1... 4
                                       if the necessary informations
                                       EOHAUTCS and EOHAUTCE not given
                                       in the header of the SPD
              fortran    I     keyword use FORTRAN version
              cal13      I     string  Selected calfile 13
                                       If this is not supplied calfile 13 from 
                                       the default calfile directory is used.
              cal19      I     string  Selected calfile 19
                                       If this is not supplied calfile 19 from
                                       the default calfile directory is used.
              cal25_x    I     string  Selected calfile 25_x
                                       If this is not supplied calfile 25 from 
                                       the default calfile directory is used.
              /noclearbuffer
                       I     --        Do not clear the calfile buffer
                                       before setting any optional
                                       alternative calibration calfile

 Returns      an SPD struct.

 Description  This procedure does responsivity calibration by calling the 
              appropriate routine(s) of the pipeline. The resulting SPD is
              returned.
              If the /noclearbuffer option is not given, the calfile
              buffer will be cleared upon entering RESPCAL thus ensuring
              that the default set of calibration files will be used
              even in those cases where no calxx parameter is used.
 
 Comment      --
 
 Example      spd2 = respcal(spd1)
 
 Category     AA
 
 Filename     respcal.pro (module: ias_respcal)
 
 Author       G.Bex (GB)
 
 Version      2.0

 History      1.0  11-07-94  GB   Description
              1.1  23-09-94  DRB  Flexible calfile access implemented
              1.2  03-10-94  DRB  Always clear the calbuffer unless
                                  told otherwise with /noclearbuffer
              1.3  10-03-95  HB   Unified Arguments
                   19-04-95  HB   Unified header
              1.4  02-07-96  EkW  adapt to SPR 1705/06/07
              1.5  04-07-96  NS   Add utc to itk conversion, divide dur by 24
              1.6  11-07-96  BV   Add CAL19 and CAL25_3E arguments
              1.7  19-07-96  EkW  call get_aot_speed
              1.8  11-09-96  EkW  change AOT number rec. from SC0x to AOTx
              1.9  07-11-96  EkW  SPR S_0112
              1.10 21-11-96  BV   Timedependent calfile access
              2.0  03-12-97  EkW  call IDL pipeline program