Changeset 16019 for trunk/ippScripts/scripts/stack_skycell.pl

Timestamp:

Jan 6, 2008, 1:59:43 PM (18 years ago)

Author:

eugene

Message:

disabled requirement for input sources

File:

• trunk/ippScripts/scripts/stack_skycell.pl (modified) (5 diffs)

trunk/ippScripts/scripts/stack_skycell.pl

@@ -121 +121 @@
                                       UNLINK => !$save_temps );
 my $num = 0;
-my $inputSources;               # Sources to use as stamps
+# my $inputSources;             # Sources to use as stamps
 foreach my $file (@$files) {
     print $listFile "INPUT$num\tMETADATA\n";
@@ -144 +144 @@
     print $listFile "END\n\n";
 
-    unless (defined $inputSources) {
-        $inputSources = $ipprc->filename("PSWARP.OUTPUT.SOURCES", $file->{path_base});
-        &my_die("Source file $inputSources does not exist", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists( $inputSources );
-    }
+    # XXX details about supplying sources, etc, need to be specified in the libraries
+    #unless (defined $inputSources) {
+    #$inputSources = $ipprc->filename("PSWARP.OUTPUT.SOURCES", $file->{path_base});
+    #&my_die("Source file $inputSources does not exist", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists( $inputSources );
+    #}
         
 }
@@ -157 +158 @@
 my $outputMask = $ipprc->filename("PPSTACK.OUTPUT.MASK", $outputRoot);
 my $outputWeight = $ipprc->filename("PPSTACK.OUTPUT.WEIGHT", $outputRoot);
-my $outputSources = $ipprc->filename("PSPHOT.OUTPUT", $outputRoot);
+#my $outputSources = $ipprc->filename("PSPHOT.OUTPUT", $outputRoot, "none");
 #my $bin1Name =  $ipprc->filename("PPSTACK.BIN1", $outputRoot);
 #my $bin2Name =  $ipprc->filename("PPSTACK.BIN2", $outputRoot);
@@ -170 +171 @@
     $command .= " -stats $outputStats";
     $command .= " -recipe PPSTATS WARPSTATS";
-    $command .= " -sources $inputSources";
-    $command .= " -target 5.0";
-    $command .= " -photometry";
+    # $command .= " -sources $inputSources"; XXX : see above re recipes
+    # $command .= " -target 5.0";
+    # $command .= " -photometry";
     $command .= " -tracedest $traceDest -log $logDest";
 
-    print "\n\nWARNING: Convolving to 1 arcsec FWHM seeing!\n\n";
+    # print "\n\nWARNING: Convolving to 1 arcsec FWHM seeing!\n\n";
+    print "\n\nWARNING: NOT Convolving!\n\n";
 
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
@@ -186 +188 @@
     &my_die("Couldn't find expected output file: $outputMask", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputMask);
     &my_die("Couldn't find expected output file: $outputWeight", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputWeight);
-    &my_die("Couldn't find expected output file: $outputSources", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputSources);
-#    &my_die("Couldn't find expected output file: $bin1Name",    $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($bin1Name);
-#    &my_die("Couldn't find expected output file: $bin2Name",    $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($bin2Name);
+#   &my_die("Couldn't find expected output file: $outputSources", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputSources);
+#   &my_die("Couldn't find expected output file: $bin1Name",    $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($bin1Name);
+#   &my_die("Couldn't find expected output file: $bin2Name",    $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($bin2Name);
     &my_die("Couldn't find expected output file: $outputStats", $stack_id, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputStats);