Index: trunk/ippToPsps/test/mksasdata.dvo
===================================================================
--- trunk/ippToPsps/test/mksasdata.dvo	(revision 39134)
+++ trunk/ippToPsps/test/mksasdata.dvo	(revision 39265)
@@ -179,4 +179,23 @@
 end
 
+# create a populated catdir with a set of cmf files, save the filenames in list for use by insert.exp
+macro mkcatdir.ffg
+  if ($0 != 2)
+    echo "mkcatdir.ffg (catdir)"
+    break
+  end
+
+  $catdir = $1
+
+  for i 0 $galfiles:n
+    list word -split $galfiles:$i
+    $cmffile = $word:0
+    $stkID = $word:1
+    $filter = $word:2
+    echo loadgalphot -D CATDIR $catdir -photcode GPC1.$filter.ForcedWarp -image-id $stkID $cmffile 
+    exec loadgalphot -D CATDIR $catdir -photcode GPC1.$filter.ForcedWarp -image-id $stkID $cmffile
+  end
+end
+
 macro mkcal
   # run relphot
