Changeset 19071
- Timestamp:
- Aug 14, 2008, 2:46:25 PM (18 years ago)
- Location:
- trunk/ippScripts/scripts
- Files:
-
- 2 edited
-
detrend_norm_apply.pl (modified) (2 diffs)
-
detrend_stack.pl (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/detrend_norm_apply.pl
r18877 r19071 62 62 63 63 my $RECIPE_PPIMAGE = 'PPIMAGE_N'; # Recipe to use with ppImage 64 my $RECIPE_PPSTATS = 'CHIPSTATS'; # Recipe to use with ppStats65 64 66 65 # Define which detrend types we normalise … … 117 116 my $outFile = ($det_type_real eq "mask") ? 'PPIMAGE.OUTPUT.DETMASK' : 'PPIMAGE.OUTPUT';; # XXXX something of a hack (too many places to control things...) 118 117 118 my $RECIPE_PPSTATS = ($det_type_real eq "dark") ? 'DARKSTATS' : 'CHIPSTATS';; # XXXX something of a hack (too many places to control things...) 119 119 120 my $output = $ipprc->filename($outFile, $outroot, $class_id) or &my_die("Missing entry from camera config", $det_id, $iter, $class_id, $PS_EXIT_CONFIG_ERROR); 120 121 my $b1name = $ipprc->filename("PPIMAGE.BIN1", $outroot, $class_id) or &my_die("Missing entry from camera config", $det_id, $iter, $class_id, $PS_EXIT_CONFIG_ERROR); -
trunk/ippScripts/scripts/detrend_stack.pl
r18877 r19071 25 25 use Pod::Usage qw( pod2usage ); 26 26 27 my ( $det_id, $iter, $class_id, $det_type, $camera, $outroot, $dbname, $reduction, $ verbose, $save_temps,27 my ( $det_id, $iter, $class_id, $det_type, $camera, $outroot, $dbname, $reduction, $threads, $verbose, $save_temps, 28 28 $no_update, $no_op, $redirect ); 29 29 GetOptions( … … 36 36 'dbname|d=s' => \$dbname, # Database name 37 37 'reduction=s' => \$reduction, # Reduction class for processing 38 'threads=s' => \$threads, 38 39 'verbose' => \$verbose, # Print to stdout 39 40 'save-temps' => \$save_temps, # Save temporary files? … … 42 43 'redirect-output' => \$redirect, 43 44 ) or pod2usage( 2 ); 44 45 45 46 46 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV; … … 106 106 &my_die("Unrecognised detrend type: $det_type", $det_id, $iter, $class_id, $PS_EXIT_SYS_ERROR) unless defined $output_filerule; 107 107 108 # The output file rule name depends on the detrend type 109 my $STATRECIPES = { 'FLATMASK' => 'CHIPSTATS', 110 'DARKMASK' => 'CHIPSTATS', 111 'MASK' => 'CHIPSTATS', 112 'BIAS' => 'CHIPSTATS', 113 'DARK' => 'DARKSTATS', 114 'DARK_PREMASK' => 'DARKSTATS', 115 'SHUTTER' => 'DARKSTATS', 116 'FLAT' => 'CHIPSTATS', 117 'FLAT_PREMASK' => 'CHIPSTATS', 118 'DOMEFLAT' => 'CHIPSTATS', 119 'SKYFLAT' => 'CHIPSTATS', 120 'FRINGE' => 'CHIPSTATS', 121 }; 122 my $statrecipe = $STATRECIPES->{$det_type}; # File rule for output 108 123 109 124 # Get list of files to stack … … 176 191 $command .= ' -type ' . uc($det_type); # Type of stacking to perform 177 192 $command .= " -stats $outputStats"; # Statistics output filename 178 $command .= " -recipe PPSTATS CHIPSTATS";193 $command .= " -recipe PPSTATS $statrecipe"; 179 194 $command .= " -tracedest $traceDest -log $logDest"; 180 195 $command .= " -dbname $dbname" if defined $dbname; 196 $command .= " -threads $threads" if defined $threads; 181 197 182 198 # Stack the files
Note:
See TracChangeset
for help on using the changeset viewer.
