Changeset 25050 for branches/czw_branch/cleanup/ippScripts/scripts/stack_skycell.pl

Timestamp:

Aug 11, 2009, 2:36:22 PM (17 years ago)

Author:

watersc1

Message:

Fixed typos in cleanup sql and created the correct filelist to delete.

Made changes to psastro and pmAstrometryWCS to allow the choice between PC and CD header keywords.

File:

• branches/czw_branch/cleanup/ippScripts/scripts/stack_skycell.pl (modified) (8 diffs)

branches/czw_branch/cleanup/ippScripts/scripts/stack_skycell.pl

@@ -65 +65 @@
 
 my $ipprc = PS::IPP::Config->new() or my_die( "Unable to set up", $stack_id, $PS_EXIT_CONFIG_ERROR ); # IPP configuration
+$| = 1;
+print "I've set up: $stack_id\n";
 
 # XXX camera is not known here; cannot use filerules...
@@ -107 +109 @@
 &my_die("Stack list contains less than two elements", $stack_id, $PS_EXIT_SYS_ERROR) unless
     scalar @$files >= 2;
+
+print "I've loaded my inputs: $stack_id\n";
 
 # Parse the list of input files to get the tesselation, skycell identifiers and camera
@@ -146 +150 @@
 }
 
+print "I've configured everything: $stack_id\n";
+
 # Generate MDC file with the inputs
 my $tess_base = basename($tess_id);
@@ -180 +186 @@
     print $listFile "END\n\n";
 }
+
+print "I've checked everything: $stack_id\n";
 
 # Get the output filenames
@@ -200 +208 @@
 
 my $cmdflags;
+
 
 # Perform stacking
@@ -265 +274 @@
 #       &my_die("Couldn't find expected output file: $bin2Name",    $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($bin2Name);
     }
-
+    
+    print "I've stacked $listName: $stack_id\n";
 }
 
@@ -298 +308 @@
 }
 
+print "I've updated teh database: $stack_id\n";
+
 
 my $my_die_called = 0;
@@ -372 +384 @@
 }
 
+print "I've reached the end of processing with a code of $?: $stack_id\n";
 
 END {