// FICHIER : TriaSfe1_cm5pti.h

// 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-2022 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:        06/03/2023                                          *
 *                                                                $     *
 *     AUTEUR:      G RIO   (mailto:gerardrio56@free.fr)                *
 *                                                                $     *
 *     PROJET:      Herezh++                                            *
 *                                                                $     *
 ************************************************************************
 *     BUT:         Element triangulaire,Sfe 5 pt d'integ.              *
 *                                                                $     *
 *     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     *                                                                      *
 *     VERIFICATION:                                                    *
 *                                                                      *
 *     !  date  !   auteur   !       but                          !     *
 *     ------------------------------------------------------------     *
 *     !        !            !                                    !     *
 *                                                                      *
 *                                                                $     *
 *     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     *
 *     MODIFICATIONS:
 *                                                                      *
 *     !  date  !   auteur   !       but                          !     *
 *     ------------------------------------------------------------     *
 *                                                                      *
 *                                                                $     *
 *                                                                      *
 ************************************************************************/
 
// -----------classe pour un calcul de mecanique---------

/*
// La classe TriaSfe1 permet de declarer des elements triangulaire Sfe et de realiser
// le calcul du residu local et de la raideur locale pour une loi de comportement
// donnee. La dimension de l'espace pour un tel element est 2
//
// l'interpolation est SFE, le nombre de point d'integration est  de 1 en surface
// et de 5 dans l'epaisseur
//                                       (4)           
//                                      /   \      
//                                     /     \     
//                                   (3)-----(2)   
//                                   / \     / \   
//                                  /   \   /   \       
//                                (5)----(1)----(6)  
*/


#ifndef TRIASFE1_5PTI_H
#define TRIASFE1_5PTI_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 TriaSfe1_cm5pti : public SfeMembT
{
		
	public :
	
		// CONSTRUCTEURS :
		// Constructeur par defaut
		TriaSfe1_cm5pti ();
		
		// Constructeur fonction d'une epaisseur et eventuellement d'un numero
		// d'identification 
		TriaSfe1_cm5pti (double epaiss,int num_mail=0,int num_id=-3);
		
		// Constructeur fonction  d'un numero de maillage et d'identification  
		TriaSfe1_cm5pti (int num_mail,int num_id);
		
		// Constructeur fonction d'une epaisseur, d'un numero d'identification,
		// du tableau de connexite des noeuds 
		TriaSfe1_cm5pti (double epaiss,int num_mail,int num_id,const Tableau<Noeud *>& tab);
		
		// Constructeur de copie
		TriaSfe1_cm5pti (const TriaSfe1_cm5pti& tria);
		
		
		// DESTRUCTEUR :
		~TriaSfe1_cm5pti ();
				
		// 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 TriaSfe1_cm5pti(*this); return el;};

		// Surcharge de l'operateur = : realise l'egalite entre deux instances de TriaSfe1_cm5pti
		TriaSfe1_cm5pti& operator= (TriaSfe1_cm5pti& 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(ostream& 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 doCoSfe1->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 * doCoSfe1;
  // idem mais pour les indicateurs qui servent pour l'initialisation
  static SfeMembT::UneFois  uneFoisSfe1;

  class  NombresConstruireTriaSfe1_cm5pti : public NombresConstruire
	     {  public: NombresConstruireTriaSfe1_cm5pti();
	      };
  static NombresConstruireTriaSfe1_cm5pti 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 ConsTriaSfe1_cm5pti : public ConstrucElement
    { public :  ConsTriaSfe1_cm5pti ()
         { NouvelleTypeElement nouv(TRIANGLE,SFE1,MECA_SOLIDE_DEFORMABLE,this,"_cm5pti");
           if (ParaGlob::NiveauImpression() >= 4)
               cout << "\n initialisation TriaSfe1_cm5pti" << endl;
           Element::listTypeElement.push_back(nouv);
          };
      Element * NouvelElement(int num_maill,int num) // un nouvel élément sans rien
         {Element * pt;
          pt  = new TriaSfe1_cm5pti (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 ConsTriaSfe1_cm5pti consTriaSfe1_cm5pti;
};
/// @}  // end of group
#endif