Print this page

        

@@ -215,11 +215,11 @@
         double          x, y;
         double          x_hi0, x_lo0, y_hi0, y_lo0, scl0 = 0;
         double          x0, y0, res0, dd0;
         double          res0_hi,res0_lo, dres0;
         double          x_hi1, x_lo1, y_hi1, y_lo1, scl1 = 0;
-        double          x1, y1, res1, dd1;
+        double          x1 = 0.0L, y1 = 0.0L, res1, dd1;
         double          res1_hi,res1_lo, dres1;
         double          x_hi2, x_lo2, y_hi2, y_lo2, scl2 = 0;
         double          x2, y2, res2, dd2;
         double          res2_hi,res2_lo, dres2;
 

@@ -236,11 +236,11 @@
         double          DTWO = ((double*)LCONST)[1];
         double          D2ON36 = ((double*)LCONST)[2];
         double          D2ON1022 = ((double*)LCONST)[3];
         double          D2ONM52 = ((double*)LCONST)[4];
 
-        double          *pz0, *pz1, *pz2;
+        double          *pz0, *pz1 = 0, *pz2;
 
         do
         {
 start0:
                 PREP(0)