Changeset 17196

Timestamp:

Mar 28, 2008, 3:28:22 PM (18 years ago)

Author:

eugene

Message:

sort stars to speed the ingest

File:

• trunk/Ohana/src/addstar/src/get2mass_ops.c (modified) (1 diff)

trunk/Ohana/src/addstar/src/get2mass_ops.c

@@ -256 +256 @@
   return (sky);
 }
+
+int get2mass_sortStars (TMStars *tstars, int Ntstars) {
+
+# define SWAPFUNC(A,B){ TMStars temp = tstars[A]; tstars[A] = tstars[B]; tstars[B] = temp; }
+# define COMPARE(A,B)(tstars[A].R < tstars[B].R)
+
+  OHANA_SORT (Ntstars, COMPARE, SWAPFUNC);
+
+# undef SWAPFUNC
+# undef COMPARE
+  
+  return TRUE;
+}