Herezh_dev/Elements/Mecanique/SFE/TriaSfe2.h

193 lines
8 KiB
C
Raw Normal View History

// FICHIER : TriaSfe2.h
// CLASSE : TriaSfe2
// 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/>.
/************************************************************************
* DATE: 04/07/2007 *
* $ *
* AUTEUR: G RIO (mailto:gerardrio56@free.fr) *
* $ *
* PROJET: Herezh++ *
* $ *
************************************************************************
* BUT: Element triangulaire,Sfe2. Le calcul de la normale *
* s'effectue à partir de l'interpolation de normale sur chaque *
* arrête. Celles-ci sont obtenue par moyenne pondérée (en fonc- *
* tion de la distance du centre de gravité ou en fait de la *
* longueur de la hauteur abaissée sur l'arrête) et des normales *
* aux triangles de part et autres de l'arrête. *
* La position de la normale sur l'arrête est également calculée *
* de manière à tenir compte de la distorsion des éléments. La *
* est celle exposée par Hervé dans sa thèse. *
* $ *
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' * *
* VERIFICATION: *
* *
* ! date ! auteur ! but ! *
* ------------------------------------------------------------ *
* ! ! ! ! *
* $ *
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' *
* MODIFICATIONS: *
* ! date ! auteur ! but ! *
* ------------------------------------------------------------ *
* $ *
************************************************************************/
/*
//
// l'interpolation est SFE,
// (4)
// / \
// / \
// (3)-----(2)
// / \ / \
// / \ / \
// (5)----(1)----(6)
*/
#ifndef TRIASFE2_H
#define TRIASFE2_H
#include "ParaGlob.h"
#include "ElemMeca.h"
#include "Met_abstraite.h"
#include "GeomTriangle.h"
#include "Noeud.h"
#include "UtilLecture.h"
#include "Tenseur.h"
#include "NevezTenseur.h"
#include "Deformation.h"
#include "SfeMembT.h"
#include "ElFrontiere.h"
#include "FrontSegLine.h"
#include "FrontTriaLine.h"
/// @addtogroup groupe_des_elements_finis
/// @{
///
class TriaSfe2 : public SfeMembT
{
public :
// CONSTRUCTEURS :
// Constructeur par defaut
TriaSfe2 ();
// Constructeur fonction d'une epaisseur et eventuellement d'un numero
// d'identification
TriaSfe2 (double epaiss,int num_mail=0,int num_id=-3);
// Constructeur fonction d'un numero de maillage et d'identification
TriaSfe2 (int num_mail,int num_id);
// Constructeur fonction d'une epaisseur, d'un numero d'identification,
// du tableau de connexite des noeuds
TriaSfe2 (double epaiss,int num_mail,int num_id,const Tableau<Noeud *>& tab);
// Constructeur de copie
TriaSfe2 (const TriaSfe2& tria);
// DESTRUCTEUR :
~TriaSfe2 ();
// création d'un élément de copie: utilisation de l'opérateur new et du constructeur de copie
// méthode virtuelle
Element* Nevez_copie() const { Element * el= new TriaSfe2(*this); return el;};
// Surcharge de l'operateur = : realise l'egalite entre deux instances de TriaSfe2
TriaSfe2& operator= (TriaSfe2& tria);
// METHODES :
// 1) derivant des virtuelles pures
// affichage dans la sortie transmise, des variables duales "nom"
// aux differents points d'integration
// dans le cas ou nom est vide, affichage de "toute" les variables
void AfficheVarDual(ofstream& sort, Tableau<string>& nom);
// 2) derivant des virtuelles
// 3) methodes propres a l'element
// les coordonnees des points d'integration dans l'epaisseur
inline double KSI(int i) { return doCoSfe2->segment.KSI(i);};
protected :
// adressage des frontières linéiques et surfacique
// définit dans les classes dérivées, et utilisées pour la construction des frontières
ElFrontiere* new_frontiere_lin(int ,Tableau <Noeud *> & tab, DdlElement& ddelem)
{ return ((ElFrontiere*) (new FrontSegLine(tab,ddelem)));};
ElFrontiere* new_frontiere_surf(int ,Tableau <Noeud *> & tab, DdlElement& ddelem)
{ return ((ElFrontiere*) (new FrontTriaLine(tab,ddelem)));};
// VARIABLES PRIVEES :
// place memoire commune a tous les elements TriaMembL1
static SfeMembT::DonnComSfe * doCoSfe2;
// idem mais pour les indicateurs qui servent pour l'initialisation
static SfeMembT::UneFois uneFoisSfe2;
class NombresConstruireTriaSfe2 : public NombresConstruire
{ public: NombresConstruireTriaSfe2();
};
static NombresConstruireTriaSfe2 nombre_V; // les nombres propres à l'élément
// GESTION AUTOMATIQUE D'AJOUT D'ELEMENT DANS LE PROGRAMME
//ajout de l'element dans la liste : listTypeElemen, geree par la class Element
class ConsTriaSfe2 : public ConstrucElement
{ public : ConsTriaSfe2 ()
{ NouvelleTypeElement nouv(TRIANGLE,SFE2,MECA_SOLIDE_DEFORMABLE,this);
if (ParaGlob::NiveauImpression() >= 4)
cout << "\n initialisation TriaSfe2" << endl;
Element::listTypeElement.push_back(nouv);
};
Element * NouvelElement(int num_maill,int num) // un nouvel élément sans rien
{Element * pt;
pt = new TriaSfe2 (num_maill,num) ;
return pt;};
// ramene true si la construction de l'element est possible en fonction
// des variables globales actuelles: ex en fonction de la dimension
bool Element_possible() { if (ParaGlob::Dimension() == 3) return true; else return false;};
};
static ConsTriaSfe2 consTriaSfe2;
};
/// @} // end of group
#endif