| [1726] | 1 | #include "machdefs.h"
|
|---|
| 2 |
|
|---|
| 3 | #include <math.h>
|
|---|
| 4 | #include <iostream.h>
|
|---|
| 5 | #include <fstream.h>
|
|---|
| 6 |
|
|---|
| 7 | #include "tarrinit.h"
|
|---|
| 8 | #include "array.h"
|
|---|
| 9 | #include "ctimer.h"
|
|---|
| 10 | #include "timing.h"
|
|---|
| 11 |
|
|---|
| 12 |
|
|---|
| 13 | // --------------------------------------------------------
|
|---|
| 14 | // Programme de mesure d'overhead, lie a l'utilisation des
|
|---|
| 15 | // classes, de NDataBlock et TArray en particulier
|
|---|
| 16 | // Attention, l'operateur * declare ds les classes
|
|---|
| 17 | // ci-dessous denote l'operation multiplication element
|
|---|
| 18 | // par element - Ceci n'est pas le cas pour les Tmatrix<T>
|
|---|
| 19 | // --------------------------------------------------------
|
|---|
| 20 |
|
|---|
| 21 | // --------
|
|---|
| 22 |
|
|---|
| 23 | // ---------------------------------------------------
|
|---|
| 24 | // Classe simple de matrice, utilisant les NDataBlock
|
|---|
| 25 | // ---------------------------------------------------
|
|---|
| 26 |
|
|---|
| 27 | template <class T>
|
|---|
| 28 | class SimpleMatrix : public AnyDataObj {
|
|---|
| 29 | public:
|
|---|
| 30 | SimpleMatrix(sa_size_t nr, sa_size_t nc);
|
|---|
| 31 | SimpleMatrix(const SimpleMatrix<T> & m);
|
|---|
| 32 | SimpleMatrix(const SimpleMatrix<T> & m, bool share);
|
|---|
| 33 | virtual ~SimpleMatrix();
|
|---|
| 34 |
|
|---|
| 35 | virtual SimpleMatrix<T>& Set(const SimpleMatrix<T> & a);
|
|---|
| 36 | inline SimpleMatrix<T>& operator = (const SimpleMatrix<T> & a)
|
|---|
| 37 | { return Set(a); }
|
|---|
| 38 |
|
|---|
| 39 | inline T operator()(int r, int c) const
|
|---|
| 40 | { return data_(r*ncol_+c); }
|
|---|
| 41 | inline T& operator()(int r, int c)
|
|---|
| 42 | { return data_(r*ncol_+c); }
|
|---|
| 43 |
|
|---|
| 44 | inline sa_size_t NRows() const {return nrow_; }
|
|---|
| 45 | inline sa_size_t NCols() const {return ncol_; }
|
|---|
| 46 |
|
|---|
| 47 | SimpleMatrix<T>& AddElt(const SimpleMatrix<T> & b);
|
|---|
| 48 | SimpleMatrix<T>& MulElt(const SimpleMatrix<T> & b);
|
|---|
| 49 |
|
|---|
| 50 | protected:
|
|---|
| 51 | sa_size_t ncol_ , nrow_;
|
|---|
| 52 | NDataBlock<T> data_;
|
|---|
| 53 | };
|
|---|
| 54 |
|
|---|
| 55 | template <class T>
|
|---|
| 56 | inline SimpleMatrix<T> operator + (const SimpleMatrix<T>& a,
|
|---|
| 57 | const SimpleMatrix<T>& b)
|
|---|
| 58 | {
|
|---|
| 59 | SimpleMatrix<T> ret(a, false);
|
|---|
| 60 | return(ret.AddElt(b));
|
|---|
| 61 | }
|
|---|
| 62 |
|
|---|
| 63 | template <class T>
|
|---|
| 64 | inline SimpleMatrix<T> operator * (const SimpleMatrix<T>& a,
|
|---|
| 65 | const SimpleMatrix<T>& b)
|
|---|
| 66 | {
|
|---|
| 67 | SimpleMatrix<T> ret(a, false);
|
|---|
| 68 | return(ret.MulElt(b));
|
|---|
| 69 | }
|
|---|
| 70 |
|
|---|
| 71 | template <class T>
|
|---|
| 72 | SimpleMatrix<T>::SimpleMatrix(sa_size_t nr, sa_size_t nc)
|
|---|
| 73 | : nrow_(nr), ncol_(nc), data_(nr*nc)
|
|---|
| 74 | {
|
|---|
| 75 | }
|
|---|
| 76 |
|
|---|
| 77 | template <class T>
|
|---|
| 78 | SimpleMatrix<T>::SimpleMatrix(const SimpleMatrix & m)
|
|---|
| 79 | : nrow_(m.nrow_), ncol_(m.ncol_), data_(m.data_)
|
|---|
| 80 | {
|
|---|
| 81 | }
|
|---|
| 82 |
|
|---|
| 83 | template <class T>
|
|---|
| 84 | SimpleMatrix<T>::SimpleMatrix(const SimpleMatrix & m, bool share)
|
|---|
| 85 | : nrow_(m.nrow_), ncol_(m.ncol_), data_(m.data_, share)
|
|---|
| 86 | {
|
|---|
| 87 | }
|
|---|
| 88 |
|
|---|
| 89 | template <class T>
|
|---|
| 90 | SimpleMatrix<T>::~SimpleMatrix()
|
|---|
| 91 | {
|
|---|
| 92 | }
|
|---|
| 93 |
|
|---|
| 94 | template <class T>
|
|---|
| 95 | SimpleMatrix<T>& SimpleMatrix<T>::Set(const SimpleMatrix & b)
|
|---|
| 96 | {
|
|---|
| 97 | if ((nrow_ != b.nrow_) || (ncol_ != b.ncol_))
|
|---|
| 98 | throw(SzMismatchError("SimpleMatrix::Set() Size(a) != Size(b)"));
|
|---|
| 99 | data_ = b.data_;
|
|---|
| 100 | return(*this);
|
|---|
| 101 | }
|
|---|
| 102 |
|
|---|
| 103 | template <class T>
|
|---|
| 104 | SimpleMatrix<T>& SimpleMatrix<T>::AddElt(const SimpleMatrix & b)
|
|---|
| 105 | {
|
|---|
| 106 | if ((nrow_ != b.nrow_) || (ncol_ != b.ncol_))
|
|---|
| 107 | throw(SzMismatchError("SimpleMatrix::AddElt() Size(a) != Size(b)"));
|
|---|
| 108 | data_ += b.data_;
|
|---|
| 109 | return(*this);
|
|---|
| 110 | }
|
|---|
| 111 |
|
|---|
| 112 | template <class T>
|
|---|
| 113 | SimpleMatrix<T>& SimpleMatrix<T>::MulElt(const SimpleMatrix & b)
|
|---|
| 114 | {
|
|---|
| 115 | if ((nrow_ != b.nrow_) || (ncol_ != b.ncol_))
|
|---|
| 116 | throw(SzMismatchError("SimpleMatrix::MulElt() Size(a) != Size(b)"));
|
|---|
| 117 | data_ *= b.data_;
|
|---|
| 118 | return(*this);
|
|---|
| 119 | }
|
|---|
| 120 |
|
|---|
| 121 |
|
|---|
| 122 |
|
|---|
| 123 | // -------------------------------------------------
|
|---|
| 124 | // Classe simple de matrice nxm , avec new double
|
|---|
| 125 | // -------------------------------------------------
|
|---|
| 126 |
|
|---|
| 127 | class VerySimpleMatrix {
|
|---|
| 128 | public:
|
|---|
| 129 | VerySimpleMatrix(int nr, int nc, bool zero=true);
|
|---|
| 130 | VerySimpleMatrix(const VerySimpleMatrix & m);
|
|---|
| 131 | virtual ~VerySimpleMatrix();
|
|---|
| 132 |
|
|---|
| 133 | virtual VerySimpleMatrix& Set(const VerySimpleMatrix & a);
|
|---|
| 134 | inline VerySimpleMatrix& operator = (const VerySimpleMatrix & a)
|
|---|
| 135 | { return Set(a); }
|
|---|
| 136 |
|
|---|
| 137 |
|
|---|
| 138 | inline double operator()(int r, int c) const
|
|---|
| 139 | { return a_[r*ncol_+c]; }
|
|---|
| 140 | inline double& operator()(int r, int c)
|
|---|
| 141 | { return a_[r*ncol_+c]; }
|
|---|
| 142 |
|
|---|
| 143 | inline int NRows() const {return nrow_; }
|
|---|
| 144 | inline int NCols() const {return ncol_; }
|
|---|
| 145 |
|
|---|
| 146 | VerySimpleMatrix& AddElt(const VerySimpleMatrix & b);
|
|---|
| 147 | VerySimpleMatrix& MulElt(const VerySimpleMatrix & b);
|
|---|
| 148 |
|
|---|
| 149 | protected:
|
|---|
| 150 | int ncol_ , nrow_;
|
|---|
| 151 | double* a_;
|
|---|
| 152 | };
|
|---|
| 153 |
|
|---|
| 154 | inline
|
|---|
| 155 | VerySimpleMatrix operator + (const VerySimpleMatrix& a, const VerySimpleMatrix& b)
|
|---|
| 156 | {
|
|---|
| 157 | VerySimpleMatrix ret(a);
|
|---|
| 158 | return(ret.AddElt(b));
|
|---|
| 159 | }
|
|---|
| 160 |
|
|---|
| 161 | inline
|
|---|
| 162 | VerySimpleMatrix operator * (const VerySimpleMatrix& a, const VerySimpleMatrix& b)
|
|---|
| 163 | {
|
|---|
| 164 | VerySimpleMatrix ret(a);
|
|---|
| 165 | return(ret.MulElt(b));
|
|---|
| 166 | }
|
|---|
| 167 |
|
|---|
| 168 |
|
|---|
| 169 | VerySimpleMatrix::VerySimpleMatrix(int nr, int nc, bool zero)
|
|---|
| 170 | {
|
|---|
| 171 | nrow_ = nr; ncol_ = nc;
|
|---|
| 172 | int l = nrow_ * ncol_;
|
|---|
| 173 | a_ = new double[l];
|
|---|
| 174 | if (zero)
|
|---|
| 175 | for(int i=0; i<l; i++) a_[i] = 0.;
|
|---|
| 176 | }
|
|---|
| 177 |
|
|---|
| 178 | VerySimpleMatrix::VerySimpleMatrix(const VerySimpleMatrix & m)
|
|---|
| 179 | {
|
|---|
| 180 | nrow_ = m.nrow_; ncol_ = m.ncol_;
|
|---|
| 181 | a_ = new double[nrow_ * ncol_];
|
|---|
| 182 | for(int i=0; i<nrow_ * ncol_; i++)
|
|---|
| 183 | a_[i] = m.a_[i];
|
|---|
| 184 | }
|
|---|
| 185 |
|
|---|
| 186 | VerySimpleMatrix::~VerySimpleMatrix()
|
|---|
| 187 | {
|
|---|
| 188 | delete[] a_;
|
|---|
| 189 | }
|
|---|
| 190 |
|
|---|
| 191 |
|
|---|
| 192 | VerySimpleMatrix& VerySimpleMatrix::Set(const VerySimpleMatrix & b)
|
|---|
| 193 | {
|
|---|
| 194 | if ((nrow_ != b.nrow_) || (ncol_ != b.ncol_))
|
|---|
| 195 | throw(SzMismatchError("VerySimpleMatrix::Set Size(a) != Size(b)"));
|
|---|
| 196 | for(int i=0; i<nrow_ * ncol_; i++)
|
|---|
| 197 | a_[i] = b.a_[i];
|
|---|
| 198 | return(*this);
|
|---|
| 199 | }
|
|---|
| 200 |
|
|---|
| 201 | VerySimpleMatrix& VerySimpleMatrix::AddElt(const VerySimpleMatrix & b)
|
|---|
| 202 | {
|
|---|
| 203 | if ((nrow_ != b.nrow_) || (ncol_ != b.ncol_))
|
|---|
| 204 | throw(SzMismatchError("VerySimpleMatrix::AddElt() Size(a) != Size(b)"));
|
|---|
| 205 | for(int i=0; i<nrow_ * ncol_; i++)
|
|---|
| 206 | a_[i] += b.a_[i];
|
|---|
| 207 | return(*this);
|
|---|
| 208 | }
|
|---|
| 209 |
|
|---|
| 210 | VerySimpleMatrix& VerySimpleMatrix::MulElt(const VerySimpleMatrix & b)
|
|---|
| 211 | {
|
|---|
| 212 | if ((nrow_ != b.nrow_) || (ncol_ != b.ncol_))
|
|---|
| 213 | throw(SzMismatchError("VerySimpleMatrix::MulElt() Size(a) != Size(b)"));
|
|---|
| 214 | for(int i=0; i<nrow_ * ncol_; i++)
|
|---|
| 215 | a_[i] += b.a_[i];
|
|---|
| 216 | return(*this);
|
|---|
| 217 | }
|
|---|
| 218 |
|
|---|
| 219 |
|
|---|
| 220 | //--------------------------------------------------------
|
|---|
| 221 | // classe template de matrice NxM
|
|---|
| 222 | //--------------------------------------------------------
|
|---|
| 223 |
|
|---|
| 224 | template <class T, int L, int C>
|
|---|
| 225 | class SmallMatrix {
|
|---|
| 226 | public:
|
|---|
| 227 | SmallMatrix() { }
|
|---|
| 228 | SmallMatrix(const SmallMatrix<T,L,C> & m)
|
|---|
| 229 | { for(int i=0; i<L*C; i++) data_[i] = m.data_[i]; }
|
|---|
| 230 |
|
|---|
| 231 | virtual ~SmallMatrix() { }
|
|---|
| 232 |
|
|---|
| 233 | inline SmallMatrix<T,L,C>& Set(const SmallMatrix<T,L,C> & m)
|
|---|
| 234 | { for(int i=0; i<L*C; i++) data_[i] = m.data_[i]; return (*this); }
|
|---|
| 235 | inline SmallMatrix<T,L,C>& operator = (const SmallMatrix<T,L,C>& a)
|
|---|
| 236 | { return Set(a); }
|
|---|
| 237 |
|
|---|
| 238 |
|
|---|
| 239 |
|
|---|
| 240 | inline T operator()(int r, int c) const
|
|---|
| 241 | { return data_[r*C+c]; }
|
|---|
| 242 | inline T& operator()(int r, int c)
|
|---|
| 243 | { return data_[r*C+c]; }
|
|---|
| 244 |
|
|---|
| 245 | inline int NRows() const {return L; }
|
|---|
| 246 | inline int NCols() const {return C; }
|
|---|
| 247 |
|
|---|
| 248 | inline SmallMatrix<T,L,C> & AddElt(const SmallMatrix<T,L,C> & m)
|
|---|
| 249 | { for(int i=0; i<L*C; i++) data_[i] += m.data_[i]; return (*this); }
|
|---|
| 250 |
|
|---|
| 251 | inline SmallMatrix<T,L,C> & MulElt(const SmallMatrix<T,L,C> & m)
|
|---|
| 252 | { for(int i=0; i<L*C; i++) data_[i] *= m.data_[i]; return (*this); }
|
|---|
| 253 |
|
|---|
| 254 | protected:
|
|---|
| 255 | T data_[L*C];
|
|---|
| 256 | };
|
|---|
| 257 |
|
|---|
| 258 | template <class T, int L, int C>
|
|---|
| 259 | inline SmallMatrix<T,L,C>
|
|---|
| 260 | operator + (const SmallMatrix<T,L,C>& a, const SmallMatrix<T,L,C>& b)
|
|---|
| 261 | { SmallMatrix<T,L,C> ret(a); return(ret.AddElt(b)); }
|
|---|
| 262 |
|
|---|
| 263 | template <class T, int L, int C>
|
|---|
| 264 | inline SmallMatrix<T,L,C>
|
|---|
| 265 | operator * (const SmallMatrix<T,L,C>& a, const SmallMatrix<T,L,C>& b)
|
|---|
| 266 | { SmallMatrix<T,L,C> ret(a); return(ret.MulElt(b)); }
|
|---|
| 267 |
|
|---|
| 268 |
|
|---|
| 269 | // -------------------------------------------------------
|
|---|
| 270 | // Classe simple de matrice 2x2 - sans allocation memoire
|
|---|
| 271 | // -------------------------------------------------------
|
|---|
| 272 |
|
|---|
| 273 | class VerySimpleMatrix2x2 {
|
|---|
| 274 | public:
|
|---|
| 275 | inline VerySimpleMatrix2x2() { }
|
|---|
| 276 | inline VerySimpleMatrix2x2(const VerySimpleMatrix2x2 & m)
|
|---|
| 277 | { for(int i=0; i<4; i++) a_[i] = m.a_[i]; }
|
|---|
| 278 |
|
|---|
| 279 | inline ~VerySimpleMatrix2x2() { }
|
|---|
| 280 |
|
|---|
| 281 | inline VerySimpleMatrix2x2& Set(const VerySimpleMatrix2x2 & m)
|
|---|
| 282 | { for(int i=0; i<4; i++) a_[i] = m.a_[i]; return (*this); }
|
|---|
| 283 | inline VerySimpleMatrix2x2& operator = (const VerySimpleMatrix2x2 & a)
|
|---|
| 284 | { return Set(a); }
|
|---|
| 285 |
|
|---|
| 286 | inline double operator()(int r, int c) const
|
|---|
| 287 | { return a_[r*2+c]; }
|
|---|
| 288 | inline double& operator()(int r, int c)
|
|---|
| 289 | { return a_[r*2+c]; }
|
|---|
| 290 |
|
|---|
| 291 | inline int NRows() const {return 2; }
|
|---|
| 292 | inline int NCols() const {return 2; }
|
|---|
| 293 |
|
|---|
| 294 | inline VerySimpleMatrix2x2& AddElt(const VerySimpleMatrix2x2 & m)
|
|---|
| 295 | { for(int i=0; i<4; i++) a_[i] += m.a_[i]; return (*this); }
|
|---|
| 296 | inline VerySimpleMatrix2x2& MulElt(const VerySimpleMatrix2x2 & m)
|
|---|
| 297 | { for(int i=0; i<4; i++) a_[i] *= m.a_[i]; return (*this); }
|
|---|
| 298 |
|
|---|
| 299 | protected:
|
|---|
| 300 | double a_[4];
|
|---|
| 301 | };
|
|---|
| 302 |
|
|---|
| 303 | inline VerySimpleMatrix2x2 operator + (const VerySimpleMatrix2x2& a, const VerySimpleMatrix2x2& b)
|
|---|
| 304 | { VerySimpleMatrix2x2 ret(a); return(ret.AddElt(b)); }
|
|---|
| 305 |
|
|---|
| 306 | inline VerySimpleMatrix2x2 operator * (const VerySimpleMatrix2x2& a, const VerySimpleMatrix2x2& b)
|
|---|
| 307 | { VerySimpleMatrix2x2 ret(a); return(ret.MulElt(b)); }
|
|---|
| 308 |
|
|---|
| 309 | // ------------------------------------------------------------
|
|---|
| 310 | // programme de test
|
|---|
| 311 | // Appel: ovharr NLoop [NRow NCol]
|
|---|
| 312 | // NRow = 0 ou NCol = 0 --> test 2x2 only
|
|---|
| 313 | // ------------------------------------------------------------
|
|---|
| 314 |
|
|---|
| 315 | void add_double_n(int n, double* x1, double* x2, double* x3);
|
|---|
| 316 | void mul_double_n(int n, double* x1, double* x2, double* x3);
|
|---|
| 317 |
|
|---|
| 318 | int main(int narg, char* arg[])
|
|---|
| 319 | {
|
|---|
| 320 |
|
|---|
| 321 | SophyaInit();
|
|---|
| 322 | InitTim(); // Initializing the CPU timer
|
|---|
| 323 |
|
|---|
| 324 | if (narg < 2) {
|
|---|
| 325 | cout << " Missing argument/ Usage: ovharr NLoop [NRow NCol] \n "
|
|---|
| 326 | << " NRow==0 OR NCol==0 ---> Test 2x2 only \n " << endl;
|
|---|
| 327 | exit(1);
|
|---|
| 328 | }
|
|---|
| 329 | int i,j,k;
|
|---|
| 330 | char buff[128];
|
|---|
| 331 | int N = atoi(arg[1]);
|
|---|
| 332 | int nrow = 2;
|
|---|
| 333 | int ncol = 2;
|
|---|
| 334 |
|
|---|
| 335 | if (narg > 2) nrow = atoi(arg[2]);
|
|---|
| 336 | if (narg > 3) ncol = atoi(arg[3]);
|
|---|
| 337 |
|
|---|
| 338 | bool fgall = true;
|
|---|
| 339 | if ((nrow == 0) || (ncol == 0)) fgall = false;
|
|---|
| 340 |
|
|---|
| 341 | cout << " ovharr/ Testing TArray overhead - NLoop = " << N
|
|---|
| 342 | << " NRow=" << nrow << " NCol= " << ncol << endl;
|
|---|
| 343 | try {
|
|---|
| 344 |
|
|---|
| 345 | if (fgall) {
|
|---|
| 346 | cout << "1) ------ Overhead using TMatrix<T> ------" << endl;
|
|---|
| 347 | Timer tm("Overhead:TMatrix<T>");
|
|---|
| 348 | for(k=0; k<N; k++) {
|
|---|
| 349 | Matrix * m1 = new Matrix(nrow, ncol);
|
|---|
| 350 | Matrix * m2 = new Matrix(nrow, ncol);
|
|---|
| 351 | Matrix * m3 = new Matrix(nrow, ncol);
|
|---|
| 352 | for(i=0; i<nrow; i++)
|
|---|
| 353 | for(j=0; j<ncol; j++) {
|
|---|
| 354 | (*m1)(i,j) = k*300+10.*i+j;
|
|---|
| 355 | (*m2)(i,j) = k*550+20.*i+2.*j;
|
|---|
| 356 | }
|
|---|
| 357 | *m3 = *m1 + *m2;
|
|---|
| 358 | // m4 = m1*m2 est une multiplication de matrice avec les TMatrix<T>
|
|---|
| 359 | Matrix * m4 = new Matrix(*m1);
|
|---|
| 360 | m4->MulElt(*m2);
|
|---|
| 361 |
|
|---|
| 362 | delete m1;
|
|---|
| 363 | delete m2;
|
|---|
| 364 | delete m3;
|
|---|
| 365 | delete m4;
|
|---|
| 366 | // if (k%(N/10) == 0) {
|
|---|
| 367 | // sprintf(buff, "ovharr: Iteration k= %d ",k);
|
|---|
| 368 | // PrtTim(buff);
|
|---|
| 369 | // }
|
|---|
| 370 | }
|
|---|
| 371 | }
|
|---|
| 372 |
|
|---|
| 373 | if (fgall) {
|
|---|
| 374 | cout << "2) ------ Overhead using TMatrix<T> No new ------" << endl;
|
|---|
| 375 | Timer tm("Overhead:TMatrix<T> No new");
|
|---|
| 376 | for(k=0; k<N; k++) {
|
|---|
| 377 | Matrix m1(nrow, ncol);
|
|---|
| 378 | Matrix m2(nrow, ncol);
|
|---|
| 379 | for(i=0; i<nrow; i++)
|
|---|
| 380 | for(j=0; j<ncol; j++) {
|
|---|
| 381 | m1(i,j) = k*300+10.*i+j;
|
|---|
| 382 | m2(i,j) = k*550+20.*i+2.*j;
|
|---|
| 383 | }
|
|---|
| 384 | Matrix m3 = m1 + m2;
|
|---|
| 385 | Matrix m4(m1);
|
|---|
| 386 | m4.MulElt(m2);
|
|---|
| 387 | }
|
|---|
| 388 | }
|
|---|
| 389 |
|
|---|
| 390 | if (fgall) {
|
|---|
| 391 | cout << "3) ------ Overhead using SimpleMatrix<r_8> ------" << endl;
|
|---|
| 392 | Timer tm("Overhead:SimpleMatrix<r_8>");
|
|---|
| 393 | for(k=0; k<N; k++) {
|
|---|
| 394 | SimpleMatrix<r_8> * m1 = new SimpleMatrix<r_8>(nrow, ncol);
|
|---|
| 395 | SimpleMatrix<r_8> * m2 = new SimpleMatrix<r_8>(nrow, ncol);
|
|---|
| 396 | SimpleMatrix<r_8> * m3 = new SimpleMatrix<r_8>(nrow, ncol);
|
|---|
| 397 | SimpleMatrix<r_8> * m4 = new SimpleMatrix<r_8>(nrow, ncol);
|
|---|
| 398 | for(i=0; i<nrow; i++)
|
|---|
| 399 | for(j=0; j<ncol; j++) {
|
|---|
| 400 | (*m1)(i,j) = k*300+10.*i+j;
|
|---|
| 401 | (*m2)(i,j) = k*550+20.*i+2.*j;
|
|---|
| 402 | }
|
|---|
| 403 | *m3 = *m1 + *m2;
|
|---|
| 404 | *m4 = *m1 * *m2;
|
|---|
| 405 | delete m1;
|
|---|
| 406 | delete m2;
|
|---|
| 407 | delete m3;
|
|---|
| 408 | delete m4;
|
|---|
| 409 | }
|
|---|
| 410 | }
|
|---|
| 411 |
|
|---|
| 412 | if (fgall) {
|
|---|
| 413 | cout << "4) ---- Overhead using SimpleMatrix<r_8> NO new ----" << endl;
|
|---|
| 414 | Timer tm("Overhead:SimpleMatrix<r_8> NO new");
|
|---|
| 415 | for(k=0; k<N; k++) {
|
|---|
| 416 | SimpleMatrix<r_8> m1(nrow, ncol);
|
|---|
| 417 | SimpleMatrix<r_8> m2(nrow, ncol);
|
|---|
| 418 | for(i=0; i<nrow; i++)
|
|---|
| 419 | for(j=0; j<ncol; j++) {
|
|---|
| 420 | m1(i,j) = k*300+10.*i+j;
|
|---|
| 421 | m2(i,j) = k*550+20.*i+2.*j;
|
|---|
| 422 | }
|
|---|
| 423 | SimpleMatrix<r_8> m3 = m1 + m2;
|
|---|
| 424 | SimpleMatrix<r_8> m4 = m1 * m2;
|
|---|
| 425 | }
|
|---|
| 426 | }
|
|---|
| 427 |
|
|---|
| 428 | if (fgall) {
|
|---|
| 429 | cout << "5) ---- Overhead using VerySimpleMatrix( , , zero=true) ----" << endl;
|
|---|
| 430 | Timer tm("Overhead:VerySimpleMatrix( , , zero=true)");
|
|---|
| 431 | for(k=0; k<N; k++) {
|
|---|
| 432 | VerySimpleMatrix * m1 = new VerySimpleMatrix(nrow, ncol, true);
|
|---|
| 433 | VerySimpleMatrix * m2 = new VerySimpleMatrix(nrow, ncol, true);
|
|---|
| 434 | VerySimpleMatrix * m3 = new VerySimpleMatrix(nrow, ncol, true);
|
|---|
| 435 | VerySimpleMatrix * m4 = new VerySimpleMatrix(nrow, ncol, true);
|
|---|
| 436 | for(i=0; i<nrow; i++)
|
|---|
| 437 | for(j=0; j<ncol; j++) {
|
|---|
| 438 | (*m1)(i,j) = k*300+10.*i+j;
|
|---|
| 439 | (*m2)(i,j) = k*550+20.*i+2.*j;
|
|---|
| 440 | }
|
|---|
| 441 | *m3 = *m1 + *m2;
|
|---|
| 442 | *m4 = *m1 * *m2;
|
|---|
| 443 | delete m1;
|
|---|
| 444 | delete m2;
|
|---|
| 445 | delete m3;
|
|---|
| 446 | delete m4;
|
|---|
| 447 | }
|
|---|
| 448 | }
|
|---|
| 449 |
|
|---|
| 450 | if (fgall) {
|
|---|
| 451 | cout << "6) ---- Overhead using VerySimpleMatrix( , , zero=false) ----" << endl;
|
|---|
| 452 | Timer tm("Overhead:VerySimpleMatrix( , , zero=true)");
|
|---|
| 453 | for(k=0; k<N; k++) {
|
|---|
| 454 | VerySimpleMatrix * m1 = new VerySimpleMatrix(nrow, ncol, false);
|
|---|
| 455 | VerySimpleMatrix * m2 = new VerySimpleMatrix(nrow, ncol, false);
|
|---|
| 456 | VerySimpleMatrix * m3 = new VerySimpleMatrix(nrow, ncol, false);
|
|---|
| 457 | VerySimpleMatrix * m4 = new VerySimpleMatrix(nrow, ncol, false);
|
|---|
| 458 | for(i=0; i<nrow; i++)
|
|---|
| 459 | for(j=0; j<ncol; j++) {
|
|---|
| 460 | (*m1)(i,j) = k*300+10.*i+j;
|
|---|
| 461 | (*m2)(i,j) = k*550+20.*i+2.*j;
|
|---|
| 462 | }
|
|---|
| 463 | *m3 = *m1 + *m2;
|
|---|
| 464 | *m4 = *m1 * *m2;
|
|---|
| 465 | delete m1;
|
|---|
| 466 | delete m2;
|
|---|
| 467 | delete m3;
|
|---|
| 468 | delete m4;
|
|---|
| 469 | }
|
|---|
| 470 | }
|
|---|
| 471 |
|
|---|
| 472 | if (fgall) {
|
|---|
| 473 | cout << "7) ---- Overhead using VerySimpleMatrix( , , zero=false) NO new ----" << endl;
|
|---|
| 474 | Timer tm("Overhead:VerySimpleMatrix( , , zero=true) NO new");
|
|---|
| 475 | for(k=0; k<N; k++) {
|
|---|
| 476 | VerySimpleMatrix m1(nrow, ncol, false);
|
|---|
| 477 | VerySimpleMatrix m2(nrow, ncol, false);
|
|---|
| 478 | for(i=0; i<nrow; i++)
|
|---|
| 479 | for(j=0; j<ncol; j++) {
|
|---|
| 480 | m1(i,j) = k*300+10.*i+j;
|
|---|
| 481 | m2(i,j) = k*550+20.*i+2.*j;
|
|---|
| 482 | }
|
|---|
| 483 | VerySimpleMatrix m3 = m1 + m2;
|
|---|
| 484 | VerySimpleMatrix m4 = m1 * m2;
|
|---|
| 485 | }
|
|---|
| 486 | }
|
|---|
| 487 |
|
|---|
| 488 | if (fgall) {
|
|---|
| 489 | cout << "8) ---- Overhead using new double[nrow*ncol] ----" << endl;
|
|---|
| 490 | Timer tm("Overhead:new double[nrow*ncol]");
|
|---|
| 491 | for(k=0; k<N; k++) {
|
|---|
| 492 | int l = nrow*ncol;
|
|---|
| 493 | double* m1 = new double[l];
|
|---|
| 494 | double* m2 = new double[l];
|
|---|
| 495 | double* m3 = new double[l];
|
|---|
| 496 | double* m4 = new double[l];
|
|---|
| 497 | for(i=0; i<nrow; i++)
|
|---|
| 498 | for(j=0; j<ncol; j++) {
|
|---|
| 499 | m1[i*ncol+j] = k*300+10.*i+j;
|
|---|
| 500 | m2[i*ncol+j] = k*550+20.*i+2.*j;
|
|---|
| 501 | }
|
|---|
| 502 | for(i=0; i<l; i++) m3[i] = m1[i] + m2[i];
|
|---|
| 503 | for(i=0; i<l; i++) m3[i] = m4[i] * m2[i];
|
|---|
| 504 | delete[] m1;
|
|---|
| 505 | delete[] m2;
|
|---|
| 506 | delete[] m3;
|
|---|
| 507 | delete[] m4;
|
|---|
| 508 | }
|
|---|
| 509 | }
|
|---|
| 510 |
|
|---|
| 511 |
|
|---|
| 512 | {
|
|---|
| 513 | cout << "9) ---- Overhead using SmallMatrix<r_8,4,5> No new ----" << endl;
|
|---|
| 514 | Timer tm("Overhead:SmallMatrix<r_8,4,5> No new ");
|
|---|
| 515 | for(k=0; k<N; k++) {
|
|---|
| 516 | SmallMatrix<r_8,4,5> m1,m2;
|
|---|
| 517 | for(i=0; i<4; i++)
|
|---|
| 518 | for(j=0; j<5; j++) {
|
|---|
| 519 | m1(i,j) = k*300+10.*i+j;
|
|---|
| 520 | m2(i,j) = k*550+20.*i+2.*j;
|
|---|
| 521 | }
|
|---|
| 522 | SmallMatrix<r_8,4,5> m3 = m1 + m2;
|
|---|
| 523 | SmallMatrix<r_8,4,5> m4 = m1 * m2;
|
|---|
| 524 | }
|
|---|
| 525 | }
|
|---|
| 526 |
|
|---|
| 527 | {
|
|---|
| 528 | cout << "10) ---- Overhead using SmallMatrix<r_8,2,2> No new ----" << endl;
|
|---|
| 529 | Timer tm("Overhead:SmallMatrix<r_8,2,2> No new");
|
|---|
| 530 | for(k=0; k<N; k++) {
|
|---|
| 531 | SmallMatrix<r_8,2,2> m1,m2;
|
|---|
| 532 | for(i=0; i<2; i++)
|
|---|
| 533 | for(j=0; j<2; j++) {
|
|---|
| 534 | m1(i,j) = k*300+10.*i+j;
|
|---|
| 535 | m2(i,j) = k*550+20.*i+2.*j;
|
|---|
| 536 | }
|
|---|
| 537 | SmallMatrix<r_8,2,2>m3 = m1 + m2;
|
|---|
| 538 | SmallMatrix<r_8,2,2>m4 = m1 * m2;
|
|---|
| 539 | }
|
|---|
| 540 | }
|
|---|
| 541 |
|
|---|
| 542 |
|
|---|
| 543 | {
|
|---|
| 544 | cout << "11) ---- Overhead using VerySimpleMatrix2x2 ----" << endl;
|
|---|
| 545 | Timer tm("Overhead:VerySimpleMatrix2x2");
|
|---|
| 546 | for(k=0; k<N; k++) {
|
|---|
| 547 | VerySimpleMatrix2x2 * m1 = new VerySimpleMatrix2x2();
|
|---|
| 548 | VerySimpleMatrix2x2 * m2 = new VerySimpleMatrix2x2();
|
|---|
| 549 | VerySimpleMatrix2x2 * m3 = new VerySimpleMatrix2x2();
|
|---|
| 550 | VerySimpleMatrix2x2 * m4 = new VerySimpleMatrix2x2();
|
|---|
| 551 | for(i=0; i<2; i++)
|
|---|
| 552 | for(j=0; j<2; j++) {
|
|---|
| 553 | (*m1)(i,j) = k*300+10.*i+j;
|
|---|
| 554 | (*m2)(i,j) = k*550+20.*i+2.*j;
|
|---|
| 555 | }
|
|---|
| 556 | *m3 = *m1 + *m2;
|
|---|
| 557 | *m4 = *m1 * *m2;
|
|---|
| 558 | delete m1;
|
|---|
| 559 | delete m2;
|
|---|
| 560 | delete m3;
|
|---|
| 561 | delete m4;
|
|---|
| 562 | }
|
|---|
| 563 | }
|
|---|
| 564 |
|
|---|
| 565 | {
|
|---|
| 566 | cout << "12) ---- Overhead using VerySimpleMatrix2x2 NO new ----" << endl;
|
|---|
| 567 | Timer tm("Overhead:VerySimpleMatrix2x2 NO new");
|
|---|
| 568 | for(k=0; k<N; k++) {
|
|---|
| 569 | VerySimpleMatrix2x2 m1,m2;
|
|---|
| 570 | for(i=0; i<2; i++)
|
|---|
| 571 | for(j=0; j<2; j++) {
|
|---|
| 572 | m1(i,j) = k*300+10.*i+j;
|
|---|
| 573 | m2(i,j) = k*550+20.*i+2.*j;
|
|---|
| 574 | }
|
|---|
| 575 | VerySimpleMatrix2x2 m3 = m1+m2;
|
|---|
| 576 | VerySimpleMatrix2x2 m4 = m1*m2;
|
|---|
| 577 | }
|
|---|
| 578 | }
|
|---|
| 579 |
|
|---|
| 580 |
|
|---|
| 581 | {
|
|---|
| 582 | cout << "13) ---- Overhead using double a[4] + function call ----" << endl;
|
|---|
| 583 | Timer tm("Overhead:double a[4]");
|
|---|
| 584 | for(k=0; k<N; k++) {
|
|---|
| 585 | double m1[4], m2[4], m3[4], m4[4];
|
|---|
| 586 | for(i=0; i<2; i++)
|
|---|
| 587 | for(j=0; j<2; j++) {
|
|---|
| 588 | m1[i*2+j] = k*300+10.*i+j;
|
|---|
| 589 | m2[i*2+j] = k*550+20.*i+2.*j;
|
|---|
| 590 | }
|
|---|
| 591 | add_double_n(4, m1, m2, m3);
|
|---|
| 592 | mul_double_n(4, m1, m2, m4);
|
|---|
| 593 | }
|
|---|
| 594 | }
|
|---|
| 595 |
|
|---|
| 596 | {
|
|---|
| 597 | cout << "14) ---- Overhead a3[4] = a1[4]+a2[4] ----" << endl;
|
|---|
| 598 | Timer tm("Overhead:double a[4]");
|
|---|
| 599 | for(k=0; k<N; k++) {
|
|---|
| 600 | double m1[4], m2[4], m3[4], m4[4];
|
|---|
| 601 | for(i=0; i<2; i++)
|
|---|
| 602 | for(j=0; j<2; j++) {
|
|---|
| 603 | m1[i*2+j] = k*300+10.*i+j;
|
|---|
| 604 | m2[i*2+j] = k*550+20.*i+2.*j;
|
|---|
| 605 | }
|
|---|
| 606 | for(i=0; i<4; i++) m3[i] = m1[i] + m2[i];
|
|---|
| 607 | for(i=0; i<4; i++) m4[i] = m1[i] * m2[i];
|
|---|
| 608 | }
|
|---|
| 609 | }
|
|---|
| 610 |
|
|---|
| 611 |
|
|---|
| 612 | }
|
|---|
| 613 | catch (PThrowable exc) {
|
|---|
| 614 | cerr << " catched Exception " << exc.Msg() << endl;
|
|---|
| 615 | }
|
|---|
| 616 | catch (...) {
|
|---|
| 617 | cerr << " catched unknown (...) exception " << endl;
|
|---|
| 618 | }
|
|---|
| 619 |
|
|---|
| 620 | cout << "\n --------------------------------------------------------" << endl;
|
|---|
| 621 | PrtTim("--- End of ovharr ---");
|
|---|
| 622 | cout << " --------------- END of ovharr programme -------------- " << endl;
|
|---|
| 623 | }
|
|---|
| 624 |
|
|---|
| 625 | /* Fonction pour ajouter deux tableaux */
|
|---|
| 626 | void add_double_n(int n, double* x1, double* x2, double* x3)
|
|---|
| 627 | {
|
|---|
| 628 | if (n < 1)
|
|---|
| 629 | throw(SzMismatchError("add_double_n : n<1 !"));
|
|---|
| 630 | for(int i=0; i<n; i++) x3[i] = x1[i] + x2[i];
|
|---|
| 631 | return;
|
|---|
| 632 | }
|
|---|
| 633 | /* Fonction pour multiplier deux tableaux */
|
|---|
| 634 | void mul_double_n(int n, double* x1, double* x2, double* x3)
|
|---|
| 635 | {
|
|---|
| 636 | if (n < 1)
|
|---|
| 637 | throw(SzMismatchError("mul_double_n : n<1 !"));
|
|---|
| 638 | for(int i=0; i<n; i++) x3[i] = x1[i] * x2[i];
|
|---|
| 639 | return;
|
|---|
| 640 | }
|
|---|