From edf37a428126f2f05d33e9b2487878268c482914 Mon Sep 17 00:00:00 2001
From: Roberto Susino <roberto.susino@inaf.it>
Date: Wed, 16 Mar 2022 10:54:54 +0100
Subject: [PATCH] Add new comment line in FITS headers

---
 metis_l2_prep_uv.pro         | 1 +
 metis_l2_prep_vl_generic.pro | 3 ++-
 metis_l2_prep_vl_polariz.pro | 1 +
 3 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/metis_l2_prep_uv.pro b/metis_l2_prep_uv.pro
index 2f28fc5..93fbe60 100644
--- a/metis_l2_prep_uv.pro
+++ b/metis_l2_prep_uv.pro
@@ -169,6 +169,7 @@ pro metis_l2_prep_uv
 
 	fxaddpar, primary_header, 'COMMENT', 'WARNING: UV radiometric calibration is still preliminary.'
 	fxaddpar, primary_header, 'COMMENT', 'Uncertainty matrix in the FITS extension is preliminary.'
+	fxaddpar, primary_header, 'COMMENT', 'Rotate CROTA degrees counter-clockwise to have Solar North up.'
 
 	for k = 0, n_elements(history) - 1 do $
 	fxaddpar, primary_header, 'HISTORY', history[k]
diff --git a/metis_l2_prep_vl_generic.pro b/metis_l2_prep_vl_generic.pro
index 738186b..c1a82e8 100644
--- a/metis_l2_prep_vl_generic.pro
+++ b/metis_l2_prep_vl_generic.pro
@@ -200,7 +200,8 @@ pro metis_l2_prep_vl_generic
 	; update the comment and history keywords
 
 	fxaddpar, primary_header, 'COMMENT', 'Uncertainty matrix in the FITS extension is preliminary.'
-
+	fxaddpar, primary_header, 'COMMENT', 'Rotate CROTA degrees counter-clockwise to have Solar North up.'
+	
 	for k = 0, n_elements(history) - 1 do $
 	fxaddpar, primary_header, 'HISTORY', history[k]
 	fxaddpar, primary_header, 'HISTORY', 'L2 FITS file created on ' + date
diff --git a/metis_l2_prep_vl_polariz.pro b/metis_l2_prep_vl_polariz.pro
index 394aa21..89e510e 100755
--- a/metis_l2_prep_vl_polariz.pro
+++ b/metis_l2_prep_vl_polariz.pro
@@ -321,6 +321,7 @@ pro metis_l2_prep_vl_polariz
 	; update the comment and history keywords
 
 	fxaddpar, primary_header, 'COMMENT', 'Uncertainty matrix in the FITS extension is preliminary.'
+	fxaddpar, primary_header, 'COMMENT', 'Rotate CROTA degrees counter-clockwise to have Solar North up.'
 
 	history = ['Update WCS and solar ephemeris:', '  SKD version = ' + kernel_version]
 	
-- 
GitLab