fem_penta15.cpp

Aller à la documentation de ce fichier.

//####//------------------------------------------------------------
//####//------------------------------------------------------------
//####//  MAGiC
//####//  Jean Christophe Cuilliere et Vincent FRANCOIS
//####//  Departement de Genie Mecanique - UQTR
//####//------------------------------------------------------------
//####//  MAGIC est un projet de recherche de l equipe ERICCA
//####//  du departement de genie mecanique de l Universite du Quebec a Trois Rivieres
//####//  http://www.uqtr.ca/ericca
//####//  http://www.uqtr.ca/
//####//------------------------------------------------------------
//####//------------------------------------------------------------
//####//
//####//       fem_penta15.cpp
//####//
//####//------------------------------------------------------------
//####//------------------------------------------------------------
//####//    COPYRIGHT 2000-2024
//####//  jeu 13 jun 2024 11:58:55 EDT
//####//------------------------------------------------------------
//####//------------------------------------------------------------
 
 
#include "gestionversion.h"
#include "fem_penta15.h"
#include "fem_maillage.h"
#include "fem_noeud.h"
#include "mg_element_maillage.h"
#include "ot_tenseur.h"
#include "ot_quadrature_gauss.h"
 
 
FEM_PENTA15::FEM_PENTA15(unsigned long num,class MG_ELEMENT_MAILLAGE* mai,class FEM_NOEUD** tabnoeud):FEM_ELEMENT3(num,mai),FEM_TEMPLATE_ELEMENT<15>(tabnoeud)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
    get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
 
FEM_PENTA15::FEM_PENTA15(class MG_ELEMENT_MAILLAGE* mai,FEM_NOEUD** tabnoeud):FEM_ELEMENT3(mai),FEM_TEMPLATE_ELEMENT<15>(tabnoeud)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
    get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
 
FEM_PENTA15::FEM_PENTA15(unsigned long num,class MG_ELEMENT_TOPOLOGIQUE* topo,class FEM_NOEUD** tabnoeud):FEM_ELEMENT3(num,topo),FEM_TEMPLATE_ELEMENT<15>(tabnoeud)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
        get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
 
FEM_PENTA15::FEM_PENTA15(class MG_ELEMENT_TOPOLOGIQUE* topo,FEM_NOEUD** tabnoeud):FEM_ELEMENT3(topo),FEM_TEMPLATE_ELEMENT<15>(tabnoeud)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
    get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
 
FEM_PENTA15::FEM_PENTA15(unsigned long num,class MG_ELEMENT_TOPOLOGIQUE* topo,class MG_ELEMENT_MAILLAGE* mai,class FEM_NOEUD** tabnoeud):FEM_ELEMENT3(num,topo,mai),FEM_TEMPLATE_ELEMENT<15>(tabnoeud)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
        get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
 
FEM_PENTA15::FEM_PENTA15(class MG_ELEMENT_TOPOLOGIQUE* topo,class MG_ELEMENT_MAILLAGE* mai,FEM_NOEUD** tabnoeud):FEM_ELEMENT3(topo,mai),FEM_TEMPLATE_ELEMENT<15>(tabnoeud)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
    get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
 
 
 
 
FEM_PENTA15::FEM_PENTA15(FEM_PENTA15& mdd):FEM_ELEMENT3(mdd),FEM_TEMPLATE_ELEMENT<15>(mdd)
{
    if (liaison_topologique!=NULL) if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->ajouter(this);
    tab[0]->get_lien_element3()->ajouter(this);
    tab[1]->get_lien_element3()->ajouter(this);
    tab[2]->get_lien_element3()->ajouter(this);
    tab[3]->get_lien_element3()->ajouter(this);
    tab[4]->get_lien_element3()->ajouter(this);
    tab[5]->get_lien_element3()->ajouter(this);
    tab[6]->get_lien_element3()->ajouter(this);
    tab[7]->get_lien_element3()->ajouter(this);
    tab[8]->get_lien_element3()->ajouter(this);
    tab[9]->get_lien_element3()->ajouter(this);
    tab[10]->get_lien_element3()->ajouter(this);
    tab[11]->get_lien_element3()->ajouter(this);
    tab[12]->get_lien_element3()->ajouter(this);
    tab[13]->get_lien_element3()->ajouter(this);
    tab[14]->get_lien_element3()->ajouter(this);
    get_fem_noeudpetitid()->get_lien_petit_element3()->ajouter(this);
}
FEM_PENTA15::~FEM_PENTA15()
{
    if (liaison_topologique!=NULL)
      if (liaison_topologique->get_dimension()==3) liaison_topologique->get_lien_fem_maillage()->supprimer(this);
    tab[0]->get_lien_element3()->supprimer(this);
    tab[1]->get_lien_element3()->supprimer(this);
    tab[2]->get_lien_element3()->supprimer(this);
    tab[3]->get_lien_element3()->supprimer(this);
    tab[4]->get_lien_element3()->supprimer(this);
    tab[5]->get_lien_element3()->supprimer(this);
    tab[6]->get_lien_element3()->supprimer(this);
    tab[7]->get_lien_element3()->supprimer(this);
    tab[8]->get_lien_element3()->supprimer(this);
    tab[9]->get_lien_element3()->supprimer(this);
    tab[10]->get_lien_element3()->supprimer(this);
    tab[11]->get_lien_element3()->supprimer(this);
    tab[12]->get_lien_element3()->supprimer(this);
    tab[13]->get_lien_element3()->supprimer(this);
    tab[14]->get_lien_element3()->supprimer(this);
    get_fem_noeudpetitid()->get_lien_petit_element3()->supprimer(this);
}
 
 
FEM_ELEMENT_MAILLAGE* FEM_PENTA15::dupliquer(FEM_MAILLAGE *femmai,long decalage)
{
    FEM_NOEUD* tabnoeud[15];
    tabnoeud[0]=femmai->get_fem_noeudid(tab[0]->get_id()+decalage);
    tabnoeud[1]=femmai->get_fem_noeudid(tab[1]->get_id()+decalage);
    tabnoeud[2]=femmai->get_fem_noeudid(tab[2]->get_id()+decalage);
    tabnoeud[3]=femmai->get_fem_noeudid(tab[3]->get_id()+decalage);
    tabnoeud[4]=femmai->get_fem_noeudid(tab[4]->get_id()+decalage);
    tabnoeud[5]=femmai->get_fem_noeudid(tab[5]->get_id()+decalage);
    tabnoeud[6]=femmai->get_fem_noeudid(tab[5]->get_id()+decalage);
    tabnoeud[7]=femmai->get_fem_noeudid(tab[6]->get_id()+decalage);
    tabnoeud[8]=femmai->get_fem_noeudid(tab[8]->get_id()+decalage);
    tabnoeud[9]=femmai->get_fem_noeudid(tab[9]->get_id()+decalage);
    tabnoeud[10]=femmai->get_fem_noeudid(tab[10]->get_id()+decalage);
    tabnoeud[11]=femmai->get_fem_noeudid(tab[11]->get_id()+decalage);
    tabnoeud[12]=femmai->get_fem_noeudid(tab[12]->get_id()+decalage);
    tabnoeud[13]=femmai->get_fem_noeudid(tab[13]->get_id()+decalage);
    tabnoeud[14]=femmai->get_fem_noeudid(tab[14]->get_id()+decalage);
    FEM_PENTA15* pen=new FEM_PENTA15(get_id()+decalage,maillage,tabnoeud);
    femmai->ajouter_fem_element3(pen);
    return pen;
}
 
void FEM_PENTA15::get_voisin_noeud(class FEM_NOEUD* no,TPL_LISTE_ENTITE<FEM_NOEUD*> &voisin)
{
voisin.vide();
if (no==tab[0])
      {
      voisin.ajouter(tab[1]);
      voisin.ajouter(tab[5]);
      voisin.ajouter(tab[6]);
      }
if (no==tab[1])
      {
      voisin.ajouter(tab[0]);
      voisin.ajouter(tab[2]);
      }
if (no==tab[2])
      {
      voisin.ajouter(tab[1]);
      voisin.ajouter(tab[3]);
      voisin.ajouter(tab[7]);
      }
if (no==tab[3])
      {
      voisin.ajouter(tab[2]);
      voisin.ajouter(tab[4]);
      }
if (no==tab[4])
      {
      voisin.ajouter(tab[3]);
      voisin.ajouter(tab[5]);
      voisin.ajouter(tab[8]);
      }
if (no==tab[5])
      {
      voisin.ajouter(tab[0]);
      voisin.ajouter(tab[4]);
      }
if (no==tab[6])
      {
      voisin.ajouter(tab[0]);
      voisin.ajouter(tab[9]);
      }
if (no==tab[7])
      {
      voisin.ajouter(tab[2]);
      voisin.ajouter(tab[11]);
      }
if (no==tab[8])
      {
      voisin.ajouter(tab[4]);
      voisin.ajouter(tab[13]);
      }
if (no==tab[9])
      {
      voisin.ajouter(tab[6]);
      voisin.ajouter(tab[10]);
      voisin.ajouter(tab[14]);
      }
if (no==tab[10])
      {
      voisin.ajouter(tab[9]);
      voisin.ajouter(tab[11]);
      }
if (no==tab[11])
      {
      voisin.ajouter(tab[7]);
      voisin.ajouter(tab[10]);
      voisin.ajouter(tab[12]);
      }
if (no==tab[12])
      {
      voisin.ajouter(tab[11]);
      voisin.ajouter(tab[13]);
      }
if (no==tab[13])
      {
      voisin.ajouter(tab[8]);
      voisin.ajouter(tab[12]);
      voisin.ajouter(tab[14]);
      }
if (no==tab[14])
      {
      voisin.ajouter(tab[9]);
      voisin.ajouter(tab[13]);
      }
 
  
  
}
 
bool FEM_PENTA15::valide_parametre_EF(double* uvw)
{
if (uvw[0]>=-1e-10)
   if (uvw[1]>=-1e-10)
     if (uvw[2]>=-1.-1e-10)
        if (1.-uvw[0]-uvw[1]<=1.+1e-10)  
               if (uvw[2]<=1.+1e-10)  
                     return true;
return false;
}
 
void FEM_PENTA15::reinit_boite_3D(void)
{
FEM_TEMPLATE_ELEMENT<15>::reinit_boite_3D();  
}
 
int FEM_PENTA15::get_type_entite(void)
{
    return   MAGIC::TYPE_ENTITE::IDFEM_PENTA15;
}
 
int FEM_PENTA15::get_dimension(void)
{
    return 3;
}
 
 
 
int FEM_PENTA15::get_nb_fem_noeud(void)
{
    return FEM_TEMPLATE_ELEMENT<15>::get_nb_fem_noeud();
}
 
FEM_NOEUD* FEM_PENTA15::get_fem_noeud(int num)
{
    return FEM_TEMPLATE_ELEMENT<15>::get_fem_noeud(num);
}
 
void FEM_PENTA15::change_noeud(int num,FEM_NOEUD* noeud)
{
    FEM_TEMPLATE_ELEMENT<15>::change_noeud(num,noeud);
}
 
BOITE_3D& FEM_PENTA15::get_boite_3D(void)
{
    return FEM_TEMPLATE_ELEMENT<15>::get_boite_3D();
}
 
 
void FEM_PENTA15::enregistrer(std::ostream& o,double version)
{
    if (maillage!=NULL)
      if (get_lien_topologie()!=NULL) o << "%" << get_id() << "=FEM_PENTA15($"<< get_lien_topologie()->get_id() << ",$" << maillage->get_id() << ",$" << tab[0]->get_id() << ",$" << tab[1]->get_id() << ",$" << tab[2]->get_id()<<  ",$" << tab[3]->get_id() << ",$" << tab[4]->get_id() << ",$" << tab[5]->get_id() << ",$" << tab[6]->get_id() << ",$" << tab[7]->get_id() << ",$" << tab[8]->get_id() << ",$" << tab[9]->get_id() << ",$" << tab[10]->get_id() << ",$" << tab[11]->get_id() << ",$" << tab[12]->get_id() << ",$" << tab[13]->get_id() << ",$" << tab[14]->get_id() <<  ");" << std::endl;
      else o << "%" << get_id() << "=FEM_PENTA15(NULL,$" << maillage->get_id() << ",$" << tab[0]->get_id() << ",$" << tab[1]->get_id() << ",$" << tab[2]->get_id()<<  ",$" << tab[3]->get_id() << ",$" << tab[4]->get_id() << ",$" << tab[5]->get_id()  << ",$" << tab[6]->get_id() << ",$" << tab[7]->get_id() << ",$" << tab[8]->get_id() << ",$" << tab[9]->get_id() << ",$" << tab[10]->get_id() << ",$" << tab[11]->get_id() << ",$" << tab[12]->get_id() << ",$" << tab[13]->get_id() << ",$" << tab[14]->get_id() << ");" << std::endl;
    else
      if (get_lien_topologie()!=NULL) o << "%" << get_id() << "=FEM_PENTA15($"<< get_lien_topologie()->get_id() << ",NULL,$" << tab[0]->get_id() << ",$" << tab[1]->get_id() << ",$" << tab[2]->get_id()<<  ",$" << tab[3]->get_id() << ",$" << tab[4]->get_id() << ",$" << tab[5]->get_id() <<  ",$" << tab[6]->get_id() << ",$" << tab[7]->get_id() << ",$" << tab[8]->get_id() << ",$" << tab[9]->get_id() << ",$" << tab[10]->get_id() << ",$" << tab[11]->get_id() << ",$" << tab[12]->get_id() << ",$" << tab[13]->get_id() << ",$" << tab[14]->get_id() << ");" << std::endl;
      else o << "%" << get_id() << "=FEM_PENTA15(NULL,NULL,$" << tab[0]->get_id() << ",$" << tab[1]->get_id() << ",$" << tab[2]->get_id()<<  ",$" << tab[3]->get_id() << ",$" << tab[4]->get_id() << ",$" << tab[5]->get_id() << ",$" << tab[6]->get_id() << ",$" << tab[7]->get_id() << ",$" << tab[8]->get_id() << ",$" << tab[9]->get_id() << ",$" << tab[10]->get_id() << ",$" << tab[11]->get_id() << ",$" << tab[12]->get_id() << ",$" << tab[13]->get_id() << ",$" << tab[14]->get_id() << ");" << std::endl;
      
}
 
 
int FEM_PENTA15::get_nb_pt_gauss(int degre)
{
return OT_POINTS_GAUSS::get_nb_point_penta(degre);
}
 
void FEM_PENTA15::get_pt_gauss(int degre,int num,double &w,double *uvw)
{
return OT_POINTS_GAUSS::get_pt_gauss_penta(degre,num,w,uvw);    
}
 
int FEM_PENTA15::get_degre_gauss(int num)
{
return OT_POINTS_GAUSS::get_degre_gauss_penta(num);  
}
 
int FEM_PENTA15::get_nb_fonction_interpolation(void)
{
    return 15;
}
 
int FEM_PENTA15::get_degremax_fonction_interpolation(void)
{
     return 3;  
}
double FEM_PENTA15::get_fonction_interpolation(int num,double *uv)
{
    double val;
    switch (num)
    {
    case 1:
        val=uv[1]*(1.-uv[0])*(2.*uv[1]-2.-uv[0])/2.;
        break;
    case 3:
        val=uv[2]*(1.-uv[0])*(2.*uv[2]-2.-uv[0])/2.;
        break;
    case 5:
        val=(uv[0]-1.)*(1.-uv[1]-uv[2])*(uv[0]+2*uv[1]+2*uv[2])/2.;
        break;
    case 10:
        val=uv[1]*(1.+uv[0])*(2*uv[1]-2.+uv[0])/2.;
        break;
    case 12:
        val=uv[2]*(1.+uv[0])*(2*uv[2]-2.+uv[0])/2.;
        break;
    case 14:
        val=(-uv[0]-1.)*(1.-uv[1]-uv[2])*(-uv[0]+2*uv[1]+2*uv[2])/2.;
        break;
    case 2:
        val=2.*uv[1]*uv[2]*(1.-uv[0]);
        break;
    case 4:
        val=2.*uv[2]*(1.-uv[0])*(1.-uv[1]-uv[2]);
        break;
    case 6:
        val=2.*uv[1]*(1.-uv[0])*(1.-uv[1]-uv[2]);
        break;
    case 7:
        val=uv[1]*(1.-uv[0]*uv[0]);
        break;
    case 8:
        val=uv[2]*(1.-uv[0]*uv[0]);
        break;
    case 9:
        val=(1.-uv[0]*uv[0])*(1.-uv[1]-uv[2]);
        break;
    case 11:
        val=2*uv[1]*uv[2]*(1+uv[0]);
        break;
    case 13:
        val=2*uv[2]*(1-uv[1]-uv[2])*(1.+uv[0]);
        break;
    case 15:
        val=2*uv[1]*(1-uv[1]-uv[2])*(1.+uv[0]);
        break;
    }
    return val;
}
 
double FEM_PENTA15::get_fonction_derive_interpolation(int num,int num_variable,double *uv)
{
    double val;
    switch (num)
    {
    case 1:
        switch (num_variable)
        {
        case 1:
            val=uv[1]*(2.*uv[0]-2.*uv[1]+1.)/2.;
            break;
        case 2:
            val=(uv[0]-1.)*(uv[0]-4.*uv[1]+2.)/2.;
            break;
        case 3:
            val=0.;
            break;
        } break;
    case 3:
        switch (num_variable)
        {
        case 1:
            val=uv[2]*(2.*uv[0]-2.*uv[2]+1.)/2.;
            break;
        case 2:
            val=0.;
            break;
        case 3:
            val=(uv[0]-1.)*(uv[0]-4.*uv[2]+2.)/2.;
            break;
        } break;
    case 5:
        switch (num_variable)
        {
        case 1:
            val=(1.-uv[1]-uv[2])*(2.*uv[0]+2.*uv[1]+2.*uv[2]-1.)/2.;
            break;
        case 2:
            val=(1.-uv[0])*(uv[0]+4.*uv[1]+4.*uv[2]-2.)/2.;
            break;
        case 3:
            val=(1.-uv[0])*(uv[0]+4.*uv[1]+4.*uv[2]-2.)/2.;
            break;
        } break;
    case 10:
        switch (num_variable)
        {
        case 1:
            val=uv[1]*(2.*uv[0]+2.*uv[1]-1.)/2.;
            break;
        case 2:
            val=(uv[0]+1.)*(uv[0]+4.*uv[1]-2.)/2.;
            break;
        case 3:
            val=0.;
            break;
        } break;
    case 12:
        switch (num_variable)
        {
        case 1:
            val=uv[2]*(2.*uv[0]+2*uv[2]-1.)/2.;
            break;
        case 2:
            val=0;
            break;
        case 3:
            val=(uv[0]+1.)*(uv[0]+4.*uv[2]-2.)/2.;
            break;
        } break;
    case 14:
        switch (num_variable)
        {
        case 1:
            val=(1.-uv[1]-uv[2])*(2.*uv[0]-2.*uv[1]-2.*uv[2]+1.)/2.;
            break;
        case 2:
            val=-(uv[0]+1.)*(uv[0]-4.*uv[1]-4.*uv[2]+2.)/2.;
            break;
        case 3:
            val=-(uv[0]+1.)*(uv[0]-4.*uv[1]-4.*uv[2]+2.)/2.;
            break;
        } break;
    case 2:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[1]*uv[2];
            break;
        case 2:
            val=-2.*uv[2]*(uv[0]-1.);
            break;
        case 3:
            val=-2.*uv[1]*(uv[0]-1.);
            break;
        } break;
    case 4:
        switch (num_variable)
        {
        case 1:
            val=2.*uv[2]*(uv[1]+uv[2]-1.);
            break;
        case 2:
            val=-2.*uv[2]*(uv[0]-1.);
            break;
        case 3:
            val=-2.*(uv[0]-1.)*(uv[1]+2.*uv[2]+1.);
            break;
        } break;
    case 6:
        switch (num_variable)
        {
        case 1:
            val=2.*uv[1]*(uv[1]+uv[2]-1.);
            break;
        case 2:
            val=2.*(uv[0]-1.)*(2.*uv[1]+uv[2]-1.);
            break;
        case 3:
            val=2.*uv[1]*(uv[0]-1.);
            break;
        } break;
    case 7:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[0]*uv[1];
            break;
        case 2:
            val=1-uv[0]*uv[0];
            break;
        case 3:
            val=0.;
            break;
        } break;
    case 8:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[0]*uv[2];
            break;
        case 2:
            val=0.;
            break;
        case 3:
            val=1.-uv[0]*uv[0];
            break;
        } break;
    case 9:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[0]*(uv[1]+uv[2]-1.);
            break;
        case 2:
            val=uv[0]*uv[0]-1.;
            break;
        case 3:
            val=uv[0]*uv[0]-1.;
            break;
        } break;
    case 11:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[1]*uv[2];
            break;
        case 2:
            val=2.*uv[2]*(1.+uv[0]);
            break;
        case 3:
            val=2.*uv[1]*(1.+uv[0]);
            break;
        } break;
    case 13:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[2]*(uv[1]+uv[2]-1.);
            break;
        case 2:
            val=-2.*uv[2]*(uv[0]+1.);
            break;
        case 3:
            val=-2.*(uv[0]+1.)*(uv[1]+2.*uv[2]-1.);
            break;
        } break;
    case 15:
        switch (num_variable)
        {
        case 1:
            val=-2.*uv[1]*(uv[1]+uv[2]-1.);
            break;
        case 2:
            val=-2*(uv[0]+1.)*(2*uv[1]+uv[2]-1.);
            break;
        case 3:
            val=-2.*uv[1]*(uv[0]+1.);
            break;
        } break;
    }
    return val;
}
 
 
 
 
 
int FEM_PENTA15::verifie_validite_decoupage_xfem(double *vol)
{
return 0.;  
}