From b87ecc6046cdf6c4b198b775f38d2daa3d2fa9bd Mon Sep 17 00:00:00 2001
From: Armin Luntzer <armin.luntzer@univie.ac.at>
Date: Wed, 12 Jun 2019 19:10:04 +0200
Subject: [PATCH] SRT SIM: correctly compute VLSR shift

---
 src/server/backends/SIM/rt_sim.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/server/backends/SIM/rt_sim.c b/src/server/backends/SIM/rt_sim.c
index d05214a..e05ee50 100644
--- a/src/server/backends/SIM/rt_sim.c
+++ b/src/server/backends/SIM/rt_sim.c
@@ -1207,10 +1207,15 @@ static gsize HI_get_spec_idx(struct spec_data *s, struct coord_galactic gal,
 {
 	int idx;
 
+	gdouble v;
+
 
-	f = f - (gdouble) s->freq_min_hz + vlsr(galactic_to_equatorial(gal), 0.0);;
+	v = vlsr(galactic_to_equatorial(gal), 0.0);
+
+	f = f - (gdouble) s->freq_min_hz - doppler_freq_relative(v, SIM_V_REF_HZ);
 	f = f / (gdouble) s->freq_inc_hz;
 
+
 	idx = (int) f;
 
 	/* adjust for actual spectrum */
-- 
GitLab