Index: trunk/ppTranslate/src/ppMopsRead.c
===================================================================
--- trunk/ppTranslate/src/ppMopsRead.c	(revision 34777)
+++ trunk/ppTranslate/src/ppMopsRead.c	(revision 34779)
@@ -28,5 +28,5 @@
   for (int i = 0; i < num; i++) {
     const char *name = inNames->data[i];
-    printf("%s\n", name);
+    printf("Input filename:\n%s\n", name);
 
     psFits *fits = psFitsOpen(name,  "r"); // FITS file
@@ -84,4 +84,5 @@
     }
     ppMopsDetections *det = ppMopsDetectionsAlloc(size);
+    det->platescale = NAN;
     detections->data[i] = det;
     det->component = psStringNCopy(name, strrchr(name, '.') - name); // Strip off extension
@@ -280,4 +281,5 @@
       if (isfinite(scale)) {
           det->platescale = scale;
+          //printf("platescale = %g\n", scale);
       }
       numGood++;
@@ -306,4 +308,5 @@
     }
 
+    printf("Detection platescale = %g\n", det->platescale);
     psTrace("ppMops.read", 2, "Read %ld good rows from %s\n", numGood, (const char*)name);
   }
Index: trunk/ppTranslate/src/ppMopsWrite.c
===================================================================
--- trunk/ppTranslate/src/ppMopsWrite.c	(revision 34777)
+++ trunk/ppTranslate/src/ppMopsWrite.c	(revision 34779)
@@ -51,4 +51,5 @@
   float seeing = 0.;
   int totalGood = 0;
+  int platescale_has_been_set = 0;
   for (int d = 0; d < detections->n; d++) {
     if ( (detections->data[d] != NULL) && (isfinite(((ppMopsDetections*) detections->data[d])->seeing)) ) {
@@ -56,9 +57,19 @@
       totalGood += 1;
       if (isfinite(((ppMopsDetections*) detections->data[d])->platescale)) {
+          if (platescale_has_been_set == 0) {
           det->platescale = ((ppMopsDetections*) detections->data[d])->platescale;
-      }
-    }
-  }
-  printf("plate-scale = [%g]\n", det->platescale);
+              platescale_has_been_set = 1;
+          } else {
+              if (det->platescale != ((ppMopsDetections*) detections->data[d])->platescale) {
+                  printf("Different values for platescale: %g - %g in detection %d\n",
+                         det->platescale,
+                         ((ppMopsDetections*) detections->data[d])->platescale,
+                         d);
+      }
+    }
+  }
+    }
+  }
+  //printf("plate-scale = [%g]\n", det->platescale);
   seeing /= (float) totalGood;
   if (det != NULL) {