Changeset 19461 for trunk/ippScripts/scripts/diff_skycell.pl

Timestamp:

Sep 10, 2008, 9:34:17 AM (18 years ago)

Author:

Paul Price

Message:

Adding threads.

File:

• trunk/ippScripts/scripts/diff_skycell.pl (modified) (3 diffs)

trunk/ippScripts/scripts/diff_skycell.pl

@@ -25 +25 @@
 use Pod::Usage qw( pod2usage );
 
-my ($diff_id, $dbname, $outroot, $verbose, $no_update, $no_op);
+my ($diff_id, $dbname, $threads, $outroot, $verbose, $no_update, $no_op);
 GetOptions(
     'diff_id|d=s'       => \$diff_id, # Diff identifier
     'dbname|d=s'        => \$dbname, # Database name
+    'threads=d'         => \$threads,   # Number of threads to use
     'outroot=s'         => \$outroot, # Output root name
     'verbose'           => \$verbose,   # Print to stdout
@@ -100 +101 @@
             $templateWeight = "PPSTACK.OUTPUT.WEIGHT";
             $templateSources = "PSPHOT.OUT.CMF.MEF";  ## this must be consistent with the value in stack_skycell.pl:161
-            ## use an explicit stack name for psphot output objects
+            ## use an explicit stack name for psphot output objects
         } else {
             $templateMask = "PSWARP.OUTPUT.MASK";
@@ -192 +193 @@
     $command .= " -refweight $templateWeight";
     $command .= " -stats $outputStats";
+    $command .= " -threads $threads" if defined $threads;
     $command .= " -recipe PPSTATS WARPSTATS";
     $command .= " -F PSPHOT.OUTPUT PSPHOT.OUT.CMF.MEF";