Herezh_dev/tenseurs_mai99/Coordonnees/Coordonnee.cc

1063 lines
30 KiB
C++
Raw Permalink Normal View History

// FICHIER : Coordonnee.cc
// CLASSE : Coordonnee
// 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.
//
2023-05-03 17:23:49 +02:00
// 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/>.
//#include "Debug.h"
# include <iostream>
using namespace std; //introduces namespace std
#include <stdlib.h>
#include "Sortie.h"
#include "ConstMath.h"
#include "MathUtil.h"
#include <iomanip>
#include "ParaGlob.h"
#include <limits>
#include "Coordonnee.h"
#ifndef COORDONNEE_H_deja_inclus
// Constructeur par defaut
// avant ->// N.B. : la dimension est affectee a 3 et les valeurs a 0
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee () :
dim (0) , coord (NULL),memoire(true)
{};
// Constructeur utile si le nombre de coordonnees est connue
// N.B. : les valeurs sont affectees a 0.
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee (int dimension) :
dim ((short)dimension), memoire(true),coord (NULL)
{ if (dim == 0) return;
#ifdef MISE_AU_POINT
if ( (dimension<0) || (dimension>3) )
{
cout << "\nErreur de dimension !\n";
cout << "COORDONNEE::COORDONNEE (int ) \n";
Sortie(1);
};
#endif
coord=new double [dim];
switch (dim)
{case 3: coord[2]=0.0;
case 2: coord[1]=0.0;
case 1: coord[0]=0.0;
};
};
// Constructeur pour un point a une dimension
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee (double x) :
dim (1),memoire(true)
{ coord=new double [1];
coord[0]=x;
};
// Constructeur pour un point a deux dimensions
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee (double x,double y) :
dim (2),memoire(true)
{ coord=new double [2];
coord[0]=x;
coord[1]=y;
};
// Constructeur pour un point a trois dimensions
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee (double x,double y,double z) :
dim (3) ,memoire(true)
{ coord=new double [3];
coord[0]=x;
coord[1]=y;
coord[2]=z;
};
// constructeur fonction d'une adresse memoire ou sont stockee les coordonnees
// et d'une dimension ( l'existance de la place mémoire est a la charge
// de l'utilisateur.
// DANS CE CAS IL N'Y A PAS DE CREATION DE MEMOIRE !!
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee (int dimension,double* t) :
dim ((short) dimension),coord (t),memoire(false)
{};
// Constructeur de copie
// mais là on construit systématiquement un vrai coordonnée
// même si la mémoire est fausse, car on ne veut pas que plusieur
// coordonnée pointes sur les mêmes valeurs, sans précautions supplémentaires
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::Coordonnee (const Coordonnee& c) :
dim (c.dim),memoire(true)
{ if ( dim==0 )
coord=NULL;
else
// copie des coordonnees
{ coord=new double [dim];
switch (dim)
{case 3: coord[2]=c.coord[2];
case 2: coord[1]=c.coord[1];
case 1: coord[0]=c.coord[0];
};
};
};
// Destructeur
// Desallocation de la place memoire allouee
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee::~Coordonnee ()
{if (memoire)
{ if (dim > 0)
{ delete [] coord;
coord=NULL;
dim=0;
}
#ifdef MISE_AU_POINT
else
{if ( coord!=NULL )
{ cout << "\nErreur de liberation de la place memoire\n";
cout << "COORDONNEE::LIBERE () \n";
Sortie(1);
}
}
#endif
}
};
// fonction équivalente au constructeur: changement pour une place externe via un pointeur
// ( l'existance de la place mémoire est a la charge
// de l'utilisateur et ne sera pas détruite par le destructeur.)
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Change_place(int dimension,double* t)
{ // on commence par libérer la place
Libere();
// création en fonction de la dimension
dim = dimension;
switch (dim)
{ case 0: memoire = true; break; // on met à true, car de toute manière il n'y a pas de mémoire
case 1: case 2: case 3: { memoire = false; coord = t; break;} // cas normal
default:
{ cout << "\n erreur la dimension n'est entre 0 et 3 : " << dimension
<< "\n Coordonnee::Change_place(int dimension,double* t)";
Sortie(1);
}
};
};
// changement des coordonnees
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Change_Coordonnee(int dimension, double x) // dimension 1
{ if (dim == dimension) { coord[0] = x; }
else { Change_dim(dimension); coord[0] = x; };
};
// changement des coordonnees
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Change_Coordonnee(int dimension, double x,double y) // dimension 2
{ if (dim != dimension) Change_dim(dimension);
coord[0] = x; coord[1] = y;
};
// changement des coordonnees
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Change_Coordonnee(int dimension, double x,double y,double z) // dimension 3
{ if (dim != dimension) Change_dim(dimension);
coord[0] = x; coord[1] = y; coord[2] = z;
};
// Renvoie le nombre de coordonnees
#ifndef MISE_AU_POINT
inline
#endif
int Coordonnee::Dimension () const
{ return dim; };
// Desallocation de la place memoire allouee
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Libere ()
{if (memoire)
{ if (dim > 0)
{ delete [] coord;
coord=NULL;
dim=0;
}
};
coord=NULL;
dim=0;
};
// Renvoie la ieme coordonnee
#ifndef MISE_AU_POINT
inline
#endif
double& Coordonnee::operator() (int i)
{
#ifdef MISE_AU_POINT
if ( (i<1) || (i>dim) )
{ cout << "\nErreur de dimension !\n";
cout << "COORDONNEE::OPERATOR() (int ) \n";
Sortie(1);
};
#endif
return coord[i-1];
};
// Renvoie une copie de la ieme coordonnee
#ifndef MISE_AU_POINT
inline
#endif
double Coordonnee::operator() (int i) const
{
#ifdef MISE_AU_POINT
if ( (i<1) || (i>dim) )
{ cout << "\nErreur de dimension !\n";
cout << "COORDONNEE::OPERATOR() (int ) \n";
Sortie(1);
};
#endif
return coord[i-1];
};
// changement de la dimension
// dans le cas d'une nouvelle dimension inferieur on supprime les dernieres coord
// dans le cas d'une dimension superieur, on ajoute des coord initialisees a zero`
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Change_dim(int dimen)
{ if (dimen == dim) return; // même dimension, on ne fait rien
#ifdef MISE_AU_POINT
if ((dimen<0) || (dimen>3))
{ cout << "\n erreur, la nouvelle dimension doit etre comprise entre 0 et 3 ! ";
cout << "\n dim voulue = " << dimen ;
cout << "\nCoordonnee::Change_dim(int dim) " << endl;
Sortie(1);
}
#endif
double * sauve = coord;
if (dimen == 0)
{ // comme on a déjà passé le cas où dimen == dim, cela veut dire que dim est non nulle
Libere();
}
else if (dim < dimen) // cas où la nouvelle dimension est supérieur
{// dans le cas où il n'y a pas eu allocation, donc que la mémoire n'est
// pas gérée par l'objet, on ne peut pas changer de dimension
if (!memoire)
{ cout << "\n erreur, l'objet ne gere pas sa memoire, donc le changement de dim "
<< " n'est pas possible !! ";
cout << "\n dim voulue = " << dimen << " ancienne dimension: " << dim ;
cout << "\nCoordonnee::Change_dim(int dim) " << endl;
Sortie(1);
};
// donc pour la suite on considère que l'élément gère sa mémoire
// les dimensions sont 1 ou 2 ou 3
// et le cas même dimension a déjà été réglé, donc ici il y a forcément
// une différence
if (dim ==0 ) // cas où rien n'exitait et dimen > 0
{ coord = new double [dimen]; dim = dimen;
switch (dim)
{case 3: coord[2]=0.0;
case 2: coord[1]=0.0;
case 1: coord[0]=0.0;
};
}
else // cas où dim est différent de 0
{switch (dimen - dim)
{case 2: // là obligatoirement: dimen=3 et dim = 1
{ coord = new double [dimen]; dim = (short)dimen;
coord[2]=0.;coord[1]=0.;coord[0]=sauve[0];
delete [] sauve;
break;
}
case 1: // dim ne peut avoir comme dimension que 2 ou 1
{ coord = new double [dimen];
switch (dim)
{case 2: // dimen = 3
{ coord[2]=0.;coord[1]=sauve[1];coord[0]=sauve[0];
break;
}
case 1: // dimen = 2
{ coord[1]=0.;coord[0]=sauve[0];
break;
}
};
dim = (short)dimen;
delete [] sauve;
}
};
}
}
else if (dim > dimen) // nouvelle dimension non nulle, plus petite
{ coord = new double [dimen];
switch (dimen)
{case 3: coord[2]=sauve[2];
case 2: coord[1]=sauve[1];
case 1: coord[0]=sauve[0];
};
if (dim > 0) delete [] sauve;
dim = (short) dimen;
}
};
// Surcharge de l'operateur = : realise l'affectation entre deux points
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee& Coordonnee::operator= (const Coordonnee& c)
{ if (dim==c.dim)
{ switch (dim)
{case 3: coord[2]=c.coord[2];
case 2: coord[1]=c.coord[1];
case 1: coord[0]=c.coord[0];
// case 0: on ne fait rien
};
return (*this);
}
else if ( c.dim==0 )
{ Libere();}
else
{ if (!memoire)
{ cout << "\n erreur, l'objet ne gere pas sa memoire, donc le changement de dim "
<< " n'est pas possible !! ";
cout << "\n dim voulue = " << c.dim << " ancienne dimension: " << dim ;
cout << "\nCoordonnee::operator= (const Coordonnee& c) " << endl;
Sortie(1);
};
#ifdef MISE_AU_POINT
if (dim != 0)
cout << "\n attention, on change la dimension du point !!!"
<< " de "<<dim<<" a "<<c.dim
<< " Coordonnee::operator= (const Coordonnee& c) " << endl;
#endif
Libere();
dim=c.dim;
coord=new double [dim];
switch (dim)
{case 3: coord[2]=c.coord[2];
case 2: coord[1]=c.coord[1];
case 1: coord[0]=c.coord[0];
// case 0: ne peut pas arriver
};
};
return (*this);
};
// Surcharge de l'operateur - : renvoie l'oppose d'un point
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee Coordonnee::operator- () const
{ Coordonnee result(dim);
switch (dim)
{case 3: result.coord[2]=-coord[2];
case 2: result.coord[1]=-coord[1];
case 1: result.coord[0]=-coord[0];
case 0: ; // on fait rien
};
return result;
};
// Surcharge de l'operateur - : realise la soustraction des
// coordonnees de deux points
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee Coordonnee::operator- (const Coordonnee& c) const
{
#ifdef MISE_AU_POINT
if ( dim!=c.dim )
{
cout << "\nErreur : dimensions non egales !\n";
cout << "COORDONNEE::OPERATOR- (Coordonnee ) \n";
Sortie(1);
};
#endif
Coordonnee result(dim);
switch (dim)
{case 3: result.coord[2]=coord[2]-c.coord[2];
case 2: result.coord[1]=coord[1]-c.coord[1];
case 1: result.coord[0]=coord[0]-c.coord[0];
case 0: ; // on fait rien
};
return result;
};
// Surcharge de l'operateur + : realise l'addition des
// coordonnees de deux points
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee Coordonnee::operator+ (const Coordonnee& c) const
{
#ifdef MISE_AU_POINT
if ( dim!=c.dim )
{ cout << "\nErreur : dimensions non egales !\n";
cout << "COORDONNEE::OPERATOR+ (Coordonnee ) \n";
Sortie(1);
};
#endif
Coordonnee result(dim);
switch (dim)
{case 3: result.coord[2]=coord[2]+c.coord[2];
case 2: result.coord[1]=coord[1]+c.coord[1];
case 1: result.coord[0]=coord[0]+c.coord[0];
case 0: ; // on fait rien
};
return result;
};
// Surcharge de l'operateur +=
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::operator+= (const Coordonnee& c)
{
#ifdef MISE_AU_POINT
if ( dim!=c.dim )
{ cout << "\nErreur : dimensions non egales !\n";
cout << "COORDONNEE::OPERATOR+= (Coordonnee ) \n";
Sortie(1);
};
#endif
switch (dim)
{case 3: coord[2]+=c.coord[2];
case 2: coord[1]+=c.coord[1];
case 1: coord[0]+=c.coord[0];
case 0: ; // on fait rien
};
};
// Surcharge de l'operateur -=
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::operator-= (const Coordonnee& c)
{
#ifdef MISE_AU_POINT
if ( dim!=c.dim )
{ cout << "\nErreur : dimensions non egales !\n";
cout << "COORDONNEE::OPERATOR-= (Coordonnee ) \n";
Sortie(1);
};
#endif
switch (dim)
{case 3: coord[2]-=c.coord[2];
case 2: coord[1]-=c.coord[1];
case 1: coord[0]-=c.coord[0];
case 0: ; // on fait rien
};
};
// Surcharge de l'operateur *=
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::operator*= (double val)
{ switch (dim)
{case 3: coord[2]*=val;
case 2: coord[1]*=val;
case 1: coord[0]*=val;
case 0: ; // on fait rien
};
};
// Surcharge de l'operateur * : multiplication de coordonnees par un scalaire
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee Coordonnee::operator* (double val) const
{ Coordonnee result(dim);
switch (dim)
{case 3: result.coord[2]=val*coord[2];
case 2: result.coord[1]=val*coord[1];
case 1: result.coord[0]=val*coord[0];
case 0: ; // on fait rien
};
return result;
};
// Surcharge de l'operateur * : produit scalaire entre coordonnees
#ifndef MISE_AU_POINT
inline
#endif
double Coordonnee::operator* (const Coordonnee& c) const
{ double res=0.0;
switch (dim)
{case 3: res += coord[2] * c.coord[2];
case 2: res += coord[1] * c.coord[1];
case 1: res += coord[0] * c.coord[0];
case 0: ; // on fait rien
};
return res;
};
// Surcharge de l'operateur / : division de coordonnees par un scalaire
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee Coordonnee::operator/ (double val) const
{
#ifdef MISE_AU_POINT
if(Dabs(val) <= ConstMath::trespetit)
{ cout << "\n erreur, division par zero ";
cout << "\nCoordonnee::operator/ (double val) " << endl;
Sortie (1);
}
#endif
Coordonnee result(dim);
switch (dim)
{case 3: result.coord[2]=coord[2] / val;
case 2: result.coord[1]=coord[1] / val;
case 1: result.coord[0]=coord[0] / val;
case 0: ; // on fait rien
};
return result;
};
// Surcharge de l'operateur /= : division de coordonnees par un scalaire
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::operator/= (double val)
{
#ifdef MISE_AU_POINT
if(Dabs(val) <= ConstMath::trespetit)
{ cout << "\n erreur, division par zero ";
cout << "\nCoordonnee::operator/= (double val) " << endl;
Sortie (1);
}
#endif
switch (dim)
{case 3: coord[2]/=val;
case 2: coord[1]/=val;
case 1: coord[0]/=val;
case 0: ; // on fait rien
};
};
// Surcharge de l'operateur == : test d'egalite
// Renvoie 1 si les deux positions sont identiques
// Renvoie 0 sinon
#ifndef MISE_AU_POINT
inline
#endif
int Coordonnee::operator== (const Coordonnee& c) const
{ if ( c.dim!=dim )
return 0;
else
{ for (int i=0;i<dim;i++)
{ if ( c.coord[i]!=coord[i] )
return 0;
};
return 1;
};
};
// Surcharge de l'operateur !=
// Renvoie 1 si les deux positions ne sont pas identiques
// Renvoie 0 sinon
#ifndef MISE_AU_POINT
inline
#endif
int Coordonnee::operator!= (const Coordonnee& c) const
{ if ( (*this)==c )
return 0;
else
return 1;
};
// Affiche les coordonnees du point à l'écran entre accolades
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Affiche () const
{ cout << "\t{ ";
switch (dim)
{case 0: break; // on fait rien
case 1: cout << coord[0] << " "; break;
case 2: cout << coord[0] << " "<< coord[1] << " " ;break;
case 3: cout << coord[0] << " "<< coord[1] << " "<< coord[2] << " " ;break;
};
cout << "}\n";
};
// Affiche les coordonnees du point dans sort entre accolades
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Affiche (ostream& sort) const
{ sort << "\t{ " ;
switch (dim)
{case 0: break; // on fait rien
case 1: sort << coord[0] << " "; break;
case 2: sort << coord[0] << " "<< coord[1] << " " ;break;
case 3: sort << coord[0] << " "<< coord[1] << " "<< coord[2] << " " ;break;
};
sort << "}\n" ;
};
// Affiche les coordonnees du point dans sort sur nb digit plus un blanc
// et rien d'autre
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Affiche (ostream& sort,int nb) const
{ switch (dim)
{case 0: break; // on fait rien
case 1: sort << setprecision(nb) << coord[0] << " "; break;
case 2: sort << setprecision(nb) << coord[0] << " "
<< setprecision(nb) << coord[1] << " " ;break;
case 3: sort << setprecision(nb) << coord[0] << " "
<< setprecision(nb) << coord[1] << " "
<< setprecision(nb) << coord[2] << " " ;break;
};
};
// Affiche les coordonnees du point dans sort
// et rien d'autre (pas d'accolade)
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Affiche_1(ostream& sort) const
{ switch (dim)
{case 0: break; // on fait rien
case 1: sort << coord[0] << " "; break;
case 2: sort << coord[0] << " "<< coord[1] << " " ;break;
case 3: sort << coord[0] << " "<< coord[1] << " "<< coord[2] << " " ;break;
};
};
// mise a zero des coordonnées
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Zero()
{ switch (dim)
{case 3: coord[2]=0.;
case 2: coord[1]=0.;
case 1: coord[0]=0.;
case 0: ; // on fait rien
};
};
// surcharge de l'operateur de lecture dans la mémoire
#ifndef MISE_AU_POINT
inline
#endif
// lecture brut des coordonnées sans la dimension
void Coordonnee::Lecture (UtilLecture& entreePrinc)
{ // 4mars2014 : suppression des deux lignes qui suivent qui ne servent à rien
//int dim = Dimension (); // il n'y a jamais de dimension 0
//this->Change_dim(dim);
switch (dim)
{ case 3 : {*(entreePrinc.entree) >> coord[0] >> coord[1] >> coord[2] ; break;}
case 2 : {*(entreePrinc.entree) >> coord[0] >> coord[1] ; break;}
case 1 : {*(entreePrinc.entree) >> coord[0] ; break;}
};
};
// lecture brut des coordonnées sans la dimension dans le flux par défaut
#ifndef MISE_AU_POINT
inline
#endif
// lecture brut des coordonnées sans la dimension
void Coordonnee::Lecture ()
{ // 4mars2014 : suppression des deux lignes qui suivent qui ne servent à rien
// int dim = Dimension (); // il n'y a jamais de dimension 0
// this->Change_dim(dim);
switch (dim)
{ case 3 : {cin >> coord[0] >> coord[1] >> coord[2] ; break;}
case 2 : {cin >> coord[0] >> coord[1] ; break;}
case 1 : {cin >> coord[0] ; break;}
};
std::cin.ignore( std::numeric_limits<std::streamsize>::max(), '\n' );// purge de cin
};
// surcharge de l'operateur de lecture
#ifndef MISE_AU_POINT
inline
#endif
istream & operator >> ( istream & ent, Coordonnee & coo)
{ // lecture du type et vérification
string nomtype; ent >> nomtype;
if (nomtype != "Coordonnee")
{ cout << "\n *** erreur en lecture: on attendait le mot cle Coordonne et on a lue "
<< nomtype
<< "\n operator >> ( istream & ent, Coordonnee & coo)";
Sortie(1);
return ent;
};
// lecture de la dimension
int dim;
ent >> nomtype >> dim;
// on redimensionne éventuellement la taille
if (coo.dim != dim)
{ if (coo.memoire) // cas ou c'est un vrai point
{ if (coo.coord != NULL) { delete [] coo.coord;}
coo.coord = new double [dim];
coo.dim = dim;
}
else
{ cout << "\n erreur en lecture la dimension du point conteneur "<< dim << " est differente de celle lue "
<< dim << " et memoire est faux, donc on ne peut pas changer la dimension "
<< "\n operator >> ( istream & ent, Coordonnee & coo) " << endl ;
Sortie(2);
};
};
// les data
switch (coo.dim)
{ case 3 : {ent >> coo.coord[0] >> coo.coord[1] >> coo.coord[2] ; break;}
case 2 : {ent >> coo.coord[0] >> coo.coord[1] ; break;}
case 1 : {ent >> coo.coord[0] ; break;}
case 0 : break; // on ne fait rien
};
return ent;
};
// surcharge de l'operateur d'ecriture
#ifndef MISE_AU_POINT
inline
#endif
ostream & operator << ( ostream & sort,const Coordonnee & coo)
{ // écriture du type et de la dimension
sort << "Coordonnee dim= " << coo.dim << " ";
// les data
switch (coo.dim)
{ case 3 : {sort << setprecision(ParaGlob::NbdigdoCA()) << coo.coord[0] << " "
<< setprecision(ParaGlob::NbdigdoCA()) << coo.coord[1] << " "
<< setprecision(ParaGlob::NbdigdoCA()) << coo.coord[2] << " "; break;}
case 2 : {sort << setprecision(ParaGlob::NbdigdoCA()) << coo.coord[0] << " "
<< setprecision(ParaGlob::NbdigdoCA()) << coo.coord[1] << " "; break;}
case 1 : {sort << setprecision(ParaGlob::NbdigdoCA()) << coo.coord[0] << " "; break;}
case 0 : break; // on ne fait rien
};
return sort;
};
// Calcul de la norme euclidienne des composantes du point
#ifndef MISE_AU_POINT
inline
#endif
double Coordonnee::Norme () const
{ double norme=0.0;
switch (dim)
{case 3: norme+=coord[2] * coord[2];
case 2: norme+=coord[1] * coord[1];
case 1: norme+=coord[0] * coord[0];
case 0: ;
};
return sqrt(norme);
// norme=sqrt((double)norme); // calcul de la norme
// return norme;
};
// norme le vecteur coordonnée
#ifndef MISE_AU_POINT
inline
#endif
Coordonnee& Coordonnee::Normer ()
{ double norme = this->Norme();
#ifdef MISE_AU_POINT
if(Dabs(norme) <= ConstMath::trespetit)
{ cout << "\n erreur, division par zero ";
cout << "\nCoordonnee3::Normer () " << endl;
Sortie (1);
};
#endif
*this /= norme;
return *this ;
};
#ifndef MISE_AU_POINT
inline
#endif
// Retourne le maximum en valeur absolue des composantes
double Coordonnee::Max_val_abs () const
{ double maxi=0.;
switch (dim)
{ case 3: maxi=DabsMaX(maxi,coord[2]);
case 2: maxi=DabsMaX(maxi,coord[1]);
case 1: maxi=DabsMaX(maxi,coord[0]);
case 0: break;
};
return maxi;
};
#ifndef MISE_AU_POINT
inline
#endif
// ramène l'indice du maxi en valeur absolu
int Coordonnee::Indice_max_val_abs() const
{ double maxi=Dabs(coord[dim-1 ]);int indice=dim;
switch (dim)
{ case 3: if (maxi < Dabs(coord[2])) {maxi = Dabs(coord[2]),indice = 3;}
case 2: if (maxi < Dabs(coord[1])) {maxi = Dabs(coord[1]),indice = 2;}
case 1: if (maxi < Dabs(coord[0])) {maxi = Dabs(coord[0]),indice = 1;}
case 0: break;
};
return maxi;
};
#ifndef MISE_AU_POINT
inline
#endif
// Retourne le maximum en valeur absolue des composantes et l'indice correspondant
double Coordonnee::Max_val_abs (int& in) const
{ double maxi=0.;
in = 0;
switch (dim)
{ case 3: if (maxi < Dabs(coord[2])) {maxi=coord[2]; in=3;}
case 2: if (maxi < Dabs(coord[1])) {maxi=coord[1]; in=2;}
case 1: if (maxi < Dabs(coord[0])) {maxi=coord[0]; in=1;}
case 0: break;
};
return maxi;
};
#ifndef MISE_AU_POINT
inline
#endif
// Retourne le maximum en valeur absolue des composantes du Coordonnee
// mais ramène la grandeur signée (avec son signe)
double Coordonnee::Max_val_abs_signe () const
{ double maxi=0.;
int in = 0;
switch (dim)
{ case 3: if (maxi < Dabs(coord[2])) {maxi=coord[2]; in=3;}
case 2: if (maxi < Dabs(coord[1])) {maxi=coord[1]; in=2;}
case 1: if (maxi < Dabs(coord[0])) {maxi=coord[0]; in=1;}
case 0: break;
};
if (in != 0) {return coord[in-1];}
else {return maxi;};
};
#ifndef MISE_AU_POINT
inline
#endif
// Retourne le maximum en valeur absolue des composantes du Coordonnee
// mais ramène la grandeur signée (avec son signe) et l'indice
double Coordonnee::Max_val_abs_signe (int& in) const
{ double maxi=0.;
in = 0;
switch (dim)
{ case 3: if (maxi < Dabs(coord[2])) {maxi=coord[2]; in=3;}
case 2: if (maxi < Dabs(coord[1])) {maxi=coord[1]; in=2;}
case 1: if (maxi < Dabs(coord[0])) {maxi=coord[0]; in=1;}
case 0: break;
};
if (in != 0) {return coord[in-1];}
else {return maxi;};
};
#ifndef MISE_AU_POINT
inline
#endif
// modifie éventuellement les coordonnées de this pour quelles soient supérieures ou égales
// aux coordonnées en paramètre
void Coordonnee::Modif_en_max(const Coordonnee& v)
{
#ifdef MISE_AU_POINT
if ( dim!=v.dim )
{ cout << "\nErreur : dimensions non egales !\n";
cout << " Coordonnee::Modif_en_max(const Coordonnee& v) \n";
Sortie(1);
};
#endif
switch (dim)
{ case 3: if (coord[2] < v.coord[2]) coord[2]=v.coord[2];
case 2: if (coord[1] < v.coord[1]) coord[1]=v.coord[1];
case 1: if (coord[0] < v.coord[0]) coord[0]=v.coord[0];
case 0: break;
};
};
#ifndef MISE_AU_POINT
inline
#endif
// modifie éventuellement les coordonnées de this pour quelles soient inférieures ou égales
// aux coordonnées en paramètre
void Coordonnee::Modif_en_min(const Coordonnee& v)
{
#ifdef MISE_AU_POINT
if ( dim!=v.dim )
{ cout << "\nErreur : dimensions non egales !\n";
cout << " Coordonnee::Modif_en_min(const Coordonnee& v) \n";
Sortie(1);
};
#endif
switch (dim)
{ case 3: if (coord[2] > v.coord[2]) coord[2]=v.coord[2];
case 2: if (coord[1] > v.coord[1]) coord[1]=v.coord[1];
case 1: if (coord[0] > v.coord[0]) coord[0]=v.coord[0];
case 0: break;
};
};
#ifndef MISE_AU_POINT
inline
#endif
// ajoute une même valeur à tous les coordonnées
void Coordonnee::Ajout_meme_valeur(double val)
{ switch (dim)
{case 3: coord[2] += val;
case 2: coord[1] += val;
case 1: coord[0] += val;
case 0: ;
};
};
#ifndef MISE_AU_POINT
inline
#endif
// sortie du schemaXML: en fonction de enu
void Coordonnee::SchemaXML_Coordonnee(ostream& sort,const Enum_IO_XML enu)
{
switch (enu)
{ case XML_TYPE_GLOBAUX :
{sort << "\n <!-- *************************** Coordonnee *************************** -->"
<< "\n<xs:complexType name=\"COORDONNEE\" >"
<< "\n <xs:annotation>"
<< "\n <xs:documentation> coordonnee de dimension 1 ou 2 ou 3: elements: "
<< "\n un entier (dim) donnant la dimension, et dim reels "
<< "\n </xs:documentation>"
<< "\n </xs:annotation>"
<< "\n <xs:sequence>"
<< "\n <xs:element name=\"dimension\" type=\"xs:double\" />"
<< "\n <xs:element name=\"coordonnees\" >"
<< "\n <xs:simpleType>"
<< "\n <xs:restriction base=\"liste_de_reels\">"
<< "\n <xs:minLength value=\"1\" />"
<< "\n <xs:maxLength value=\"3\" />"
<< "\n </xs:restriction>"
<< "\n </xs:simpleType>"
<< "\n </xs:element>"
<< "\n </xs:sequence>"
<< "\n</xs:complexType>";
break;
}
case XML_IO_POINT_INFO :
{
break;
}
case XML_IO_POINT_BI :
{
break;
}
case XML_IO_ELEMENT_FINI :
{
break;
}
2023-05-03 17:23:49 +02:00
default: sort << "\n SchemaXML: cas non pris en compte " ;
};
};
// définit des coordonnées sans variance à la même place que des coordonnées avec variances
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Meme_place(CoordonneeB& vB)
{ // on regarde s'il faut faire quelque chose pour optimiser
if (coord != vB.coord)
{ // on commence par libérer la place
Libere();
// création en fonction de la dimension
dim = vB.dim;
switch (dim)
{ case 0: memoire = true; break; // on met à true, car de toute manière il n'y a pas de mémoire
default:
{ memoire = false; coord = vB.coord;}
};
};
};
// définit des coordonnées sans variance à la même place que des coordonnées avec variances
#ifndef MISE_AU_POINT
inline
#endif
void Coordonnee::Meme_place(CoordonneeH& vH)
{ // on regarde s'il faut faire quelque chose pour optimiser
if (coord != vH.coord)
{ // on commence par libérer la place
Libere();
// création en fonction de la dimension
dim = vH.dim;
switch (dim)
{ case 0: memoire = true; break; // on met à true, car de toute manière il n'y a pas de mémoire
default:
{ memoire = false; coord = vH.coord;}
};
};
};
#endif