Changeset 2938 in Sophya for trunk/SophyaLib/TArray/tarray.cc

Timestamp:

Apr 24, 2006, 4:25:14 PM (19 years ago)

Author:

ansari

Message:

Ajout operateur && et / (MulElt DivElt) pour TArray (.h) et partage (Share) lors des operations Add/Mul/Sub/DivCst et Add/Mul/Sub/DivElt (.cc) - Reza 24/4/2006

File:

• trunk/SophyaLib/TArray/tarray.cc (modified) (18 diffs)

trunk/SophyaLib/TArray/tarray.cc

@@ -598 +598 @@
 /*! 
 Add a constant to the source array \b this and store the result in \b res (res = *this+x).  
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if the source array (this) is not flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and (this) is temporary, data is shared between \b res and this.
+
 Returns a reference to the output array \b res. 
+
 \param x : constant to add to the array elements
 \param res : Output array containing the result (res=this+x). 
@@ -609 +614 @@
   if (NbDimensions() < 1) 
     throw RangeCheckError("TArray<T>::AddCst(T,res)  - Not allocated source array ");
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else res.SetSize(*this, true, false);
+  }
   bool smo;
   if (!CompareSizes(res, smo)) 
@@ -640 +648 @@
 /*! 
 Subtract a constant from the source array \b this and store the result in \b res (res = *this-x).  
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if the source array (this) is not flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and (this) is temporary, data is shared between \b res and this.
+
 Returns a reference to the output array \b res. 
+
 \param x : constant to subtract from the array elements
 \param res : Output array containing the result (res=this+x or res=x-this). 
@@ -652 +665 @@
   if (NbDimensions() < 1) 
     throw RangeCheckError("TArray<T>::SubCst(T,res)  - Not allocated source array ");
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else res.SetSize(*this, true, false);
+  }
   bool smo;
   if (!CompareSizes(res, smo)) 
@@ -689 +705 @@
 /*! 
 Multiply the source array \b this by a constant \b x and store the result in \b res (res = *this*x).  
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if the source array (this) is not flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and (this) is temporary, data is shared between \b res and this.
+
 Returns a reference to the output array \b res. 
+
 \param x : Array elements are multiplied by x
 \param res : Output array containing the result (res=this*x). 
@@ -700 +721 @@
   if (NbDimensions() < 1) 
     throw RangeCheckError("TArray<T>::MulCst(T,res)  - Not allocated source array ");
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else res.SetSize(*this, true, false);
+  }
   bool smo;
   if (!CompareSizes(res, smo)) 
@@ -731 +755 @@
 /*! 
 Divide the source array \b this by a constant \b x and store the result in \b res (res = *this/x).  
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if the source array (this) is not flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and (this) is temporary, data is shared between \b res and this.
+
 Returns a reference to the output array \b res. 
+
 \param x : Array elements are divied by x
 \param res : Output array containing the result (res=(*this)/x or res=x/(*this)). 
@@ -745 +774 @@
   if (!fginv && (x == (T) 0) ) 
     throw MathExc("TArray<T>::DivCst(T,res)  - Divide by zero ! ");
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else res.SetSize(*this, true, false);
+  }
   bool smo;
   if (!CompareSizes(res, smo)) 
@@ -782 +814 @@
 //! Stores the opposite of the source array in \b res (res=-(*this)). 
 /*! 
-If not initially allocated, the output array \b res is automatically 
+If not initially allocated, and if the source array (this) is not flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and (this) is temporary, data is shared between \b res and this.
+
 Returns a reference to the output array \b res. 
 */
@@ -791 +826 @@
   if (NbDimensions() < 1) 
     throw RangeCheckError("TArray<T>::NegateElt(res)  - Not allocated source array ");
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else res.SetSize(*this, true, false);
+  }
   bool smo;
   if (!CompareSizes(res, smo)) 
@@ -826 +864 @@
 and store the result in \b res (res = *this+a). The source and argument arrays (this, a)
 should have the same sizes.
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if none of the source arrays is flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and one of the source array is temporary,
+data is shared between \b res and the temporary source array.
+
 Returns a reference to the output array \b res. 
+
 \param a : Array to be added to the source array.
 \param res : Output array containing the result (res=this+a). 
@@ -840 +884 @@
   if (!CompareSizes(a, smoa)) 
     throw(SzMismatchError("TArray<T>::AddElt(...) SizeMismatch(this,a)")) ;
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else if ( a.IsTemp() ) res.Share(a);
+    else res.SetSize(*this, true, false);
+  }
   bool smor;
   if (!CompareSizes(res, smor)) 
@@ -892 +940 @@
 and the store result in \b res (res = *this-a or res=a-(*this)). 
 The source and argument arrays (this, a) should have the same sizes.
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if none of the source arrays is flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and one of the source array is temporary,
+data is shared between \b res and the temporary source array.
+
 Returns a reference to the output array \b res. 
+
 \param a : Array to be added to the source array.
 \param res : Output array containing the result (res=*this+x). 
@@ -908 +962 @@
   if (!CompareSizes(a, smoa)) 
     throw(SzMismatchError("TArray<T>::SubElt(...) SizeMismatch(this,a)")) ;
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else if ( a.IsTemp() ) res.Share(a);
+    else res.SetSize(*this, true, false);
+  }
   bool smor;
   if (!CompareSizes(res, smor)) 
@@ -966 +1024 @@
 and store the result in \b res (res = *this*a). The source and argument arrays (this, a)
 should have the same sizes.
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if none of the source arrays is flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and one of the source array is temporary,
+data is shared between \b res and the temporary source array.
+
 Returns a reference to the output array \b res. 
+
 \param a : Array to be added to the source array.
 \param res : Output array containing the result (res=(*this)*a). 
@@ -980 +1044 @@
   if (!CompareSizes(a, smoa)) 
     throw(SzMismatchError("TArray<T>::MulElt(...) SizeMismatch(this,a)")) ;
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else if ( a.IsTemp() ) res.Share(a);
+    else res.SetSize(*this, true, false);
+  }
   bool smor;
   if (!CompareSizes(res, smor)) 
@@ -1032 +1100 @@
 and store the result in \b res (res = *this/a). The source and argument arrays (this, a)
 should have the same sizes.
-If not initially allocated, the output array \b res is automatically 
+
+If not initially allocated, and if none of the source arrays is flagged as 
+temporary, the output array \b res is automatically 
 resized as a packed array with the same sizes as the source (this) array.
+If \b res is not allocated and one of the source array is temporary,
+data is shared between \b res and the temporary source array.
+
 Returns a reference to the output array \b res. 
+
 \param a : Array to be added to the source array.
 \param res : Output array containing the result (res=*this/a). 
@@ -1049 +1123 @@
   if (!CompareSizes(a, smoa)) 
     throw(SzMismatchError("TArray<T>::DivElt(...) SizeMismatch(this,a)")) ;
-  if (res.NbDimensions() < 1)  res.SetSize(*this, true, false);
+  if (res.NbDimensions() < 1)  {
+    if ( IsTemp() )  res.Share(*this);
+    else if ( a.IsTemp() ) res.Share(a);
+    else res.SetSize(*this, true, false);
+  }
   bool smor;
   if (!CompareSizes(res, smor))