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

Timestamp:

Feb 12, 2001, 6:09:03 PM (25 years ago)

Author:

ansari

Message:

Ajout methodes ReSize(TArray &) - Reza 12/2/2001

File:

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

trunk/SophyaLib/TArray/tarray.cc

@@ -230 +230 @@
 
 
-//! Resize array
+//! Sets or changes the array size 
 /*!
   \param ndim : number of dimensions
@@ -245 +245 @@
        throw( ParmError("TArray<T>::ReSize(,siz[0]>1 && size[1]>1) for Vector" ) ); 
   }
-  string exmsg = "TArray<T>::ReSize()";
+  string exmsg = "TArray<T>::ReSize(int_4 ...)";
   if (!UpdateSizes(ndim, siz, step, 0, exmsg))  throw( ParmError(exmsg) );
   mNDBlock.ReSize(totsize_);    
+}
+
+//! Sets or changes the array size.
+/*!
+  The array size and memory layout are copied from the array \b a.
+  \param a : Array used as template for setting the size and memory layout.
+ */
+template <class T>
+void TArray<T>::ReSize(const TArray<T>& a)
+{
+  if (arrtype_ != 0) {
+    if (a.NbDimensions() != 2) 
+       throw( ParmError("TArray<T>::ReSize(a.NbDimensions()!=2,...) for Matrix" ) ); 
+    if ((arrtype_ == 2) && (a.Size(0) > 1) && (a.Size(1) > 1)) 
+       throw( ParmError("TArray<T>::ReSize(a.Size(0)>1 && a.Size(1)>1) for Vector" ) ); 
+  }
+  string exmsg = "TArray<T>::ReSize(const TArray<T>&)";
+  if (!UpdateSizes(a, exmsg))  throw( ParmError(exmsg) );
+  mNDBlock.ReSize(totsize_);      
 }