Changeset 6663 for branches/rel10_ifa/psModules/src/astrom/pmConceptsStandard.c

Timestamp:

Mar 21, 2006, 1:52:54 PM (20 years ago)

Author:

Paul Price

Message:

Now works with GPC1 dummy OTA FITS file from Sidik; some other changes to organise things.

File:

• branches/rel10_ifa/psModules/src/astrom/pmConceptsStandard.c (modified) (4 diffs)

branches/rel10_ifa/psModules/src/astrom/pmConceptsStandard.c

@@ -413 +413 @@
         psString format = psMetadataLookupStr(&mdok, formats, name);
         if (mdok && strlen(format) > 0 && strcasecmp(format, "FORTRAN") == 0) {
-            return -1;
+            return 1;
         }
     }
@@ -429 +429 @@
     }
     int offset = concept->data.S32;
-    offset += fortranCorr(cameraFormat, pattern->name);
+    offset -= fortranCorr(cameraFormat, pattern->name);
     return psMetadataItemAllocS32(pattern->name, pattern->comment, offset);
 }
@@ -486 +486 @@
         psMetadataItem *yBinItem = psMetadataLookup(cell->concepts, "CELL.YBIN"); // Binning factor in y
         psString binString = psStringCopy("");
-        psStringAppend(&binString, "%d,%d", concept->data.S32, yBinItem->data.S32);
+        psStringAppend(&binString, "%d %d", concept->data.S32, yBinItem->data.S32);
         psMetadataItem *binItem = psMetadataItemAllocStr(concept->name, concept->comment, binString);
         psFree(binString);
@@ -611 +611 @@
     }
     int offset = concept->data.S32;
-    offset -= fortranCorr(cameraFormat, concept->name);
+    offset += fortranCorr(cameraFormat, concept->name);
     return psMetadataItemAllocS32(concept->name, concept->comment, offset);
 }