- Timestamp:
- Sep 27, 2009, 11:34:07 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/eam_branches/20090715/ippScripts/scripts/warp_skycell.pl
r24487 r25624 183 183 close $astromFile; 184 184 185 # We need the recipe to determine if we care whether the PSF is generated or not 186 my $recipe; 187 { 188 my $command = "$ppConfigDump -camera $camera -dump-recipe PSWARP -recipe PSWARP $recipe_pswarp -"; 189 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 190 run(command => $command, verbose => $verbose); 191 unless ($success) { 192 $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR); 193 &my_die("Unable to perform ppConfigDump: $error_code", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR); 194 } 195 $recipe = $mdcParser->parse(join "", @$stdout_buf) or 196 &my_die("Unable to parse metadata config doc", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR); 197 } 198 185 199 186 200 # Run pswarp … … 201 215 $command .= " -F SOURCE.PLOT.APRESID SOURCE.PLOT.SKY.APRESID"; 202 216 $command .= " -recipe PSWARP $recipe_pswarp"; 203 $command .= " -psf"; # Turn on PSF determination204 217 $command .= " -tracedest $traceDest -log $logDest"; 205 218 $command .= " -threads $threads" if defined $threads; … … 253 266 &my_die("Couldn't find expected output file: $outputWeight", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputWeight); 254 267 &my_die("Couldn't find expected output file: $outputSources", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR) unless $ipprc->file_exists($outputSources); 255 &my_die("Couldn't find expected output file: $outputPSF", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR) unless$ipprc->file_exists($outputPSF);268 &my_die("Couldn't find expected output file: $outputPSF", $warp_id, $skycell_id, $tess_dir, $PS_EXIT_SYS_ERROR) if metadataLookupBool($recipe, 'PSF') and not $ipprc->file_exists($outputPSF); 256 269 } 257 270
Note:
See TracChangeset
for help on using the changeset viewer.
