Changeset 42296
- Timestamp:
- Oct 19, 2022, 2:22:04 PM (4 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/nightly_science.pl (modified) (9 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/nightly_science.pl
r42259 r42296 1567 1567 # Each comment should only appear once. Therefore, if we see it more than once, we assume the first is extra. 1568 1568 my %comment_hash = (); 1569 my $Nbad = 0; 1569 1570 foreach my $this_warp (@{ $warps }) { 1570 1571 my $this_comment = ${ $this_warp }[3]; … … 1573 1574 my $this_state = ${ $this_warp }[4]; 1574 1575 my $this_warp_id = ${ $this_warp }[1]; 1576 1577 #find exposures for this object that have not been fully processed 1575 1578 if (($this_warp_id eq 'NULL') && (($this_quality == 0) || ($this_quality eq 'NULL')) ) { 1576 print STDERR "diff_queue: excluding $this_object from making diffs due to exposure $this_exp_id not being processed to warp stage\n"; 1577 next; 1579 Nbad += 1; 1578 1580 } 1579 1581 … … 1585 1587 } 1586 1588 } 1589 1590 #kick object out of diff consideration if it has exposures not fully processed 1591 if ($Nbad > 0) { 1592 print STDERR "diff_queue: excluding $this_object from making diffs due to not being fully processed to warp stage\n"; 1593 next; 1594 } 1595 1587 1596 # Exclude any warps that are not stored in the comment_hash. 1588 1597 my @keep_warps = (); … … 1766 1775 my %comment_hash = (); 1767 1776 my %comment_hash_good = (); 1777 my $Nbad = 0; 1768 1778 foreach my $this_warp (@{ $warps }) { 1769 1779 my $this_comment = ${ $this_warp }[3]; … … 1772 1782 my $this_state = ${ $this_warp }[4]; 1773 1783 my $this_fwhm = ${ $this_warp }[7]; 1784 my $this_warp_id = ${ $this_warp }[1]; 1785 1786 #find exposures for this object that have not been fully processed 1787 if (($this_warp_id eq 'NULL') && (($this_quality == 0) || ($this_quality eq 'NULL')) ) { 1788 Nbad += 1; 1789 } 1790 1774 1791 if (($this_quality != 0) || ($this_state eq 'drop') || ($this_fwhm > $maxFWHM)) { 1775 1792 print STDERR "desp_diff_singles: excluding $this_exp_id for $this_object due to non-zero cam.quality $this_quality or state $this_state or FWHM $this_fwhm\n"; … … 1783 1800 $comment_hash{$this_comment} = $this_exp_id; 1784 1801 } 1802 } 1803 1804 #kick object out of diff consideration if it has exposures not fully processed 1805 if ($Nbad > 0) { 1806 print STDERR "desp_diff_singles: excluding $this_object from making diffs due to not being fully processed to warp stage\n"; 1807 next; 1785 1808 } 1786 1809 … … 2138 2161 my %comment_hash = (); 2139 2162 my %comment_hash_good = (); 2163 my $Nbad = 0; 2140 2164 foreach my $this_warp (@{ $warps }) { 2141 2165 my $this_comment = ${ $this_warp }[3]; … … 2144 2168 my $this_state = ${ $this_warp }[4]; 2145 2169 my $this_fwhm = ${ $this_warp }[7]; 2170 my $this_warp_id = ${ $this_warp }[1]; 2171 2172 #find exposures for this object that have not been fully processed 2173 if (($this_warp_id eq 'NULL') && (($this_quality == 0) || ($this_quality eq 'NULL')) ) { 2174 Nbad += 1; 2175 } 2176 2146 2177 if (($this_quality != 0) || ($this_state eq 'drop') || ($this_fwhm > $maxFWHM)) { 2147 2178 print STDERR "desp_diff_queue: excluding $this_exp_id for $this_object due to non-zero cam.quality $this_quality or state $this_state or FWHM $this_fwhm\n"; … … 2155 2186 $comment_hash{$this_comment} = $this_exp_id; 2156 2187 } 2188 } 2189 2190 #kick object out of diff consideration if it has exposures not fully processed 2191 if ($Nbad > 0) { 2192 print STDERR "desp_diff_queue: excluding $this_object from making diffs due to not being fully processed to warp stage\n"; 2193 next; 2157 2194 } 2158 2195
Note:
See TracChangeset
for help on using the changeset viewer.
