[GRASS-SVN] r51848 - grass/branches/releasebranch_6_4/raster/r.out.arc

[svn_grass at osgeo.org]

Author: mmetz
Date: 2012-05-28 03:50:20 -0700 (Mon, 28 May 2012)
New Revision: 51848

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

Modified: grass/branches/releasebranch_6_4/raster/r.out.arc/main.c
===================================================================
--- grass/branches/releasebranch_6_4/raster/r.out.arc/main.c	2012-05-28 10:44:05 UTC (rev 51847)
+++ grass/branches/releasebranch_6_4/raster/r.out.arc/main.c	2012-05-28 10:50:20 UTC (rev 51848)
@@ -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);
     }