Changeset 2147 in Sophya for trunk/SophyaLib

Timestamp:

Jul 31, 2002, 1:42:08 PM (23 years ago)

Author:

ansari

Message:

Appel explicite de l'operateur de conversion sur objet MuTyV et Adaptation a fmath.h vide , Reza 31/7/2002

Location:

trunk/SophyaLib/TArray

Files:

• sopemtx.cc (modified) (1 diff)
• tarray.cc (modified) (2 diffs)

trunk/SophyaLib/TArray/sopemtx.cc

@@ -98 +98 @@
   inline static double Abs_Value(uint_8 v) {return (double) v;}
   //! Define Absolute value for r_4
-  inline static double Abs_Value(r_4 v)    {return (double) fabsf(v);}
+  inline static double Abs_Value(r_4 v)    {return (double) fabs((double)v);}
   //! Define Absolute value for r_8
   inline static double Abs_Value(r_8 v)    {return fabs(v);}

trunk/SophyaLib/TArray/tarray.cc

@@ -853 +853 @@
     pe = mNDBlock.Begin()+Offset(ax,j);
     offa = a.Offset(axa,j);
+/*  
+    Appel explicite de l'operateur de conversion 
+    suite a la suggestion de M. Reinecke, Reza 31/7/2002 
 #if !defined(__GNUG__)
     for(k=0, ka=0;  k<gpas;  k+=step, ka+=stepa)  pe[k] = (T)a.ValueAtPosition(offa+ka); 
@@ -859 +862 @@
     for(k=0, ka=0;  k<gpas;  k+=step, ka+=stepa)  pe[k] = a.ValueAtPosition(offa+ka); 
 #endif
+   --- Appel explicite de l'operateur de conversion sur l'objet MuTyV 
+*/
+    for(k=0, ka=0;  k<gpas;  k+=step, ka+=stepa)  
+      pe[k] = a.ValueAtPosition(offa+ka).operator T(); 
   }
   return(*this);