Changeset 9453 for trunk/ippScripts/scripts/detrend_reject_exp.pl
- Timestamp:
- Oct 9, 2006, 6:37:15 PM (20 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/detrend_reject_exp.pl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/detrend_reject_exp.pl
r9452 r9453 117 117 my $command = "$dettool -updateresidexp -det_id $det_id -iteration $iter -exp_tag $expTag"; # Command to run 118 118 my $reject = 0; # Reject this exposure? 119 my $not_reject = 0; # Reject this exposure? 119 120 if (not $accept[$i]) { 120 121 # Rejected this at an earlier stage … … 128 129 (($means[$i] - $meanStats->mean()) / $meanStats->standard_deviation()) . 129 130 " vs " . REJECT_MEAN->{$det_type} . "\n"; 130 $ reject = 1;131 $not_reject = 1; 131 132 } elsif (defined REJECT_STDEV->{$det_type} and 132 133 defined $stdevStats->standard_deviation() and … … 137 138 (($stdevs[$i] - $stdevStats->mean()) / $stdevStats->standard_deviation()) . 138 139 " vs " . REJECT_STDEV->{$det_type} . "\n"; 139 $ reject = 1;140 $not_reject = 1; 140 141 } elsif (defined REJECT_MEAN_STDEV->{$det_type} and 141 142 defined $meanStdevStats->standard_deviation() and … … 146 147 (($meanStdevs[$i] - $meanStdevStats->mean()) / $meanStdevStats->standard_deviation()) . 147 148 " vs " . REJECT_MEAN_STDEV->{$det_type} . "\n"; 148 $ reject = 1;149 $not_reject = 1; 149 150 } 150 151
Note:
See TracChangeset
for help on using the changeset viewer.
