Changeset 12346 for issm/trunk/src/c/modules/PositiveDegreeDayx/PositiveDegreeDayx.cpp

Timestamp:

06/02/12 08:27:24 (13 years ago)

Author:

lemorzad

Message:

debug pdd methode

File:

• issm/trunk/src/c/modules/PositiveDegreeDayx/PositiveDegreeDayx.cpp (modified) (3 diffs)

issm/trunk/src/c/modules/PositiveDegreeDayx/PositiveDegreeDayx.cpp

@@ -64 +64 @@
     tstar = it*DT-siglim;
     tint = tsint;
-    pddt = 0;
+    pddt = 0.;
     for ( jj = 0; jj < 600; jj++){
       if (tint > (tstar+siglim)){break;}
@@ -90 +90 @@
     //    tstar = REAL(it)*DT-siglimc;
     tint = tsint;          // start against upper bound
-    pd = 0;
+    pd = 0.;
     for (jj = 0; jj < 600; jj++){
       if (tint<(tstar-siglimc)) {break;}
@@ -98 +98 @@
     pds[it] = pd*snormfac;  // gaussian integral lookup table for snow fraction
   }
-  pds[itm+1] = 0;
+  pds[itm+1] = 0.;
   //     *******END initialize PDD