Changeset 16040 for trunk/Ohana/src/opihi/lib.data/starfuncs.c

Timestamp:

Jan 8, 2008, 12:50:52 PM (19 years ago)

Author:

eugene

Message:

replaced sort functions drived from press with sort macros derived from gsl

File:

• trunk/Ohana/src/opihi/lib.data/starfuncs.c (modified) (3 diffs)

trunk/Ohana/src/opihi/lib.data/starfuncs.c

@@ -36 +36 @@
     }
   }
-  sort (ring, Nring);
+  dsort (ring, Nring);
   for (Npts = sky = dsky2 = 0, i = 0.25*Nring; i < 0.75*Nring; i++, Npts += 1.0) {
     sky += ring[i];
@@ -150 +150 @@
     }
   }
-  sort (sky, Nsky);
+  dsort (sky, Nsky);
   for (Npts = fsky = 0, i = 0.25*Nsky; i < 0.75*Nsky; i++, Npts += 1.0) {
     fsky += sky[i];
@@ -199 +199 @@
     }
   }
-  sort (sky, Nsky);
+  dsort (sky, Nsky);
   for (Npts = fsky = 0, i = 0.25*Nsky; i < 0.75*Nsky; i++, Npts += 1.0) {
     fsky += sky[i];