[GRASS-CVS] [addons] r1247 - trunk/grassaddons/gipe/script_generator
grass-commit-addons at grass.itc.it
grass-commit-addons at grass.itc.it
Wed Dec 5 07:21:41 EST 2007
Author: chemin
Date: 2007-12-05 13:21:24 +0100 (Wed, 05 Dec 2007)
New Revision: 1247
Modified:
trunk/grassaddons/gipe/script_generator/l7_in_read.c
Log:
updated after bug fixing
Modified: trunk/grassaddons/gipe/script_generator/l7_in_read.c
===================================================================
--- trunk/grassaddons/gipe/script_generator/l7_in_read.c 2007-12-05 12:12:30 UTC (rev 1246)
+++ trunk/grassaddons/gipe/script_generator/l7_in_read.c 2007-12-05 12:21:24 UTC (rev 1247)
@@ -577,7 +577,7 @@
/*Calculate Latitude*/
system("echo \"\" >> temp.txt");
system("echo \"#LATITUDE, DOY, TSW\" >> temp.txt");
- snprintf(sys_4,1000,"echo \"i.latitude input=%s.albedo latitude=%s.latitude --overwrite ; r.mapcalc %s.doy=%d ; r.mapcalc %s.tsw=0.7\" >> temp.txt", basedate, basedate, basedate, doy, basedate);
+ snprintf(sys_4,1000,"echo \"i.latitude input=%s.albedo latitude=%s.latitude --overwrite ; i.longitude input=%s.albedo longitude=%s.longitude --overwrite ; r.mapcalc %s.doy=%d ; r.mapcalc %s.tsw=0.7\" >> temp.txt", basedate, basedate, basedate, basedate, basedate, doy, basedate);
/*Create a doy layer*/
system(sys_4);
system("echo \"\" >> temp.txt");
@@ -626,7 +626,7 @@
sprintf(sys_11,"echo \"r.mapcalc \"%s.phi=%f\"\" >> temp.txt",basedate,sun_elevation);
system(sys_11);
system("echo \"\" >> temp.txt");
- sprintf(sys_12," echo \"i.sattime doy=%s.doy lat=%s.latitude sun_elev=%s.phi sath=%s.sath --overwrite\" >> temp.txt",basedate,basedate,basedate,basedate);
+ sprintf(sys_12," echo \"i.sattime doy=%s.doy lat=%s.latitude long=%s.longitude sun_elev=%s.phi sath=%s.sath --overwrite\" >> temp.txt",basedate,basedate,basedate,basedate,basedate);
system(sys_12);
sprintf(sys_13," echo \"i.eb.deltat -w tempk=%s.61 delta=%s.delta --overwrite\" >> temp.txt",basedate,basedate);
system(sys_13);
More information about the grass-commit
mailing list