Changeset 37823 for branches/eam_branches/ipp-pv3-20140717-merge/tools/heather/queuesliceslap2.pl

Timestamp:

Jan 12, 2015, 12:31:04 PM (12 years ago)

Author:

eugene

Message:

merge changes from trunk

File:

• branches/eam_branches/ipp-pv3-20140717-merge/tools/heather/queuesliceslap2.pl (modified) (2 diffs)

branches/eam_branches/ipp-pv3-20140717-merge/tools/heather/queuesliceslap2.pl

@@ -4 +4 @@
 
 
-$label = "LAP.ThreePi.20130717";
-
+$label1 = "LAP.ThreePi.20130717";
+$label2 = "LAP.ThreePi.20130717.pole3";
+$label3 = "LAP.ThreePi.20130717.pole3.CNP";
+#heather done bad things to segments and slices...
+@labels = ($label1, $label2, $label3);
 @segments = (0,1,2,3,4,5,6,7,8);
+#@segments=(0,1);
 @segments1 = ( -35, -22,-10,2,14,26,38,50,62);
 @segments2 = ( -22,-10,2,14,26,38,50,62,75);
 
 
-@slices = ("00","02","04","06","08",10,12,14,16,18,20,22);
-    
-$slice = $slices[0];
-$slice = $slices[1];
+@slices = ("00","02","04","06","08","10","12","14","16","18","20","22");
+#@slices = ("00","02","04");
+
+foreach $label (@labels) {
+
+foreach $slice (@slices) {
+   
+#$slice = $slices[0];
+#$slice = $slices[1];
     foreach $num (@segments) {
 
-        $dvodb = "LAP.20130717";
-        $minidvodb_group = "LAP.slice$slice.$segments[$num].cam";
+        $dvodb = "LAP.PV2.V2.20130717";
+        $minidvodb_group = "LAP.PV2.V2.slice$slice.$segments[$num].cam";
         $dvodb_label = "$minidvodb_group";
         $ra_min = $slice*15.0;
@@ -27 +36 @@
 
         
-        print "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group $minidvodb_group -set_minidvodb -set_label $dvodb_label -stage cam -uncensored -ra_min $ra_min -ra_max $ra_max -decl_min $dec_min -decl_max $dec_max -dbname gpc1 \n";
-
-
+        $com =  "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group $minidvodb_group -set_minidvodb -set_label $dvodb_label -stage cam -uncensored -ra_min $ra_min -ra_max $ra_max -decl_min $dec_min -decl_max $dec_max -dbname gpc1";
+        print "$com\n";
+        `$com`;
+    }
 
 }
+$com2 = "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group LAP.PV2.V2.pole.cam -set_minidvodb -set_label LAP.PV2.V2.pole.cam -stage cam -uncensored -ra_min 0 -ra_max 360 -decl_min 75 -decl_max 90 -dbname gpc1";
+print "$com2\n";
+`$com2`;
+}