Loading metis_l1_prep.pro +5 −4 Original line number Diff line number Diff line Loading @@ -95,7 +95,7 @@ pro metis_l1_prep journal, 'L0 FITS file correctly read:' journal, ' datatype = ' + string(datatype, format = '(I0)') journal, ' size = ' + string(naxis1, format = '(I0)') + '×' + string(naxis2, format = '(I0)') if datatype le 6 then journal, ' size = ' + string(naxis1, format = '(I0)') + '×' + string(naxis2, format = '(I0)') ; NOTE - the radialization extension is ignored Loading Loading @@ -180,8 +180,9 @@ pro metis_l1_prep if fxpar(primary_header, 'COMPR') then bin_type = fxpar(primary_header, 'B0_BIN') else bin_type = 0 pol_id = fxpar(primary_header, 'POL_ID') fpfilt = fxpar(primary_header, 'VLFPFILT', count = count) if count gt 0 and fpfilt eq 0 and bin_type eq 0 then bin_type = 1 if count gt 0 and pol_id eq 0 and fpfilt eq 0 and bin_type eq 0 then bin_type = 1 bin_fact = 2. ^ bin_type if bin_fact gt 1. then begin Loading Loading @@ -443,7 +444,7 @@ pro metis_l1_prep exit, status = 0 error_handling: journal, 'Errors occurred while processing.', /continue journal, 'Errors occurred while processing.' journal exit, status = 1 end No newline at end of file Loading
metis_l1_prep.pro +5 −4 Original line number Diff line number Diff line Loading @@ -95,7 +95,7 @@ pro metis_l1_prep journal, 'L0 FITS file correctly read:' journal, ' datatype = ' + string(datatype, format = '(I0)') journal, ' size = ' + string(naxis1, format = '(I0)') + '×' + string(naxis2, format = '(I0)') if datatype le 6 then journal, ' size = ' + string(naxis1, format = '(I0)') + '×' + string(naxis2, format = '(I0)') ; NOTE - the radialization extension is ignored Loading Loading @@ -180,8 +180,9 @@ pro metis_l1_prep if fxpar(primary_header, 'COMPR') then bin_type = fxpar(primary_header, 'B0_BIN') else bin_type = 0 pol_id = fxpar(primary_header, 'POL_ID') fpfilt = fxpar(primary_header, 'VLFPFILT', count = count) if count gt 0 and fpfilt eq 0 and bin_type eq 0 then bin_type = 1 if count gt 0 and pol_id eq 0 and fpfilt eq 0 and bin_type eq 0 then bin_type = 1 bin_fact = 2. ^ bin_type if bin_fact gt 1. then begin Loading Loading @@ -443,7 +444,7 @@ pro metis_l1_prep exit, status = 0 error_handling: journal, 'Errors occurred while processing.', /continue journal, 'Errors occurred while processing.' journal exit, status = 1 end No newline at end of file