فهرست منبع

corrected typo 84600 with actual seconds per day computation

git-svn-id: https://svn.osgeo.org/grass/grass/trunk@68572 15284696-431f-4ddb-bdfa-cd5b030d7da7
Yann Chemin 9 سال پیش
والد
کامیت
0008adb88b
3فایلهای تغییر یافته به همراه3 افزوده شده و 3 حذف شده
  1. 1 1
      imagery/i.evapo.mh/mh_eto.c
  2. 1 1
      imagery/i.evapo.mh/mh_original.c
  3. 1 1
      imagery/i.evapo.mh/mh_samani.c

+ 1 - 1
imagery/i.evapo.mh/mh_eto.c

@@ -12,7 +12,7 @@ double mh_eto(double ra, double tavg, double tmax, double tmin, double p)
     if (tavg > 100.0) {
 	tavg = tavg - 273.15;	/*in case temperature is in Kelvin */
     }
-    ra = ra * (84600.0 / 1000.0);	/*convert W -> MJ/d */
+    ra = ra * (24.0 * 60.0 * 60.0 / 1000.0);	/*convert W -> MJ/d */
     result =
 	0.0013 * 0.408 * ra * (tavg + 17.0) * pow((td - 0.0123 * p), 0.76);
     return result;

+ 1 - 1
imagery/i.evapo.mh/mh_original.c

@@ -11,7 +11,7 @@ double mh_original(double ra, double tavg, double tmax, double tmin, double p)
     if (tavg > 100.0) {
 	tavg = tavg - 273.15;	/*in case Temperature is in Kelvin */
     }
-    ra = ra * (84600.0 / 1000.0);	/*convert W -> MJ/d */
+    ra = ra * (24.0 * 60.0 * 60.0 / 1000.0);	/*convert W -> MJ/d */
     result = 0.0023 * 0.408 * ra * (tavg + 17.8) * pow(td, 0.5);
     return result;
 }

+ 1 - 1
imagery/i.evapo.mh/mh_samani.c

@@ -11,7 +11,7 @@ double mh_samani(double ra, double tavg, double tmax, double tmin)
     if (tavg > 100.0) {
 	tavg = tavg - 273.15;	/*in case Temperature is in Kelvin */
     }
-    ra = ra * (84600.0 / 1000.0);	/* convert W -> MJ/d */
+    ra = ra * (24.0 * 60.0 * 60.0 / 1000.0);	/* convert W -> MJ/d */
     result =
 	0.0023 * 0.408 * ra * pow(td,
 				  0.5) * ((tmax + tmin) / 2 + 17.8) / 2.45;