[GRASS-SVN] r51846 - grass/branches/develbranch_6/raster/r.out.arc

[svn_grass at osgeo.org]

Author: mmetz
Date: 2012-05-28 03:42:45 -0700 (Mon, 28 May 2012)
New Revision: 51846

Modified:
   grass/branches/develbranch_6/raster/r.out.arc/main.c
Log:
r.out.arc precision fix

Modified: grass/branches/develbranch_6/raster/r.out.arc/main.c
===================================================================
--- grass/branches/develbranch_6/raster/r.out.arc/main.c	2012-05-28 09:31:30 UTC (rev 51845)
+++ grass/branches/develbranch_6/raster/r.out.arc/main.c	2012-05-28 10:42:45 UTC (rev 51846)
@@ -157,11 +157,15 @@
 	    }
 	}
 	else {			/* yes, lat/long */
-	    fprintf(fp, "xllcorner %f\n", region.west);
-	    fprintf(fp, "yllcorner %f\n", region.south);
+	    G_format_easting(region.west, buf, -1);
+	    fprintf(fp, "xllcorner %s\n", buf);
+
+	    G_format_northing(region.south, buf, -1);
+	    fprintf(fp, "yllcorner %s\n", buf);
 	}
 
-	fprintf(fp, "cellsize %f\n", cellsize);
+	G_format_resolution(cellsize, buf, -1);
+	fprintf(fp, "cellsize %s\n", buf);
 	fprintf(fp, "NODATA_value %s\n", null_str);
     }