Herezh_dev/Tableaux/Tableau_5D.cc

1 line
5.4 KiB
C++
Raw Normal View History

// This file is part of the Herezh++ application. // // The finite element software Herezh++ is dedicated to the field // of mechanics for large transformations of solid structures. // It is developed by Gérard Rio (APP: IDDN.FR.010.0106078.000.R.P.2006.035.20600) // INSTITUT DE RECHERCHE DUPUY DE LÔME (IRDL) <https://www.irdl.fr/>. // // Herezh++ is distributed under GPL 3 license ou ultérieure. // // Copyright (C) 1997-2021 Université Bretagne Sud (France) // AUTHOR : Gérard Rio // E-MAIL : gerardrio56@free.fr // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation, either version 3 of the License, // or (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty // of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. // See the GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see <https://www.gnu.org/licenses/>. // // For more information, please consult: <https://herezh.irdl.fr/>. // FICHIER : Tableau_5D.cp // CLASSE : Tableau_5D #include <iostream> using namespace std; #include <stdlib.h> #include "Tableau_5D.h" Tableau_5D::Tableau_5D () // Constructeur par defaut { dim1=0; dim2=0; dim3=0; dim4=0; dim5=0; t=NULL; }; Tableau_5D::Tableau_5D (int d1,int d2,int d3,int d4,int d5,double val) // Constructeur utile quand les cinq dimensions ainsi qu'une // eventuelle valeur d'initialisation sont connues { if ( ( d1<0 ) || ( d2<0 ) || ( d3<0 ) || ( d4<0 ) || ( d5<0 ) ) { cout << "\nErreur : taille(s) invalide(s) !\n"; cout << "TABLEAU_5D::TABLEAU_5D(int ,int ,int ,int ,int ,double ) \n"; exit(1); }; if ( ( d1==0 ) || ( d2==0 ) || ( d3==0 ) || ( d4==0 ) || ( d5==0 ) ) // cas ou une des dimensions est nulle : initialisation identique // a l'appel du constructeur par defaut { dim1=0; dim2=0; dim3=0; dim4=0; dim5=0; t=NULL; } else // autres cas { dim1=d1; dim2=d2; dim3=d3; dim4=d4; dim5=d5; t=new double [d1*d2*d3*d4*d5]; // allocation dynamique de la memoire Initialise(val); // initialisation des composantes a val }; }; Tableau_5D::Tableau_5D (const Tableau_5D& tab) // Constructeur de copie { if ( tab.dim1==0 ) // cas ou le tableau copie est vide : initialisation // identique a l'appel du constructeur par defaut { dim1=0; dim2=0; dim3=0; dim4=0; dim5=0; t=NULL; } else { dim1=tab.dim1; dim2=tab.dim2; dim3=tab.dim3; dim4=tab.dim4; dim5=tab.dim5; t=new double [dim1*dim2*dim3*dim4*dim5]; // allocation dynamique de la memoire double* ptr1=t; double* ptr2=tab.t; for (int i=0;i<dim1;i++) { for (int j=0;j<dim2;j++) { for (int k=0;k<dim3;k++) { for (int l=0;l<dim4;l++) { for (int m=0;m<dim5;m++) { (*ptr1++)=(*ptr2++); // copie des composantes du tableau tab }; // endfor m }; // endfor l }; // endfor k }; // endfor j }; // endfor i }; }; Tableau_5D::~Tableau_5D () // Destructeur (N.B. : Apres l'appel de ce destructeur le tableau est identique // a ce qu'il aurait ete a la suite d'un appel du constructeur par defaut) { Libere(); }; void Tableau_5D::Initialise (double val) // Initialisation des composantes du tableau a cinq dimensions { double* ptr=t; for (int i=0;i<dim1;i++) { for (int j=0;j<dim2;j++) { for (int k=0;k<dim3;k++) { for (int l=0;l<dim4;l++) { for (int m=0;m<dim5;m++) { (*ptr++)=val; // initialisation des composantes a val }; // endfor m }; // endfor l }; // endfor k }; // endfor j }; // endfor i }; void Tableau_5D::Libere () // Apres l'appel de cette methode le tableau est identique a ce qu'il // aurait ete a la suite d'un appel du constructeur par defaut { if ( dim1>0 ) delete [] t; // desallocation de la place memoire else { if ( t!=NU