// FICHIER : TriaQSfe3.h
// CLASSE : TriaQSfe3

// 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:        28/02/2021                                          *
*                                                                $     *
*     AUTEUR:      G RIO   (mailto:gerardrio56@free.fr)                *
*                                                                $     *
*     PROJET:      Herezh++                                            *
*                                                                $     *
************************************************************************
*     BUT: Element triangulaire,Sfe3 avec une interpolation quadratique*
*          de la partie membrane du tenseur de déformation. Les noeuds *
*       concernés sont ceux du triangle central, au nombre de 6.       *
*     Le calcul de la normale est identique à celui de l'élément SFE3  *
*     avec membrane linéaire.                                          *
*     Il s'effectue à partir de l'interpolation des theta3 relativement*
*       aux noeuds sommet du triangle central, ceci via un polynome    *
*       quadratique complet.                                           *
*       Le jacobien est celui de la facette  centrale à 6 noeuds.      *
*                                                                $     *
*     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     *
*     VERIFICATION:                                                    *
*                                                                      *
*     !  date  !   auteur   !       but                          !     *
*     ------------------------------------------------------------     *
*     !        !            !                                    !     *
*                                                                $     *
*     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     *
*     MODIFICATIONS:                                                   *
*     !  date  !   auteur   !       but                          !     *
*     ------------------------------------------------------------     *
*                                                                $     *
************************************************************************/
 
/*
//
// l'interpolation est QSFE3,
//                                        (7)
//                                       /   \
//                                      /     \
//                                     /       \
//                                   (3)---5---(2)
//                                   / \       / \
//                                  /   6     4   \
//                                 /     \   /     \
//                               (8)----- (1)------(9)
*/


#ifndef TRIAQSFE3_H
#define TRIAQSFE3_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 "FrontSegQuad.h"
#include "FrontTriaQuad.h"


/// @addtogroup groupe_des_elements_finis
///  @{
///


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

		// Surcharge de l'operateur = : realise l'egalite entre deux instances de TriaQSfe3
		TriaQSfe3& operator= (TriaQSfe3& 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 doCoSfe3->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 FrontSegQuad(tab,ddelem)));};
        ElFrontiere* new_frontiere_surf(int ,Tableau <Noeud *> & tab, DdlElement& ddelem)
          { return ((ElFrontiere*) (new FrontTriaQuad(tab,ddelem)));};
	  
      // VARIABLES PRIVEES :
        // place memoire commune a tous les elements TriaQSfe3
        static SfeMembT::DonnComSfe * doCoSfe3;
        // idem mais pour les indicateurs qui servent pour l'initialisation
        static SfeMembT::UneFois  uneFoisSfe3;

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