Index: BOL/trunk/Class_Reg/geo2reg.F90
===================================================================
--- BOL/trunk/Class_Reg/geo2reg.F90	(revision 612)
+++ BOL/trunk/Class_Reg/geo2reg.F90	(revision 613)
@@ -666,5 +666,5 @@
       count(2) = 1
       start(3) = m
-      count(4) = 1
+      count(3) = 1
     endif
     ierr = NF_PUT_VARA_REAL(out_file_id, var_x_id, start, count, &
