comb_spe_flat.pro:15:;  comb_spe_flat, ffilenames, flat, ferr, fbad, gain, $
comb_spe_flat.pro:35:;  gain - electrons per ADU
comb_spe_flat.pro:46:pro  comb_spe_flat,ffilenames, flat, ferr, fbad, gain, $
comb_spe_flat.pro:92:    garr = fltarr(n) ; gain
comb_spe_flat.pro:93:    for i=0,n-1 do garr[i] = sxpar(harr[*,i],'GAIN')
comb_spe_flat.pro:118:            gain = total( total(total(wght,1),1) * garr ) / total(wght)
comb_spe_flat.pro:141:            gain = total( total(total(wght,1),1) * garr ) / total(wght)
comb_spe_flat.pro:161:            gain = total( total(total(wght,1),1) * garr ) / total(wght)
comb_spe_flat.pro:189:            gain = total( total(total(wght,1),1) * garr ) / total(wght)
comb_spe_flat.pro:216:            gain = total( total(total(wght,1),1) * garr ) / total(wght)
comb_spe_flat.pro:259:          'GAIN', gain, $
comb_spe_flat.pro:260:          'Derived gain, (e/DN)', $
convert_princeton_header.pro:133:str.PImaxGain              = fix(header, 148)          ;  148  PI-Max Gain
convert_princeton_header.pro:169:str.gain                   = fix(header, 198)          ;  198  gain
convert_princeton_header2.pro:31:;   - added interpretation of Avalanche Gain info
convert_princeton_header2.pro:165:str.PImaxGain              = fix(header, 148)          ;  148  PI-Max Gain
convert_princeton_header2.pro:201:str.gain                   = fix(header, 198)          ;  198  gain
convert_princeton_header2.pro:428:str.AvGainUsed             = fix(header, 4094     )    ; 4094
convert_princeton_header2.pro:429:str.AvGain                 = fix(header, 4096     )    ; 4096
get_spe_cal.pro:17:;                    gain_arr=gain_arr, znoise_arr=znoise_arr, $
get_spe_cal.pro:48:                      gain_arr=gain_arr, znoise_arr=znoise_arr, $
get_spe_cal.pro:82:    gain_arr = readfits(cfn, ex=1, /silent)
get_spe_cal.pro:91:        cerr = spe_err(cal, gain_arr, znoise_arr, ferr_arr)
get_spe_flat.pro:15:;  flat = get_spe_flat(ffilename, ferr, fbad, gain, $
get_spe_flat.pro:35:;  gain - electrons per ADU
get_spe_flat.pro:46:function  get_spe_flat, ffilename, ferr, fbad, gain, $
get_spe_flat.pro:64:    gain = sxpar(fhead, 'GAIN')
make_spe_cal1.pro:17:;                    gain=gain, znoise=znoise, $
make_spe_cal1.pro:36:;  gain : electron/dn, used for calculating expected noise.  Default =
make_spe_cal1.pro:78:;  Extension 1 - gain array G
make_spe_cal1.pro:79:;  gain (e/dn) * flat
make_spe_cal1.pro:122:                  gain=gain, znoise=znoise, $
make_spe_cal1.pro:342:    gain_ffn = 1.
make_spe_cal1.pro:346:            flat = get_spe_flat(ffn, ferr, fbad, gain_ffn, $
make_spe_cal1.pro:350:    if n_elements(gain) eq 0 then begin
make_spe_cal1.pro:351:        gain = gain_ffn
make_spe_cal1.pro:360:    gain_arr = gain * flat
make_spe_cal1.pro:368:          (cal[*,*,i]>0)/gain_arr + $
make_spe_cal1.pro:486:          'GAIN', gain, $
make_spe_cal1.pro:487:          'gain, electrons per DN', $
make_spe_cal1.pro:496:        mkhdr, header, gain_arr, /EXTEND 
make_spe_cal1.pro:497:        sxaddpar, header, 'OBJECT', 'gain', $
make_spe_cal1.pro:499:        WRITEFITS, flatfn, gain_arr, /append
make_spe_flat1.pro:17:;                    imbad = imbad, gain=gain, $
make_spe_flat1.pro:33:;  gain : electron/dn, used for calculating expected noise.  Default =
make_spe_flat1.pro:67:;  For each combination of gain, adc, and binning, write
make_spe_flat1.pro:94:                    imbad = imbad, gain=gain, $
make_spe_flat1.pro:174:    ; Set gain
make_spe_flat1.pro:175:    ; If the gain is not specified, estimate it from the
make_spe_flat1.pro:179:    if keyword_set(gain) then begin
make_spe_flat1.pro:180:        g = gain
make_spe_flat1.pro:196:        print, 'GAIN (1st pass) = ', g, 'e/DN'
make_spe_flat1.pro:222:    ;   err = passed gain, or estimated gain from robomean
make_spe_flat1.pro:242:    ;   err = passed gain, or estimated gain from robomean
make_spe_flat1.pro:321:                        print, 'GAIN = ', g, 'e/DN'
make_spe_flat1.pro:412:                        print, 'GAIN = ', g, 'e/DN'
make_spe_flat1.pro:457:          'GAIN', g, $
make_spe_flat1.pro:458:          'Derived gain, electrons per DN', $
make_spe_zero1.pro:17:;                    imbad = imbad, gain=gain, bias=bias, minbias=minbias, $
make_spe_zero1.pro:33:;  bias, gain, and readn_dn are used in some modes to calculate the
make_spe_zero1.pro:38:;  gain : electron/dn.  Default = 1.
make_spe_zero1.pro:66:;  For each combination of gain, adc, and binning, write
make_spe_zero1.pro:93:                    imbad = imbad, gain=gain, bias=bias, minbias=minbias, $
make_spe_zero1.pro:187:    ; Set gain (g).
make_spe_zero1.pro:188:    ; If the gain is not specified, set to 1
make_spe_zero1.pro:191:    if keyword_set(gain) then begin
make_spe_zero1.pro:192:        g = gain
make_spe_zero1.pro:197:        print, 'ASSUMED GAIN = ', g, 'e/DN'
princeton_header__define.pro:19:;   - added AvGainUsed, AvGain
princeton_header__define.pro:239:  PImaxGain:            0, $                ;  148  PI-Max Gain
princeton_header__define.pro:271:  gain:                 0, $                ;  198  gain
princeton_header__define.pro:427:  AvGainUsed:            0,  $                ; 4094  avalanche gain was used
princeton_header__define.pro:429:  AvGain:                0,  $                ; 4096  avalanche gain value
spe_err.pro:1:function spe_err, data, gain_arr, znoise_arr, ferr_arr
spe_err.pro:8:          ( data[*,*,i] > 0) / (gain_arr>0.01) + $
spe_fitshead2struct.pro:262:;    sxaddpar, fitsh, 'PIGAIN', speh.PImaxGain, $
spe_fitshead2struct.pro:263:;      'PImaxGain:PI-Max Gain', before='LASTSPE'
spe_fitshead2struct.pro:264:     speh.PImaxGain = sxpar(fitsh, 'PIGAIN')
spe_fitshead2struct.pro:338:;    sxaddpar, fitsh, 'GAIN', speh.gain, $
spe_fitshead2struct.pro:339:;      'gain:gain', before='LASTSPE'
spe_fitshead2struct.pro:340:     speh.gain = sxpar(fitsh, 'GAIN')
spe_fitshead2struct.pro:923:;    sxaddpar, fitsh, 'AVGAINUS', speh.AvGainUsed, $
spe_fitshead2struct.pro:924:;      'AvGainUsed:avalanche gain was used', before='LASTSPE'
spe_fitshead2struct.pro:925:    speh.AvGainUsed = sxpar(fitsh, 'AVGAINUS')
spe_fitshead2struct.pro:927:;    sxaddpar, fitsh, 'AVGAIN', speh.AvGain, $
spe_fitshead2struct.pro:928:;      'AvGain:avalanche gain value', before='LASTSPE'
spe_fitshead2struct.pro:929:    speh.AvGain = sxpar(fitsh, 'AVGAIN')
spe_head2fits.pro:28:;  2007 Oct 1 LAY change GAIN to GAIN_SPE and DATE to DATE_SPE to
spe_head2fits.pro:242:    sxaddpar, fitsh, 'PIGAIN', speh.PImaxGain, $
spe_head2fits.pro:243:      'PImaxGain:PI-Max Gain', before='LASTSPE'
spe_head2fits.pro:298:    sxaddpar, fitsh, 'GAIN_SPE', speh.gain, $
spe_head2fits.pro:299:      'gain:gain', before='LASTSPE'
spe_head2fits.pro:774:    sxaddpar, fitsh, 'AVGAINUS', speh.AvGainUsed, $
spe_head2fits.pro:775:      'AvGainUsed:avalanche gain was used', before='LASTSPE'
spe_head2fits.pro:777:    sxaddpar, fitsh, 'AVGAIN', speh.AvGain, $
spe_head2fits.pro:778:      'AvGain:avalanche gain value', before='LASTSPE'