Herezh_dev/herezh_pp/Enumeration/EnumTypeGrandeur.cc

248 lines
10 KiB
C++
Executable file

// FICHIER : EnumTypeGrandeur.cp
// 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/>.
#include "EnumTypeGrandeur.h"
# include <iostream>
using namespace std; //introduces namespace std
#include <stdlib.h>
#include "Sortie.h"
//#ifdef SYSTEM_MAC_OS_X
// #include <stringfwd.h> // a priori ce n'est pas portable
//#el
#if defined SYSTEM_MAC_OS_CARBON
#include <stringfwd.h> // a priori ce n'est pas portable
#else
#include <string.h> // pour le flot en memoire centrale
#endif
#include <string>
#include "ParaGlob.h"
// tout d'abord on définit la map qui permet de relier les chaines et les types énumérés
// 1) def de la map
map < string, EnumTypeGrandeur , std::less < string> >
ClassPourEnumTypeGrandeur::map_EnumTypeGrandeur;
map < string, EnumType2Niveau , std::less < string> >
ClassPourEnumTypeGrandeur::map_EnumType2Niveau;
// 2) def de la grandeur statique qui permet de remplir la map
ClassPourEnumTypeGrandeur ClassPourEnumTypeGrandeur::remplir_map;
// le constructeur qui rempli effectivement la map
ClassPourEnumTypeGrandeur::ClassPourEnumTypeGrandeur()
{ // pour les types de base
map_EnumTypeGrandeur["RIEN_TYPEGRANDEUR"]=RIEN_TYPEGRANDEUR;
map_EnumTypeGrandeur["SCALAIRE"]=SCALAIRE;
map_EnumTypeGrandeur["VECTEUR"]=VECTEUR;
map_EnumTypeGrandeur["TENSEUR"]=TENSEUR;
map_EnumTypeGrandeur["TENSEUR_NON_SYM"]=TENSEUR_NON_SYM;
map_EnumTypeGrandeur["SCALAIRE_ENTIER"]=SCALAIRE_ENTIER;
map_EnumTypeGrandeur["SCALAIRE_DOUBLE"]=SCALAIRE_DOUBLE;
map_EnumTypeGrandeur["TENSEURBB"]=TENSEURBB;
map_EnumTypeGrandeur["TENSEURHH"]=TENSEURHH;
map_EnumTypeGrandeur["TENSEURBH"]=TENSEURBH;
map_EnumTypeGrandeur["TENSEURHB"]=TENSEURHB;
map_EnumTypeGrandeur["TENSEUR_NON_SYM_BB"]=TENSEUR_NON_SYM_BB;
map_EnumTypeGrandeur["TENSEUR_NON_SYM_HH"]=TENSEUR_NON_SYM_HH;
map_EnumTypeGrandeur["COORDONNEE"]=COORDONNEE;
map_EnumTypeGrandeur["COORDONNEEB"]=COORDONNEEB;
map_EnumTypeGrandeur["COORDONNEEH"]=COORDONNEEH;
map_EnumTypeGrandeur["BASE__H"]=BASE__H;
map_EnumTypeGrandeur["BASE__B"]=BASE__B;
map_EnumTypeGrandeur["CHAINE_CAR"]=CHAINE_CAR;
map_EnumTypeGrandeur["GRANDEUR_QUELCONQUE"]=GRANDEUR_QUELCONQUE;
// pour les structures secondaires
map_EnumType2Niveau["TYPE_SIMPLE"]=TYPE_SIMPLE;
map_EnumType2Niveau["TABLEAU_T"]=TABLEAU_T;
map_EnumType2Niveau["TABLEAU2_T"]=TABLEAU2_T;
map_EnumType2Niveau["LISTE_T"]=LISTE_T;
map_EnumType2Niveau["LISTE_IO_T"]=LISTE_IO_T;
map_EnumType2Niveau["MAP_T"]=MAP_T;
map_EnumType2Niveau["VECTOR_T"]=VECTOR_T;
};
string NomTypeGrandeur(EnumTypeGrandeur id_typeGrandeur)
// Retourne le nom du type de grandeur correspondant a l'identificateur
// de type enumere id_typeGrandeur
{string result;
switch (id_typeGrandeur)
{case RIEN_TYPEGRANDEUR : result="RIEN_TYPEGRANDEUR"; break;
case SCALAIRE : result="SCALAIRE"; break;
case VECTEUR : result="VECTEUR"; break;
case TENSEUR : result="TENSEUR"; break;
case TENSEUR_NON_SYM : result="TENSEUR_NON_SYM"; break;
case SCALAIRE_ENTIER : result="SCALAIRE_ENTIER"; break;
case SCALAIRE_DOUBLE : result="SCALAIRE_DOUBLE"; break;
case TENSEURBB : result="TENSEURBB"; break;
case TENSEURHH : result="TENSEURHH"; break;
case TENSEURBH : result="TENSEURBH"; break;
case TENSEURHB : result="TENSEURHB"; break;
case TENSEUR_NON_SYM_BB : result="TENSEUR_NON_SYM_BB"; break;
case TENSEUR_NON_SYM_HH : result="TENSEUR_NON_SYM_HH"; break;
case COORDONNEE : result="COORDONNEE"; break;
case COORDONNEEB : result="COORDONNEEB"; break;
case COORDONNEEH : result="COORDONNEEH"; break;
case BASE__H : result="BASE__H"; break;
case BASE__B : result="BASE__B"; break;
case CHAINE_CAR : result="CHAINE_CAR"; break;
case GRANDEUR_QUELCONQUE : result="GRANDEUR_QUELCONQUE"; break;
default :
cout << "\nErreur : valeur incorrecte du type EnumTypeGrandeur !\n";
cout << "NomTypeGrandeur(EnumTypeGrandeur ) \n";
Sortie(1);
};
return result;
};
string NomType2Niveau(EnumType2Niveau id_Type2Niveau)
// Retourne le nom du type de grandeur correspondant a l'identificateur
// de type enumere id_Type2Niveau
{ string result;
switch (id_Type2Niveau)
{ case TYPE_SIMPLE : result="TYPE_SIMPLE"; break;
case TABLEAU_T : result="TABLEAU_T"; break;
case TABLEAU2_T : result="TABLEAU2_T"; break;
case LISTE_T : result="LISTE_T"; break;
case LISTE_IO_T : result="LISTE_IO_T"; break;
case MAP_T : result="MAP_T"; break;
case VECTOR_T : result="VECTOR_T"; break;
default :
cout << "\nErreur : valeur incorrecte du type EnumType2Niveau !\n";
cout << "NomTypeGrandeur(EnumTypeGrandeur ) \n";
Sortie(1);
};
return result;
};
EnumTypeGrandeur Id_nomTypeGrandeur (string nom_typeGrandeur)
// Retourne la variable de type enumere associe au nom nom_typeGrandeur
{ // on vérifie si la variable de type enumere existe
map < string, EnumTypeGrandeur , std::less < string> >& maa=ClassPourEnumTypeGrandeur::map_EnumTypeGrandeur;
map < string, EnumTypeGrandeur , std::less < string> >::iterator il,ilfin= maa.end();
string toto;
il = maa.find(nom_typeGrandeur);
if (il == maa.end())
{// on vérifie si la variable de type enumere existe
cout << "\nErreur : nom du type de grandeur '" <<nom_typeGrandeur << " 'inconnu !\n";
cout << "Id_nomTypeGrandeur(string ) \n";
Sortie(1);
};
// retour de la grandeur
return (*il).second;
};
EnumType2Niveau Id_nomType2Niveau (string nom_Type2Niveau)
// Retourne la variable de type enumere associe au nom nom_Type2Niveau
{ // on vérifie si la variable de type enumere existe
map < string, EnumType2Niveau , std::less < string> >& maa=ClassPourEnumTypeGrandeur::map_EnumType2Niveau;
map < string, EnumType2Niveau , std::less < string> >::iterator il,ilfin= maa.end();
string toto;
il = maa.find(nom_Type2Niveau);
if (il == maa.end())
{// on vérifie si la variable de type enumere existe
cout << "\nErreur : nom du type de grandeur '" <<nom_Type2Niveau << " 'inconnu !\n";
cout << "Id_nomType2Niveau(string ) \n";
Sortie(1);
};
// retour de la grandeur
return (*il).second;
};
// Retourne le nombre d'éléments de la grandeur en fonction de la dimension
// exemple en dimension 3, pour un scalaire retourne 1, pour un vecteur 3
// pour un tenseur (a priori symétrique) 6
// pour un tenseur non symétrique 9
// pour le cas particulier GRANDEUR_QUELCONQUE : retourne -1
int NombreElementFoncDim(EnumTypeGrandeur id_typeGrandeur)
{ switch (id_typeGrandeur)
{ case RIEN_TYPEGRANDEUR : return 0; break;
case SCALAIRE : case SCALAIRE_ENTIER : case SCALAIRE_DOUBLE : case CHAINE_CAR: return 1; break;
case VECTEUR : case COORDONNEE: case COORDONNEEB: case COORDONNEEH: return ParaGlob::Dimension(); break;
case BASE__H : case BASE__B : return (ParaGlob::Dimension() * ParaGlob::Dimension()); break;
case TENSEUR : case TENSEURBB: case TENSEURHH:
switch (ParaGlob::Dimension())
{case 1: return 1; break;
case 2: return 3; break;
case 3: return 6; break;
}
case TENSEUR_NON_SYM : case TENSEURBH: case TENSEURHB: case TENSEUR_NON_SYM_BB: case TENSEUR_NON_SYM_HH:
switch (ParaGlob::Dimension())
{case 1: return 1; break;
case 2: return 4; break;
case 3: return 9; break;
}
case GRANDEUR_QUELCONQUE: return -1;break;
default :
cout << "\nErreur : valeur incorrecte du type EnumTypeGrandeur !\n";
cout << "NomTypeGrandeur(EnumTypeGrandeur ) \n";
Sortie(1);
};
return 0;
};
// indique si c'est un type numérique ou non
bool Type_grandeur_numerique(EnumTypeGrandeur id_typeGrandeur)
{ switch (id_typeGrandeur)
{ case RIEN_TYPEGRANDEUR : return false; break;
case CHAINE_CAR : return false; break;
case SCALAIRE : case SCALAIRE_ENTIER : case SCALAIRE_DOUBLE :
case VECTEUR : case COORDONNEE: case COORDONNEEB: case COORDONNEEH:
case BASE__B : case BASE__H :
case TENSEUR : case TENSEURBB: case TENSEURHH:
case TENSEUR_NON_SYM : case TENSEURBH: case TENSEURHB: case TENSEUR_NON_SYM_BB:
case TENSEUR_NON_SYM_HH:
return true; break;
case GRANDEUR_QUELCONQUE: return false; break; // a priori on ne sait pas, on répond non par précaution
default :
cout << "\nErreur : valeur incorrecte du type EnumTypeGrandeur !\n";
cout << "Type_grandeur_numerique(EnumTypeGrandeur ) \n";
Sortie(1);
};
return 0;
};
// surcharge de la lecture
istream & operator >> (istream & entree, EnumTypeGrandeur & result)
{ string nom_typeGrandeur;
entree >> nom_typeGrandeur;
result = Id_nomTypeGrandeur ( nom_typeGrandeur);
return entree;
};
// surcharge de l'operator d'ecriture
ostream & operator << (ostream & sort, const EnumTypeGrandeur& a)
{ // on ecrit la forme caractère
sort << NomTypeGrandeur(a) << " ";
return sort;
};