Changeset 2592

Timestamp:

Dec 1, 2004, 12:45:11 PM (22 years ago)

Author:

eugene

Message:

fixed phot keywords

File:

• trunk/Ohana/src/perl/src/grab.keywords (modified) (1 diff)

trunk/Ohana/src/perl/src/grab.keywords

@@ -143 +143 @@
     $line = sprintf "PHOT_X  = %20.4F / Elixir zero point - color term             \n", $words[7];  @photom = (@photom, $line);
     $line = sprintf "PHOT_K  = %20.4F / Elixir zero point - airmass term           \n", $words[8];  @photom = (@photom, $line);
-    $line = sprintf "PHOT_C1 = '%-18s' / Elixir zero point - color 1               \n", $words[9];  @photom = (@photom, $line);
-    $line = sprintf "PHOT_C2 = '%-18s' / Elixir zero point - color 2               \n", $words[10]; @photom = (@photom, $line);
+    $line = sprintf "PHOT_C1 = '%-18s' / Elixir zero point - color 1               \n", $words[10];  @photom = (@photom, $line);
+    $line = sprintf "PHOT_C2 = '%-18s' / Elixir zero point - color 2               \n", $words[11]; @photom = (@photom, $line);
     
     if ($cmproot ne "phu") {