Changeset 8713

Timestamp:

Aug 30, 2006, 2:36:59 PM (20 years ago)

Author:

jhoblitt

Message:

make exp_type a required 'constant' passed to dettool -updateexp

File:

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

trunk/ippScripts/scripts/phase0exp.pl

@@ -26 +26 @@
 # These values should be constant for all components
 use constant CONSTANTS => [
+                           "exp_type", #exposure type
                            "filter", # Filter used
                            "airmass", # Airmass
@@ -101 +102 @@
     my $stdev = get_value($imfile, PHASE0_BG_MEAN_STDEV());
     push @stdevs, $stdev;
-    
-    my $type = get_value($imfile, TYPE());
-    if (not defined $obsType) {
-        $obsType = $type;
-    } elsif ($obsType ne $type) {
-        die "Observation types differ.\n";
-    }
 }
 
@@ -144 +138 @@
     # Add the detrend flag
     foreach my $detrendType (@{DETRENDS()}) {
-        if (lc($obsType) eq lc($detrendType)) {
+        if (lc($values{TYPE()}) eq lc($detrendType)) {
             $command .= " " . DETREND_FLAG;
             last;