Function: irlrs_cohen_gain Purpose: applies Cohen gain correction factors for LRS data. Category: IRAS LRS File: irlrs_const.c Author: P.R. Roelfsema Use: IRLRS_COHEN_GAIN( LAMBDA , Input real ( >= NDATA ) NDATA , Input integer DATA ) In/Out real ( >= NDATA ) IRLRS_LGAIN returns: -5 not enough memory for internal arrays. -9 all data in DATA were undefined -11 not enough memory for interpolation -12 interpolation error LAMBDA - array containing wavelengths for which gain factors are to be calculated. NDATA - number of points for which gain is to be applied. DATA - data array to which gain factors are applied. Updates: Jul 20, 1993: PRR, Creation date