Changeset 340 in Sophya for trunk/SophyaPI

Timestamp:

Jul 27, 1999, 2:12:08 PM (26 years ago)

Author:

ercodmgr

Message:

correction arrondi 1.e-100 label axe qd v->0 cmv 27/7/99

File:

• trunk/SophyaPI/PI/pidrawer.cc (modified) (2 diffs)

trunk/SophyaPI/PI/pidrawer.cc

@@ -463 +463 @@
   g->SelFontSz(xMajTickLen*4.);
   for (double x=xBeg; x<=xMax; x += xStep) {
-      char label[20]; sprintf(label, "%-6g", x);
+      // Attention aux erreurs d'arrondi quand x->0
+      //        car on code 5.1698e-26 au lieu de 0
+      double xx = (fabs(x/xStep)<1.e-5) ? 0.: x;
+      char label[20]; sprintf(label, "%-6g", xx);
       for(kk=0; kk<20; kk++)
         if (label[kk] == ' ')   { label[kk] = '\0' ; break; }
@@ -484 +487 @@
   g->SelFontSz(xMajTickLen*4.);
   for (double y=yBeg; y<=yMax; y += yStep) {
-      char label[20]; sprintf(label, "%-6g", y);
+      double yy = (fabs(y/yStep)<1.e-5) ? 0.: y;
+      char label[20]; sprintf(label, "%-6g", yy);
       double largeur = g->CalcStringWidth(label);
       if (just == 1)