From 679d34a62dbde6bc2c24c85a575fbd52052de270 Mon Sep 17 00:00:00 2001
From: Roberto Susino <roberto.susino@inaf.it>
Date: Tue, 18 Jan 2022 14:21:31 +0100
Subject: [PATCH] Optimize solo_get_pointing.pro routine

---
 solo_get_pointing.pro | 15 ++++++---------
 1 file changed, 6 insertions(+), 9 deletions(-)

diff --git a/solo_get_pointing.pro b/solo_get_pointing.pro
index b344926..ab7c1c0 100644
--- a/solo_get_pointing.pro
+++ b/solo_get_pointing.pro
@@ -1,4 +1,4 @@
-function solo_get_pointing, utc, degrees = degrees, arcsec = arcsec
+function solo_get_pointing, utc, degrees = degrees, arcsec = arcsec, celestial = celestial
 
 	; convert the requested date into ephemeris time
 
@@ -20,14 +20,11 @@ function solo_get_pointing, utc, degrees = degrees, arcsec = arcsec
 
 	; make the conversion form rtn to hpc, if necessary
 
-	if frame eq 'SOLO_SUN_RTN' then begin
-		yaw = !dpi * signum(yaw) - yaw
-		pitch = -pitch
-		roll = -roll
-	endif else begin
-		pitch = -pitch
-	endelse
-
+	if frame eq 'SOLO_SUN_RTN' then yaw = !dpi * signum(yaw) - yaw
+	
+	pitch = -pitch
+	roll = -roll
+	
 	; correct any cases where the roll is greater than +/- 180 degrees
 
 	if abs(roll) gt !dpi then roll = roll - 2. * !dpi * signum(roll)
-- 
GitLab