Index: branches/eam_branches/largefiles.20100314/Ohana/src/addstar/test/relastro.dvo
===================================================================
--- branches/eam_branches/largefiles.20100314/Ohana/src/addstar/test/relastro.dvo	(revision 27372)
+++ branches/eam_branches/largefiles.20100314/Ohana/src/addstar/test/relastro.dvo	(revision 27373)
@@ -1,4 +1,14 @@
 
 input tap.dvo
+
+# this set fails because the match radius does not equal the keep radius:
+list offset
+  0.0
+ -1.0
+  1.0
+  0.5
+  1.0
+  2.99
+end
 
 # offset values are in pixels
@@ -23,5 +33,5 @@
 macro test.relastro
 
-  tapPLAN 28
+  tapPLAN 42
 
   exec rm -rf catdir.test
@@ -29,4 +39,5 @@
   $RA = 10.0
   $DEC = 20.0
+  $dOFF = 0.15
 
   for i 0 $offset:n
@@ -45,8 +56,10 @@
   create n 0 RA[]
 
+  echo raw
   for i 0 $offset:n
-    subset dr = dR if (n % 4 == $i)
+    subset dr = dR if (n % $offset:n == $i)
     vstat -q dr
-    tapOK {abs($offset:0 - $MEAN / (3600*$cdelt) - $offset:$i) < 0.1} "raw dX $i = {$MEAN / (3600*$cdelt)}"
+    # echo $offset:0 {$MEAN / (3600*$cdelt)} $offset:$i {abs($offset:0 - $MEAN / (3600*$cdelt) - $offset:$i)} 
+    tapOK {abs($offset:0 - $MEAN / (3600*$cdelt) - $offset:$i) < $dOFF} "raw dX $i = {$MEAN / (3600*$cdelt)} : {abs($offset:0 - $MEAN / (3600*$cdelt) - $offset:$i)}"
   end
 
@@ -62,6 +75,7 @@
     $dXmean = $dXmean / $offset:n
   
+    echo objects
     for i 0 $offset:n
-      subset dr = dR if (n % 4 == $i)
+      subset dr = dR if (n % $offset:n == $i)
       vstat -q dr
   
@@ -70,7 +84,8 @@
         $dXexpect = $dXmean - $MEAN / (3600*$cdelt) - $offset:$i 
       end
-      tapOK {abs($dXexpect) < 0.1} "update objects dX $i = {$MEAN / (3600*$cdelt)}"
+      # echo $dXmean {$MEAN / (3600*$cdelt)} $offset:$i  {$dXmean - $MEAN / (3600*$cdelt) - $offset:$i}
+      tapOK {abs($dXexpect) < $dOFF} "update objects dX $i = {$MEAN / (3600*$cdelt)} : $dXexpect"
   
-      # subset ms = mag if (n % 4 == $i)
+      # subset ms = mag if (n % $offset:n == $i)
       # lim ms dr; clear; box; plot ms dr
       # cursor
@@ -81,12 +96,14 @@
     create n 0 RA[]
   
+    echo simple
     for i 0 $offset:n
-      subset dr = dR if (n % 4 == $i)
+      subset dr = dR if (n % $offset:n == $i)
       vstat -q dr
   
       $dXexpect = $MEAN / (3600*$cdelt)
-      tapOK {abs($dXexpect) < 0.1} "update simple dX $i = {$MEAN / (3600*$cdelt)}"
+      # echo {$MEAN / (3600*$cdelt)}
+      tapOK {abs($dXexpect) < $dOFF} "update simple dX $i = {$MEAN / (3600*$cdelt)}"
   
-      # subset ms = mag if (n % 4 == $i)
+      # subset ms = mag if (n % $offset:n == $i)
       # lim ms dr; clear; box; plot ms dr
       # cursor
