Tweak equ2hor test for better coverage

Author: attipaci

test/src/test-super.c

@@ -144,10 +144,13 @@ static int test_equ2hor() {
   if(obs.where != NOVAS_OBSERVER_ON_EARTH) return 0;
 
   for(a = 0; a < 24.0; a += 3) {
-    double ra = a, dec = 0.0, az, za, rar, decr;
+    int d;
+    for(d = -90; d <= 90; d += 30) {
+      double ra = a, dec = d, az, za, rar, decr;
 
-    if(!is_ok("itrs_to_hor:rar:null", equ2hor(tdb, 0.0, NOVAS_REDUCED_ACCURACY, 0.0, 0.0, &obs.on_surf, NOVAS_STANDARD_ATMOSPHERE, ra, dec, &az, &za, NULL, &decr))) return 1;
-    if(!is_ok("itrs_to_hor:decr:null", equ2hor(tdb, 0.0, NOVAS_REDUCED_ACCURACY, 0.0, 0.0, &obs.on_surf, NOVAS_STANDARD_ATMOSPHERE, ra, dec, &az, &za, &rar, NULL))) return 1;
+      if(!is_ok("itrs_to_hor:rar:null", equ2hor(tdb, 0.0, NOVAS_REDUCED_ACCURACY, 0.0, 0.0, &obs.on_surf, NOVAS_STANDARD_ATMOSPHERE, ra, dec, &az, &za, NULL, &decr))) return 1;
+      if(!is_ok("itrs_to_hor:decr:null", equ2hor(tdb, 0.0, NOVAS_REDUCED_ACCURACY, 0.0, 0.0, &obs.on_surf, NOVAS_STANDARD_ATMOSPHERE, ra, dec, &az, &za, &rar, NULL))) return 1;
+    }
   }
 
   return 0;