Commit cd484766 authored by Roberto Susino's avatar Roberto Susino
Browse files

Fix values and units of wavelengths

parent 702fc61f

metis_l2_prep_uv.pro

+11 −5
Original line number Diff line number Diff line
@@ -203,6 +203,13 @@ pro metis_l2_prep_uv 
    file_name = 'solo_L2_' + file_name_fields[2] + '_' + file_name_fields[3] + '_V' + version + '.fits'

    out_file_name = 'output/' + file_name



    ; instrument/telescope/detector keywords



    wavelnth = cal_pack.uv_channel.bandpass.value[1]

    wavemin = cal_pack.uv_channel.bandpass.value[0]

    wavemax = cal_pack.uv_channel.bandpass.value[2]

    waveband = cal_pack.uv_channel.name



    ; adjust the primary header



    ; delete useless keywords
@@ -222,13 +229,12 @@ pro metis_l2_prep_uv 
    fxaddpar, primary_header, 'TARGET', 'Corona'

    fxaddpar, primary_header, 'BTYPE', btype

    fxaddpar, primary_header, 'BUNIT', bunit

    fxaddpar, primary_header, 'DATAMIN', min(data, /nan)

    fxaddpar, primary_header, 'DATAMAX', max(data, /nan)

    fxaddpar, primary_header, 'WAVEBAND', cal_pack.uv_channel.name

    fxaddpar, primary_header, 'WAVELNTH', wavelnth * 10, '[Angstrom] charact. wavelength of observation'

    fxaddpar, primary_header, 'WAVEMIN', wavemin * 10, '[Angstrom] min. bandpass wavelength'

    fxaddpar, primary_header, 'WAVEMAX', wavemax * 10, '[Angstrom] max. bandpass wavelength'

    fxaddpar, primary_header, 'WAVEBAND', waveband

    fxaddpar, primary_header, 'XPOSURE', header.xposure

    fxaddpar, primary_header, 'NSUMEXP', header.nsumexp

    fxaddpar, primary_header, 'OBJECT', 'Sun'

    fxaddpar, primary_header, 'TARGET', 'Corona'



    ; fix planning info keywords

metis_l2_prep_vl_generic.pro

+11 −3
Original line number Diff line number Diff line
@@ -261,6 +261,13 @@ pro metis_l2_prep_vl_generic 
    file_name = 'solo_L2_' + descriptor + '_' + file_name_fields[3] + '_V' + version + '.fits'

    out_file_name = 'output/' + file_name



    ; instrument/telescope/detector keywords



    wavelnth = cal_pack.vl_channel.bandpass.value[1]

    wavemin = cal_pack.vl_channel.bandpass.value[0]

    wavemax = cal_pack.vl_channel.bandpass.value[2]

    waveband = cal_pack.vl_channel.name



    ; adjust the primary header



    ; delete useless keywords
@@ -280,9 +287,10 @@ pro metis_l2_prep_vl_generic 
    fxaddpar, primary_header, 'TARGET', 'Corona'

    fxaddpar, primary_header, 'BTYPE', btype

    fxaddpar, primary_header, 'BUNIT', bunit

    fxaddpar, primary_header, 'DATAMIN', min(data, /nan)

    fxaddpar, primary_header, 'DATAMAX', max(data, /nan)

    fxaddpar, primary_header, 'WAVEBAND', cal_pack.vl_channel.name

    fxaddpar, primary_header, 'WAVELNTH', wavelnth * 10, '[Angstrom] charact. wavelength of observation'

    fxaddpar, primary_header, 'WAVEMIN', wavemin * 10, '[Angstrom] min. bandpass wavelength'

    fxaddpar, primary_header, 'WAVEMAX', wavemax * 10, '[Angstrom] max. bandpass wavelength'

    fxaddpar, primary_header, 'WAVEBAND', waveband

    fxaddpar, primary_header, 'XPOSURE', header.xposure

    fxaddpar, primary_header, 'NSUMEXP', header.nsumexp

metis_l2_prep_vl_polariz.pro

+12 −2
Original line number Diff line number Diff line
@@ -411,6 +411,13 @@ pro metis_l2_prep_vl_polariz 


    date = date_conv(systime(/julian, /utc), 'FITS')



    ; instrument/telescope/detector keywords



    wavelnth = cal_pack.vl_channel.bandpass.value[1]

    wavemin = cal_pack.vl_channel.bandpass.value[0]

    wavemax = cal_pack.vl_channel.bandpass.value[2]

    waveband = cal_pack.vl_channel.name



    ; adjust the primary header



    ; delete useless keywords
@@ -450,8 +457,11 @@ pro metis_l2_prep_vl_polariz 
    fxaddpar, primary_header, 'DATE-END', header.date_end, 'end time of observation'

    fxaddpar, primary_header, 'OBT_BEG', header.obt_beg, 'start acquisition time in on-board time', format = 'F0.5'

    fxaddpar, primary_header, 'OBT_END', header.obt_end, 'end acquisition time in on-board time', format = 'F0.5'

    fxaddpar, primary_header, 'TELAPSE', telapse, '[s] elapsed time between beginning and end of observation'

    fxaddpar, primary_header, 'WAVEBAND', cal_pack.vl_channel.name

    fxaddpar, primary_header, 'TELAPSE', telapse

    fxaddpar, primary_header, 'WAVELNTH', wavelnth * 10, '[Angstrom] charact. wavelength of observation'

    fxaddpar, primary_header, 'WAVEMIN', wavemin * 10, '[Angstrom] min. bandpass wavelength'

    fxaddpar, primary_header, 'WAVEMAX', wavemax * 10, '[Angstrom] max. bandpass wavelength'

    fxaddpar, primary_header, 'WAVEBAND', waveband

    fxaddpar, primary_header, 'XPOSURE', header.xposure

    fxaddpar, primary_header, 'NSUMEXP', header.nsumexp

    fxaddpar, primary_header, 'TSENSOR', header.tsensor