Changeset 3572 in Sophya for trunk/SophyaLib/NTools/functab.cc

Timestamp:

Feb 7, 2009, 10:50:34 PM (17 years ago)

Author:

cmv

Message:

char* -> const char* pour regler les problemes de deprecated string const... + comparaison unsigned signed + suppression EVOL_PLANCK rz+cmv 07/02/2009

File:

• trunk/SophyaLib/NTools/functab.cc (modified) (3 diffs)

trunk/SophyaLib/NTools/functab.cc

@@ -53 +53 @@
   Dx = (r_8)(XMax-XMin)/(r_8)(NTab-1);
   Tabul = new r_8[NTab+2];
-  for(int_4 i=0;i<NTab+2;i++) Tabul[i] = 0.;
+  for(uint_4 i=0;i<NTab+2;i++) Tabul[i] = 0.;
   PInterpL = PInterpP[0] = PInterpP[1] = NULL;
   if(!Tabul) return;
-  for(int_4 i=0;i<NTab;i++) Tabul[i+1] = func(XMin + i*Dx);
+  for(uint_4 i=0;i<NTab;i++) Tabul[i+1] = func(XMin + i*Dx);
   Tabul[0] = Tabul[1];
   Tabul[NTab+1] = Tabul[NTab];
@@ -106 +106 @@
     if(PInterpL) delete [] PInterpL;
     PInterpL = new r_8[NTab+2];
-    for(int_4 i=0;i<NTab+1;i++)
+    for(uint_4 i=0;i<NTab+1;i++)
       PInterpL[i] = (Tabul[i+1]-Tabul[i])/Dx;
     PInterpL[NTab+1] = 0.;
@@ -116 +116 @@
     PInterpP[0] = new r_8[NTab+2];
     PInterpP[1] = new r_8[NTab+2];
-    for(int_4 i=1;i<=NTab;i++) {
+    for(uint_4 i=1;i<=NTab;i++) {
       PInterpP[0][i] = (Tabul[i+1]+Tabul[i-1]-2.*Tabul[i])/(2.*Dx*Dx);
       PInterpP[1][i] = (Tabul[i+1]-Tabul[i-1])/(2.*Dx);