ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/magic/lib/mailleur_auto/src/mailleur2d.cpp
Revision: 663
Committed: Fri Apr 10 20:13:11 2015 UTC (10 years, 1 month ago) by francois
File size: 65838 byte(s)
Log Message:
resolution de bug de desallocation + resolution du mailleur bloc avec optimisateur de coin active

File Contents

# User Rev Content
1 5 //------------------------------------------------------------
2     //------------------------------------------------------------
3     // MAGiC
4 francois 155 // Jean Christophe Cuilli�re et Vincent FRANCOIS
5     // D�partement de G�nie M�canique - UQTR
6 5 //------------------------------------------------------------
7 francois 155 // Le projet MAGIC est un projet de recherche du d�partement
8     // de g�nie m�canique de l'Universit� du Qu�bec �
9     // Trois Rivi�res
10     // Les librairies ne peuvent �tre utilis�es sans l'accord
11 5 // des auteurs (contact : francois@uqtr.ca)
12     //------------------------------------------------------------
13     //------------------------------------------------------------
14     //
15     // mailleur2d.cpp
16     //
17     //------------------------------------------------------------
18     //------------------------------------------------------------
19     // COPYRIGHT 2000
20 francois 155 // Version du 02/03/2006 � 11H23
21 5 //------------------------------------------------------------
22     //------------------------------------------------------------
23    
24    
25     #include "gestionversion.h"
26     #include "mailleur2d.h"
27     #include "m3d_triangle.h"
28     #include "ot_mathematique.h"
29     #include "mg_gestionnaire.h"
30     //#include "message.h"
31     //#include "affiche.h"
32     #include <fstream>
33     #include <math.h>
34 francois 447 #include "mailleur2d_optimisation.h"
35 5
36    
37 francois 315
38 francois 494 MAILLEUR2D::MAILLEUR2D(MG_MAILLAGE* mgmai,MG_GEOMETRIE *mggeo,FCT_TAILLE* fct_taille,MG_FACE* mgface):MAILLEUR(false),mg_maillage(mgmai),mg_geometrie(mggeo),mg_face(mgface),metrique(fct_taille),niveau_optimisation(2)
39 5 {
40     }
41    
42    
43    
44     MAILLEUR2D::~MAILLEUR2D()
45     {
46     }
47    
48    
49    
50    
51 francois 210 void MAILLEUR2D::maille(MG_GROUPE_TOPOLOGIQUE* mggt)
52 5 {
53     if (mg_face!=NULL) maille(mg_face);
54     else
55     {
56 francois 210 TPL_MAP_ENTITE<MG_ELEMENT_TOPOLOGIQUE*> lst;
57     if (mggt!=NULL)
58     {
59     int nb=mggt->get_nb();
60     for (int i=0;i<nb;i++)
61     {
62     lst.ajouter(mggt->get(i));
63     mggt->get(i)->get_topologie_sousjacente(&lst);
64     }
65     }
66 5 int nb_face=mg_geometrie->get_nb_mg_face();
67     for (int i=0;i<nb_face;i++)
68     {
69     MG_FACE* mgface=mg_geometrie->get_mg_face(i);
70 francois 210 if (mggt!=NULL)
71     if (lst.existe(mgface)==0) continue;
72 5 maille(mgface);
73     }
74     }
75     }
76    
77    
78     void MAILLEUR2D::maille(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_SEGMENT*> *lstseg,TPL_LISTE_ENTITE<MG_TRIANGLE*> *lsttri)
79     {
80     periode_u=mgface->get_surface()->get_periode_u();
81     periode_v=mgface->get_surface()->get_periode_v();
82     decalage=new OT_DECALAGE_PARAMETRE(periode_u,periode_v);
83     //afficheur << MAILLAGEFACE << mgface->get_id() << endaff;
84     initialise_frontiere(mgface);
85 francois 632 cree_ntree(mgface);
86 5 initialise_front(mgface);
87     if (lstseg!=NULL) insere_contrainte_segment(mgface,lstseg);
88     if (lsttri!=NULL) insere_contrainte_triangle(mgface,lsttri);
89     progresse_front(mgface);
90 francois 645 int verif=param.get_valeur("Verification_coin_face_mailleur2D");
91     if (verif==1)
92     verifie_coin_sommet(mgface);
93 francois 447 MAILLEUR2D_OPTIMISATION opt(mg_maillage,niveau_optimisation);
94     opt.optimise(mgface);
95 francois 632 delete ntree_de_segment;
96     //delete quadtree_de_frontiere;
97     delete ntree_de_front;
98 5 delete decalage;
99     segment_frontiere.vide();
100     noeud_frontiere.vide();
101     //ofstream o3("test_2D.mai",ios::out|ios::trunc);
102     //o3.precision(16);
103     //o3.setf(ios::showpoint);
104     //mg_maillage->enregistrer_sous_mesh_2D(o3);
105     }
106    
107    
108 francois 645 void MAILLEUR2D::verifie_coin_sommet(MG_FACE* mgface)
109     {
110     TPL_MAP_ENTITE<MG_SOMMET*> lstsom;
111     int nbboucle=mgface->get_nb_mg_boucle();
112     for (int i=0;i<nbboucle;i++)
113     {
114     MG_BOUCLE *bou=mgface->get_mg_boucle(i);
115     int nbare=bou->get_nb_mg_coarete();
116     for (int j=0;j<nbare;j++)
117     {
118     lstsom.ajouter(bou->get_mg_coarete(j)->get_arete()->get_cosommet1()->get_sommet());
119     lstsom.ajouter(bou->get_mg_coarete(j)->get_arete()->get_cosommet2()->get_sommet());
120     }
121     }
122     TPL_MAP_ENTITE<MG_SOMMET*>::ITERATEUR it;
123     for (MG_SOMMET* som=lstsom.get_premier(it);som!=NULL;som=lstsom.get_suivant(it))
124     {
125     MG_NOEUD* no;
126     int i=0;
127     do
128     {
129     no=(MG_NOEUD*)som->get_lien_maillage()->get(i);
130     i++;
131     }
132     while (mg_maillage->get_mg_noeudid(no->get_id())!=no);
133     int nbtri=no->get_lien_triangle()->get_nb();
134     int nbtrivoisin=0;
135     MG_TRIANGLE* trivoi;
136     for (int i=0;i<nbtri;i++)
137     {
138     MG_TRIANGLE* tri=no->get_lien_triangle()->get(i);
139     if (mg_maillage->get_mg_triangleid(tri->get_id())!=tri) continue;
140     if (tri->get_lien_topologie()==mgface)
141     nbtrivoisin++;
142     trivoi=tri;
143     }
144 francois 663 if ((nbtrivoisin==1) && (trivoi->get_origine()==MAILLEUR_AUTO))
145 francois 645 {
146     MG_NOEUD *no1,*no2;
147     if (no==trivoi->get_noeud1()) {no1=trivoi->get_noeud2();no2=trivoi->get_noeud3();}
148     if (no==trivoi->get_noeud2()) {no1=trivoi->get_noeud3();no2=trivoi->get_noeud1();}
149     if (no==trivoi->get_noeud3()) {no1=trivoi->get_noeud1();no2=trivoi->get_noeud2();}
150     MG_TRIANGLE* autretri=NULL;
151     for (int i=0;i<no1->get_lien_triangle()->get_nb();i++)
152     for (int j=0;j<no2->get_lien_triangle()->get_nb();j++)
153     {
154     MG_TRIANGLE* tri1=no1->get_lien_triangle()->get(i);
155     MG_TRIANGLE* tri2=no2->get_lien_triangle()->get(j);
156     if (tri1==tri2)
157     if (tri1!=trivoi) autretri=tri1;
158     }
159     if (autretri!=NULL)
160     {
161     MG_NOEUD* autrenoeud;
162     if ((autretri->get_noeud1()!=no1) && (autretri->get_noeud1()!=no2)) autrenoeud=autretri->get_noeud1();
163     if ((autretri->get_noeud2()!=no1) && (autretri->get_noeud2()!=no2)) autrenoeud=autretri->get_noeud2();
164     if ((autretri->get_noeud3()!=no1) && (autretri->get_noeud3()!=no2)) autrenoeud=autretri->get_noeud3();
165     if (triangle_est_dans_bon_sens(mgface,no,no1,autrenoeud)==1) insere_triangle(mgface,no,no1,autrenoeud);
166     else insere_triangle(mgface,no,autrenoeud,no1);
167     if (triangle_est_dans_bon_sens(mgface,no,no2,autrenoeud)==1) insere_triangle(mgface,no,no2,autrenoeud);
168     else insere_triangle(mgface,no,autrenoeud,no2);
169     mg_maillage->supprimer_mg_triangleid(trivoi->get_id());
170     mg_maillage->supprimer_mg_triangleid(autretri->get_id());
171     }
172     }
173    
174     }
175 5
176 francois 645 }
177 5
178    
179     void MAILLEUR2D::initialise_frontiere(MG_FACE* mgface)
180     {
181 francois 632 umin=1e308;vmin=1e-308;
182     umax=-1e308;vmax=-1e-308;
183 5 int nb_boucle=mgface->get_nb_mg_boucle();
184     for (int i=0;i<nb_boucle;i++)
185     {
186     MG_BOUCLE* mgboucle=mgface->get_mg_boucle(i);
187     int nb_coarete=mgboucle->get_nb_mg_coarete();
188     for (int j=0;j<nb_coarete;j++)
189     {
190     MG_COARETE* coarete=mgboucle->get_mg_coarete(j);
191     MG_ARETE* mgarete=coarete->get_arete();
192     int nb_segment=mgarete->get_lien_maillage()->get_nb();
193     for (int k=0;k<nb_segment;k++)
194     {
195     refresh();
196     MG_SEGMENT* mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get(k);
197     MG_SEGMENT* mgsegtemp=mg_maillage->get_mg_segmentid(mgsegment->get_id());
198     if (mgsegtemp==NULL) continue;
199     MG_NOEUD* mgnoeud=mgsegment->get_noeud1();
200     segment_frontiere.ajouter(mgsegment);
201 francois 61 if (!noeud_frontiere.est_dans_la_liste(mgnoeud))
202     {
203     double uv[2];
204     double *coo=mgnoeud->get_coord();
205     mgface->inverser(uv,coo,1e-4);
206     if (mgface->get_surface()->est_periodique_u()==1)
207     {
208 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_u();
209     if (uv[0]<-eps) uv[0]=uv[0]+mgface->get_surface()->get_periode_u();
210     if (uv[0]>=mgface->get_surface()->get_periode_u()-eps) uv[0]=uv[0]-mgface->get_surface()->get_periode_u();
211 francois 61 }
212     if (mgface->get_surface()->est_periodique_v()==1)
213     {
214 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_v();
215     if (uv[1]<-eps) uv[1]=uv[1]+mgface->get_surface()->get_periode_v();
216     if (uv[1]>=mgface->get_surface()->get_periode_v()-eps) uv[1]=uv[1]-mgface->get_surface()->get_periode_v();
217 francois 61 }
218 francois 632 if (uv[0]<umin) umin=uv[0];
219     if (uv[1]<vmin) vmin=uv[1];
220     if (uv[0]>umax) umax=uv[0];
221     if (uv[1]>vmax) vmax=uv[1];
222 francois 61 mgnoeud->change_u(uv[0]);
223     mgnoeud->change_v(uv[1]);
224     noeud_frontiere.ajouter(mgnoeud);
225     }
226 5 mgnoeud=mgsegment->get_noeud2();
227 francois 61 if (!noeud_frontiere.est_dans_la_liste(mgnoeud))
228 5 {
229     double uv[2];
230     double *coo=mgnoeud->get_coord();
231     mgface->inverser(uv,coo,1e-4);
232     if (mgface->get_surface()->est_periodique_u()==1)
233     {
234 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_u();
235     if (uv[0]<-eps) uv[0]=uv[0]+mgface->get_surface()->get_periode_u();
236     if (uv[0]>=mgface->get_surface()->get_periode_u()-eps) uv[0]=uv[0]-mgface->get_surface()->get_periode_u();
237 5 }
238     if (mgface->get_surface()->est_periodique_v()==1)
239     {
240 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_v();
241     if (uv[1]<-eps) uv[1]=uv[1]+mgface->get_surface()->get_periode_v();
242     if (uv[1]>=mgface->get_surface()->get_periode_v()-eps) uv[1]=uv[1]-mgface->get_surface()->get_periode_v();
243 5 }
244 francois 632 if (uv[0]<umin) umin=uv[0];
245     if (uv[1]<vmin) vmin=uv[1];
246     if (uv[0]>umax) umax=uv[0];
247     if (uv[1]>vmax) vmax=uv[1];
248 5 mgnoeud->change_u(uv[0]);
249     mgnoeud->change_v(uv[1]);
250     noeud_frontiere.ajouter(mgnoeud);
251     }
252     }
253    
254     }
255     }
256    
257     }
258    
259 francois 632 void MAILLEUR2D::cree_ntree(MG_FACE* mgface)
260 5 {
261     int nb_noeud=noeud_frontiere.get_nb();
262 francois 632 int nb_echan=(int)param.get_valeur((char*)"Echantillon_face");
263     BOITE_3D boiteface=mgface->get_boite_3D(nb_echan);
264     boiteface.change_grosseur(1.1);
265     BOITE_3D boitemetrique=metrique->get_boite_3D();
266     BOITE_3D boite=boiteface&boitemetrique;
267     boite=boitemetrique;
268     double xmin=boite.get_xmin();
269     double ymin=boite.get_ymin();
270     double zmin=boite.get_zmin();
271     double xmax=boite.get_xmax();
272     double ymax=boite.get_ymax();
273     double zmax=boite.get_zmax();
274     ntree_de_segment=new TPL_NTREE_FCT<MG_SEGMENT*,FCT_TAILLE>;
275     ntree_de_front=new TPL_OCTREE<MG_FRONT_2D*,MG_NOEUD*>;
276     ntree_de_segment->initialiser(*metrique,xmin,ymin,zmin,xmax,ymax,zmax);
277     ntree_de_front->initialiser(ntree_de_segment);
278 5 int nb_segment=segment_frontiere.get_nb();
279     for (int j=0;j<nb_segment;j++)
280     {
281 francois 632 MG_SEGMENT* seg=segment_frontiere.get(j);
282     ntree_de_segment->inserer(segment_frontiere.get(j));
283 5 }
284     }
285    
286    
287     void MAILLEUR2D::initialise_front(MG_FACE* mgface)
288     {
289     MG_FRONT_2D::initialise_compteur_id();
290     int nb_boucle=mgface->get_nb_mg_boucle();
291     for (int iboucle=0;iboucle<nb_boucle;iboucle++)
292     {
293     unsigned int nb_front_avant_cette_boucle=get_nb_front(front_courant);
294     MG_BOUCLE* mgboucle=mgface->get_mg_boucle(iboucle);
295     unsigned int nbcoaretetotale=mgboucle->get_nb_mg_coarete();
296     MG_COARETE* mgcoarete=mgboucle->get_mg_coarete(0);
297     MG_NOEUD* noeud_de_depart;
298     int bon_noeud=0;
299     int numnoeud=0;
300     while (bon_noeud==0)
301     {
302     if (mgcoarete->get_orientation()==MEME_SENS) noeud_de_depart=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet1()->get_sommet()->get_lien_maillage()->get(numnoeud);
303     else noeud_de_depart=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet2()->get_sommet()->get_lien_maillage()->get(numnoeud);
304     MG_NOEUD* noeudtemp=mg_maillage->get_mg_noeudid(noeud_de_depart->get_id());
305     if (noeudtemp==NULL) numnoeud++; else bon_noeud=1;
306     }
307     MG_FRONT_2D* premier_front;
308     MG_NOEUD* noeud_courant=noeud_de_depart;
309     MG_SEGMENT* segment_courant=NULL;
310     MG_FRONT_2D* front_precedent=NULL;
311     unsigned int nbcoaretetraite=0;
312     do
313     {
314     nbcoaretetraite++;
315     MG_NOEUD* noeud_d_arrivee;
316     int bon_noeud=0;
317     int numnoeud=0;
318     while (bon_noeud==0)
319     {
320     if (mgcoarete->get_orientation()==MEME_SENS) noeud_d_arrivee=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet2()->get_sommet()->get_lien_maillage()->get(numnoeud);
321     else noeud_d_arrivee=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet1()->get_sommet()->get_lien_maillage()->get(numnoeud);
322     MG_NOEUD* noeudtemp=mg_maillage->get_mg_noeudid(noeud_d_arrivee->get_id());
323     if (noeudtemp==NULL) numnoeud++; else bon_noeud=1;
324     }
325     MG_ARETE* mgarete=mgcoarete->get_arete();
326     int passe_aretefermee=0;
327     do
328     {
329     int trouve=0;
330     int i;
331     if ((mgcoarete->get_arete()->get_cosommet1()->get_sommet()==mgcoarete->get_arete()->get_cosommet2()->get_sommet())&&(passe_aretefermee==0))
332     {
333     passe_aretefermee=1;
334     MG_SEGMENT* mgsegment_depart1=NULL;
335     MG_SEGMENT* mgsegment_depart2=NULL;
336     TPL_SET<MG_ELEMENT_MAILLAGE*>::ITERATEUR it;
337     MG_SEGMENT* mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_premier(it);
338     do
339     {
340     if ((mgsegment->get_noeud1()==noeud_courant) || (mgsegment->get_noeud2()==noeud_courant)) mgsegment_depart1=mgsegment;
341     mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_suivant(it);
342     }
343     while (mgsegment_depart1==NULL);
344     do
345     {
346     if ((mgsegment->get_noeud1()==noeud_courant) || (mgsegment->get_noeud2()==noeud_courant)) mgsegment_depart2=mgsegment;
347     mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_suivant(it);
348     }
349     while (mgsegment_depart2==NULL);
350     MG_NOEUD* noeud1_2;
351     MG_NOEUD* noeud2_2;
352     if (mgsegment_depart1->get_noeud1()==noeud_courant) noeud1_2=mgsegment_depart1->get_noeud2(); else noeud1_2=mgsegment_depart1->get_noeud1();
353     if (mgsegment_depart2->get_noeud1()==noeud_courant) noeud2_2=mgsegment_depart2->get_noeud2(); else noeud2_2=mgsegment_depart2->get_noeud1();
354     OT_VECTEUR_3D vecteur1(noeud1_2->get_x()-noeud_courant->get_x(),noeud1_2->get_y()-noeud_courant->get_y(),noeud1_2->get_z()-noeud_courant->get_z());
355     double coo[3];
356     mgarete->deriver(mgarete->get_tmin(),coo);
357     OT_VECTEUR_3D tangeante(coo[0]*mgcoarete->get_orientation(),coo[1]*mgcoarete->get_orientation(),coo[2]*mgcoarete->get_orientation());
358     MG_NOEUD* noeud_suivant;
359     if (vecteur1*tangeante>0.)
360     {
361     mgsegment=mgsegment_depart1;
362     noeud_suivant=noeud1_2;
363     }
364     else
365     {
366     mgsegment=mgsegment_depart2;
367     noeud_suivant=noeud2_2;
368     }
369     MG_FRONT_2D* front=ajouter_front(front_courant,noeud_courant,noeud_suivant,mgsegment);
370 francois 632 ntree_de_segment->inserer(mgsegment);
371 5 if (get_nb_front(front_courant)==nb_front_avant_cette_boucle+1) premier_front=front;
372     front->changer_front_precedent(front_precedent);
373     front_precedent=front;
374     noeud_courant=noeud_suivant;
375     segment_courant=mgsegment;
376     }
377     else
378     {
379     trouve=0;
380     TPL_SET<MG_ELEMENT_MAILLAGE*>::ITERATEUR it;
381     MG_SEGMENT* mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_premier(it);
382     do
383     {
384     if ((mgsegment->get_noeud1()==noeud_courant) || (mgsegment->get_noeud2()==noeud_courant))
385     if (mgsegment!=segment_courant)
386     {
387     trouve=1;
388     MG_NOEUD* noeud_suivant;
389     if (mgsegment->get_noeud1()==noeud_courant) noeud_suivant=mgsegment->get_noeud2();
390     else if (mgsegment->get_noeud2()==noeud_courant) noeud_suivant=mgsegment->get_noeud1();
391     MG_FRONT_2D* front=ajouter_front(front_courant,noeud_courant,noeud_suivant,mgsegment);
392 francois 632 ntree_de_segment->inserer(mgsegment);
393 5 if (get_nb_front(front_courant)==nb_front_avant_cette_boucle+1) premier_front=front;
394     else front_precedent->changer_front_suivant(front);
395     front->changer_front_precedent(front_precedent);
396     front_precedent=front;
397     noeud_courant=noeud_suivant;
398     segment_courant=mgsegment;
399     }
400     mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_suivant(it);
401     }
402     while (trouve==0);
403     }
404     }
405     while (noeud_courant!=noeud_d_arrivee);
406     int trouve=0;
407     MG_SOMMET* mgsommet;
408     if (mgcoarete->get_orientation()==MEME_SENS) mgsommet=mgcoarete->get_arete()->get_cosommet2()->get_sommet();
409     else mgsommet=mgcoarete->get_arete()->get_cosommet1()->get_sommet();
410     double xyz[3];
411     mgsommet->get_point()->evaluer(xyz);
412     int nbcoaretesuivante=mgboucle->get_nb_mg_coarete();
413     MG_COARETE* mgcoaretetmp=NULL;
414     double angleref=0.;
415     double angleref2=0.;
416     for (int i=0;i<nbcoaretesuivante;i++)
417     {
418     MG_COARETE* mgcoarete_suivante=mgboucle->get_mg_coarete(i);
419     MG_SOMMET* mgsommet_suivant;
420     if (mgcoarete_suivante->get_orientation()==MEME_SENS) mgsommet_suivant=mgcoarete_suivante->get_arete()->get_cosommet1()->get_sommet();
421     else mgsommet_suivant=mgcoarete_suivante->get_arete()->get_cosommet2()->get_sommet();
422     if (mgsommet==mgsommet_suivant)
423     {
424     if (trouve==0)
425     {
426     trouve=1;
427     mgcoaretetmp=mgcoarete_suivante;
428     }
429     else
430     {
431     //angleref
432     double uv[2];
433     mgface->inverser(uv,xyz);
434     double normal[3];
435     mgface->calcul_normale_unitaire(uv,normal);
436     double dir1[3];
437     double dir2[3];
438     MG_COSOMMET* mgcosommet;
439     if (mgcoarete->get_orientation()==MEME_SENS) mgcosommet=mgcoarete->get_arete()->get_cosommet2();
440     else mgcosommet=mgcoarete->get_arete()->get_cosommet1();
441     mgcoarete->get_arete()->deriver(mgcosommet->get_t(),dir1);
442     if (mgcoaretetmp->get_orientation()==MEME_SENS) mgcosommet=mgcoaretetmp->get_arete()->get_cosommet1();
443     else mgcosommet=mgcoaretetmp->get_arete()->get_cosommet2();
444     mgcoaretetmp->get_arete()->deriver(mgcosommet->get_t(),dir2);
445     int sens1=mgcoarete->get_orientation();
446     int sens2=mgcoaretetmp->get_orientation();
447     OT_VECTEUR_3D vec1(-dir1[0]*sens1,-dir1[1]*sens1,-dir1[2]*sens1);
448     OT_VECTEUR_3D vec2(dir2[0]*sens2,dir2[1]*sens2,dir2[2]*sens2);
449     vec1.norme();
450     vec2.norme();
451     OT_VECTEUR_3D nor=normal&vec1;
452     double cs=vec1*vec2;
453     double sn=-1*(vec2*nor);
454     angleref=acos(cs);
455     if (sn<0) angleref=-angleref;
456     if (angleref<0) angleref=angleref+2.*M_PI;
457     if (mgcoarete->get_arete()==mgcoaretetmp->get_arete()) angleref=2*M_PI;
458     if (angleref<1e-10)
459     {
460     double dt=1e-3*(mgcoaretetmp->get_arete()->get_tmax()-mgcoaretetmp->get_arete()->get_tmax());
461     mgcoaretetmp->get_arete()->deriver(mgcosommet->get_t()+dt,dir2);
462     OT_VECTEUR_3D vec2(dir2[0]*sens2,dir2[1]*sens2,dir2[2]*sens2);
463     vec2.norme();
464     double cs=vec1*vec2;
465     double sn=-1*(vec2*nor);
466     angleref=acos(cs);
467     if (sn<0) angleref2=-angleref2;
468     if (angleref<0) angleref2=angleref2+2.*M_PI;
469     }
470     //angle
471     if (mgcoarete->get_orientation()==MEME_SENS) mgcosommet=mgcoarete->get_arete()->get_cosommet2();
472     else mgcosommet=mgcoarete->get_arete()->get_cosommet1();
473     mgcoarete->get_arete()->deriver(mgcosommet->get_t(),dir1);
474     if (mgcoarete_suivante->get_orientation()==MEME_SENS) mgcosommet=mgcoarete_suivante->get_arete()->get_cosommet1();
475     else mgcosommet=mgcoarete_suivante->get_arete()->get_cosommet2();
476     mgcoarete_suivante->get_arete()->deriver(mgcosommet->get_t(),dir2);
477     sens1=mgcoarete->get_orientation();
478     sens2=mgcoarete_suivante->get_orientation();
479     vec1.change_x(-dir1[0]*sens1);
480     vec1.change_y(-dir1[1]*sens1);
481     vec1.change_z(-dir1[2]*sens1);
482     vec2.change_x(dir2[0]*sens2);
483     vec2.change_y(dir2[1]*sens2);
484     vec2.change_z(dir2[2]*sens2);
485     vec1.norme();
486     vec2.norme();
487     nor=normal&vec1;
488     cs=vec1*vec2;
489     sn=-1*(vec2*nor);
490     double angle=acos(cs);
491     if (sn<0) angle=-angle;
492     if (angle<0) angle=angle+2.*M_PI;
493     if (mgcoarete->get_arete()==mgcoarete_suivante->get_arete()) angle=2*M_PI;
494     if (angle<angleref)
495     {
496     angleref=angle;
497     mgcoaretetmp=mgcoarete_suivante;
498     }
499     else if ((angle<1e-10) && (angleref<1e-10))
500     {
501     double dt=1e-3*(mgcoarete_suivante->get_arete()->get_tmax()-mgcoarete_suivante->get_arete()->get_tmax());
502     mgcoarete_suivante->get_arete()->deriver(mgcosommet->get_t()+dt,dir2);
503     OT_VECTEUR_3D vec2(dir2[0]*sens2,dir2[1]*sens2,dir2[2]*sens2);
504     vec2.norme();
505     double cs=vec1*vec2;
506     double sn=-1*(vec2*nor);
507     angle=acos(cs);
508     if (sn<0) angle=-angle;
509     if (angle<0) angle=angle+2.*M_PI;
510     if (angle<angleref2)
511     mgcoaretetmp=mgcoarete_suivante;
512    
513     }
514    
515     }
516     }
517     }
518     mgcoarete=mgcoaretetmp;
519     }
520     while ((noeud_courant!=noeud_de_depart) || (nbcoaretetraite!=nbcoaretetotale));
521     front_precedent->changer_front_suivant(premier_front);
522     premier_front->changer_front_precedent(front_precedent);
523     }
524    
525     }
526    
527     void MAILLEUR2D::progresse_front(MG_FACE* mgface)
528     {
529     int compteur=0;
530     while (get_nb_front(front_courant)!=0)
531     {
532 francois 33 //ofstream o3("c:\\void_1D.mai",ios::out|ios::trunc);
533     //o3.precision(16);
534     //o3.setf(ios::showpoint);
535     //mg_maillage->enregistrer_sous_mesh_1D(o3);
536     //ofstream o4("c:\\void_2D.mai",ios::out|ios::trunc);
537     //o4.precision(16);
538     //o4.setf(ios::showpoint);
539     //mg_maillage->enregistrer_sous_mesh_2D(o4);
540 francois 35 //mg_maillage->get_gestionnaire()->enregistrer("c:\\void.magic");
541 5 compteur++;
542 francois 315 /*if (mg_maillage->get_nb_mg_triangle()+558>=1160)
543     {int i=0;
544     LISTE_MG_NOEUD::iterator it;for (MG_NOEUD* noeud=mg_maillage->get_premier_noeud(it);noeud;noeud=mg_maillage->get_suivant_noeud(it))
545     {
546     noeud->change_nouveau_numero(i+1);
547     std::cout << i+1 << " " << noeud->get_u() << " " << noeud->get_v() << std::endl; ;
548     i++;
549     }
550     mg_maillage->get_gestionnaire()->enregistrer("toto.magic");
551     }*/
552 francois 632 //mg_maillage->get_gestionnaire()->enregistrer("toto.magic");
553 5 refresh();
554     MG_FRONT_2D* ft=get_front(front_courant,0);
555     MG_FRONT_2D* ftp=ft->get_front_precedent();
556     MG_FRONT_2D* fts=ft->get_front_suivant();
557     double eps=0.0001*ft->get_segment()->get_longueur();
558     MG_NOEUD* nop=ftp->get_noeud1();
559     MG_NOEUD* no1=ft->get_noeud1();
560     MG_NOEUD* no2=ft->get_noeud2();
561     MG_NOEUD* nos=fts->get_noeud2();
562     /* angle precedent et angle suivant */
563     OT_VECTEUR_3D n1n2(no1->get_coord(),no2->get_coord());
564     OT_VECTEUR_3D n2s(no2->get_coord(),nos->get_coord());
565     OT_VECTEUR_3D pn1(nop->get_coord(),no1->get_coord());
566     n1n2.norme();
567     n2s.norme();
568     pn1.norme();
569     double coo[3];
570     double uv[2];
571     uv[0]=no1->get_u();
572     uv[1]=no1->get_v();
573     mgface->calcul_normale_unitaire(uv,coo);
574     OT_VECTEUR_3D nplan(coo);
575     OT_VECTEUR_3D n=nplan&n1n2;
576     n.norme();
577     double pcp=(-1)*(n1n2*pn1);
578     double psp=(-1)*(n*pn1);
579     int anglep;
580     if ((pcp>=0.1786481777)&&(psp>eps)) anglep=1; else anglep=0;
581     uv[0]=no2->get_u();
582     uv[1]=no2->get_v();
583     mgface->calcul_normale_unitaire(uv,coo);
584     OT_VECTEUR_3D nplan2(coo);
585     n=nplan2&n1n2;
586     n.norme();
587     double pcs=(-1.)*(n1n2*n2s);
588     double pss=n*n2s;
589     int angles;
590     if ((pcs>=0.1786481777)&&(pss>eps)) angles=1; else angles=0;
591     int type_cas_front[7];
592     if ( (ftp==fts->get_front_suivant()) && (no1!=nos) && (no2!=nop) ) type_cas_front[CAS_FRONT_3]=1; else type_cas_front[CAS_FRONT_3]=0;
593     if (ftp->get_front_precedent()==fts->get_front_suivant()) type_cas_front[CAS_FRONT_4]=1; else type_cas_front[CAS_FRONT_4]=0;
594     if ( (anglep==1) && (angles==1) ) type_cas_front[CAS_FERME_CAVITE]=1; else type_cas_front[CAS_FERME_CAVITE]=0;
595     if ( anglep==1 ) type_cas_front[CAS_FERME_CAVITE_P]=1; else type_cas_front[CAS_FERME_CAVITE_P]=0;
596     if ( angles==1 ) type_cas_front[CAS_FERME_CAVITE_S]=1; else type_cas_front[CAS_FERME_CAVITE_S]=0;
597     type_cas_front[CAS_GENERAL]=1;
598     int solution=PASTROUVE;
599     if (type_cas_front[CAS_FRONT_3]) solution=traite_front(CAS_FRONT_3,mgface,ftp,ft,fts);
600     if ((solution==PASTROUVE) && (type_cas_front[CAS_FRONT_4])) solution=traite_front(CAS_FRONT_4,mgface,ftp,ft,fts);
601     if ((solution==PASTROUVE) && (type_cas_front[CAS_FERME_CAVITE])) solution=traite_front(CAS_FERME_CAVITE,mgface,ftp,ft,fts);
602     if ((solution==PASTROUVE) && (type_cas_front[CAS_FERME_CAVITE_P])) solution=traite_front(CAS_FERME_CAVITE_P,mgface,ftp,ft,fts);
603     if ((solution==PASTROUVE) && (type_cas_front[CAS_FERME_CAVITE_S])) solution=traite_front(CAS_FERME_CAVITE_S,mgface,ftp,ft,fts);
604     if ((solution==PASTROUVE) && (type_cas_front[CAS_GENERAL]))
605     {
606     solution=traite_front(CAS_GENERAL,mgface,ftp,ft,fts);
607     if ((solution!=PASTROUVE)&&(solution!=TROUVE))
608     if (!type_cas_front[solution]) solution=traite_front(solution,mgface,ftp,ft,fts); else solution=PASTROUVE;
609     if (solution==PASTROUVE)
610     {
611     echange_de_front(front_courant,front_attente,ft);
612     ft->incremente_ifail();
613     solution=TROUVE;
614     }
615     }
616     if (get_nb_front(front_courant)==0) front_courant.swap(front_attente);
617     }
618     }
619    
620    
621    
622 francois 447
623 5 void MAILLEUR2D::insere_contrainte_segment(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_SEGMENT*> *lstseg)
624     {
625     int nbseg=lstseg->get_nb();
626     for (int i=0;i<nbseg;i++)
627     {
628     MG_SEGMENT* segori=lstseg->get(i);
629     MG_NOEUD* noeudori1=segori->get_noeud1();
630     MG_NOEUD* noeudori2=segori->get_noeud2();
631     double uv1[2];
632     double uv2[2];
633     double *coo=noeudori1->get_coord();
634     mgface->inverser(uv1,coo,1e-10);
635     if (mgface->get_surface()->est_periodique_u()==1)
636     {
637     if (uv1[0]<0.0) uv1[0]=uv1[0]+mgface->get_surface()->get_periode_u();
638     if (uv1[0]>=mgface->get_surface()->get_periode_u()) uv1[0]=uv1[0]-mgface->get_surface()->get_periode_u();
639     }
640     if (mgface->get_surface()->est_periodique_v()==1)
641     {
642     if (uv1[1]<0.0) uv1[1]=uv1[1]+mgface->get_surface()->get_periode_v();
643     if (uv1[1]>=mgface->get_surface()->get_periode_v()) uv1[1]=uv1[1]-mgface->get_surface()->get_periode_v();
644     }
645     coo=noeudori2->get_coord();
646     mgface->inverser(uv2,coo,1e-10);
647     if (mgface->get_surface()->est_periodique_u()==1)
648     {
649     if (uv2[0]<0.0) uv2[0]=uv2[0]+mgface->get_surface()->get_periode_u();
650     if (uv2[0]>=mgface->get_surface()->get_periode_u()) uv2[0]=uv2[0]-mgface->get_surface()->get_periode_u();
651     }
652     if (mgface->get_surface()->est_periodique_v()==1)
653     {
654     if (uv2[1]<0.0) uv2[1]=uv2[1]+mgface->get_surface()->get_periode_v();
655     if (uv2[1]>=mgface->get_surface()->get_periode_v()) uv2[1]=uv2[1]-mgface->get_surface()->get_periode_v();
656     }
657    
658     TPL_MAP_ENTITE<MG_FRONT_2D*> liste_trouvee;
659 francois 632 double *xyz1=noeudori1->get_coord();
660     double *xyz2=noeudori2->get_coord();
661     double xyz[3];
662     xyz[0]=0.5*(xyz1[0]+xyz2[0]);
663     xyz[1]=0.5*(xyz1[1]+xyz2[1]);
664     xyz[2]=0.5*(xyz1[2]+xyz2[2]);
665     OT_VECTEUR_3D vec(xyz1,xyz);
666     //double rayonrecherche=sqrt((u-uv1[0])*(u-uv1[0])+(v-uv1[1])*(v-uv1[1]))*1.1;
667     double rayonrecherche=vec.get_longueur()*1.1;
668     ntree_de_front->rechercher(xyz[0],xyz[1],xyz[2],rayonrecherche,liste_trouvee);
669    
670     double u=0.5*(uv1[0]+uv2[0]);
671 5 double v=0.5*(uv1[1]+uv2[1]);
672     int nb_entite=liste_trouvee.get_nb();
673     double du=decalage->calcul_decalage_parametre_u(u);
674     double dv=decalage->calcul_decalage_parametre_v(v);
675     double u1=decalage->decalage_parametre_u(uv1[0],du);
676     double v1=decalage->decalage_parametre_v(uv1[1],dv);
677     double u2=decalage->decalage_parametre_u(uv2[0],du);
678     double v2=decalage->decalage_parametre_v(uv2[1],dv);
679     MG_FRONT_2D *ref1=NULL,*ref2=NULL;
680     double angle1,angle2;
681     for(int j=0;j<nb_entite;j++)
682     {
683     MG_FRONT_2D *ft=liste_trouvee.get(j);
684     MG_NOEUD* noeudfront=ft->get_noeud2();
685     double uvfront[2];
686     uvfront[0]=noeudfront->get_u();
687     uvfront[1]=noeudfront->get_v();
688     double ufront=decalage->decalage_parametre_u(uvfront[0],du);
689     double vfront=decalage->decalage_parametre_v(uvfront[1],dv);
690     //noeud 1 du segment a inserer
691 francois 632 double *xyzfront=noeudfront->get_coord();
692     //mgface->evaluer(uvfront,xyzfront);
693     OT_VECTEUR_3D vec(xyz1,xyzfront);
694     double dist=vec.get_longueur();
695     //double dist=sqrt((ufront-u1)*(ufront-u1)+(vfront-v1)*(vfront-v1));
696 francois 61 if (dist<1e-5*rayonrecherche)
697 5 {
698     if (ref1==NULL)
699     {
700     ref1=ft;
701     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
702     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
703     double uvfrontautre[2];
704     uvfrontautre[0]=noeudfrontautre->get_u();
705     uvfrontautre[1]=noeudfrontautre->get_v();
706     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
707     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
708     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
709     vecteur_baseu.norme();
710     vecteur_front.norme();
711     double cosangle=vecteur_baseu*vecteur_front;
712     if (cosangle>1.) cosangle=1.;
713     if (cosangle<-1.) cosangle=(-1.);
714     angle1=acos(cosangle);
715     }
716     else
717     {
718     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
719     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
720     double uvfrontautre[2];
721     uvfrontautre[0]=noeudfrontautre->get_u();
722     uvfrontautre[1]=noeudfrontautre->get_v();
723     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
724     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
725     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
726     vecteur_baseu.norme();
727     vecteur_front.norme();
728     double cosangle=vecteur_baseu*vecteur_front;
729     if (cosangle>1.) cosangle=1.;
730     if (cosangle<-1.) cosangle=(-1.);
731     double angle=acos(cosangle);
732     if (angle<angle1) {angle1=angle;ref1=ft;}
733     }
734     }
735     //noeud 2 du segment a inserer
736 francois 632 OT_VECTEUR_3D vec2(xyz2,xyzfront);
737     dist=vec2.get_longueur();
738     //dist=sqrt((ufront-u2)*(ufront-u2)+(vfront-v2)*(vfront-v2));
739 francois 61 if (dist<1e-5*rayonrecherche)
740 5 {
741     if (ref2==NULL)
742     {
743     ref2=ft;
744     OT_VECTEUR_3D vecteur_baseu(u1-u2,v1-v2,0.);
745     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
746     double uvfrontautre[2];
747     uvfrontautre[0]=noeudfrontautre->get_u();
748     uvfrontautre[1]=noeudfrontautre->get_v();
749     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
750     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
751     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
752     vecteur_baseu.norme();
753     vecteur_front.norme();
754     double cosangle=vecteur_baseu*vecteur_front;
755     if (cosangle>1.) cosangle=1.;
756     if (cosangle<-1.) cosangle=(-1.);
757     angle2=acos(cosangle);
758     }
759     else
760     {
761     OT_VECTEUR_3D vecteur_baseu(u1-u2,v1-v2,0.);
762     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
763     double uvfrontautre[2];
764     uvfrontautre[0]=noeudfrontautre->get_u();
765     uvfrontautre[1]=noeudfrontautre->get_v();
766     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
767     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
768     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
769     vecteur_baseu.norme();
770     vecteur_front.norme();
771     double cosangle=vecteur_baseu*vecteur_front;
772     if (cosangle>1.) cosangle=1.;
773     if (cosangle<-1.) cosangle=(-1.);
774     double angle=acos(cosangle);
775     if (angle<angle2) {angle1=angle;ref2=ft;}
776     }
777     }
778    
779     }
780     // creation du segemnt
781     MG_NOEUD* noeud1;
782     MG_NOEUD* noeud2;
783     if (ref1!=NULL) noeud1=ref1->get_noeud2();
784     else
785     {
786     double *coord=noeudori1->get_coord();
787 francois 35 noeud1=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],IMPOSE);
788 5 noeud1->change_u(uv1[0]);
789     noeud1->change_v(uv1[1]);
790 francois 447 noeud1->change_nouveau_numero(noeudori1->get_nouveau_numero());
791 francois 155 }
792 5 if (ref2!=NULL) noeud2=ref2->get_noeud2();
793     else
794     {
795     double *coord=noeudori2->get_coord();
796 francois 35 noeud2=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],IMPOSE);
797 5 noeud2->change_u(uv2[0]);
798     noeud2->change_v(uv2[1]);
799 francois 155 noeud2->change_nouveau_numero(noeudori2->get_nouveau_numero());
800     }
801 francois 35 MG_SEGMENT* mgsegment=mg_maillage->ajouter_mg_segment(mgface,noeud1,noeud2,IMPOSE);
802 5 MG_FRONT_2D *nv_ft=ajouter_front(front_courant,noeud1,noeud2,mgsegment);
803     MG_FRONT_2D *nv_ft2=ajouter_front(front_courant,noeud2,noeud1,mgsegment);
804     if (ref1==NULL)
805     {
806     nv_ft->changer_front_precedent(nv_ft2);
807     nv_ft2->changer_front_suivant(nv_ft);
808     }
809     else
810     {
811     MG_FRONT_2D *tmp=ref1->get_front_suivant();
812     ref1->changer_front_suivant(nv_ft);
813     nv_ft->changer_front_precedent(ref1);
814     nv_ft2->changer_front_suivant(tmp);
815     tmp->changer_front_precedent(nv_ft2);
816     }
817     if (ref2==NULL)
818     {
819     nv_ft->changer_front_suivant(nv_ft2);
820     nv_ft2->changer_front_precedent(nv_ft);
821     }
822     else
823     {
824     MG_FRONT_2D *tmp=ref2->get_front_suivant();
825     ref2->changer_front_suivant(nv_ft2);
826     nv_ft2->changer_front_precedent(ref2);
827     nv_ft->changer_front_suivant(tmp);
828     tmp->changer_front_precedent(nv_ft);
829     }
830    
831     }
832     }
833    
834     void MAILLEUR2D::insere_contrainte_triangle(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_TRIANGLE*> *lsttri)
835     {
836     int nbtri=lsttri->get_nb();
837     for (int i=0;i<nbtri;i++)
838     {
839     MG_TRIANGLE* triori=lsttri->get(i);
840     MG_NOEUD* noeudori1=triori->get_noeud1();
841     MG_NOEUD* noeudori2=triori->get_noeud2();
842     MG_NOEUD* noeudori3=triori->get_noeud3();
843     double uv1[2];
844     double uv2[2];
845     double uv3[2];
846     double *coo=noeudori1->get_coord();
847     mgface->inverser(uv1,coo,1e-10);
848     if (mgface->get_surface()->est_periodique_u()==1)
849     {
850     if (uv1[0]<0.0) uv1[0]=uv1[0]+mgface->get_surface()->get_periode_u();
851     if (uv1[0]>=mgface->get_surface()->get_periode_u()) uv1[0]=uv1[0]-mgface->get_surface()->get_periode_u();
852     }
853     if (mgface->get_surface()->est_periodique_v()==1)
854     {
855     if (uv1[1]<0.0) uv1[1]=uv1[1]+mgface->get_surface()->get_periode_v();
856     if (uv1[1]>=mgface->get_surface()->get_periode_v()) uv1[1]=uv1[1]-mgface->get_surface()->get_periode_v();
857     }
858     coo=noeudori2->get_coord();
859     mgface->inverser(uv2,coo,1e-10);
860     if (mgface->get_surface()->est_periodique_u()==1)
861     {
862     if (uv2[0]<0.0) uv2[0]=uv2[0]+mgface->get_surface()->get_periode_u();
863     if (uv2[0]>=mgface->get_surface()->get_periode_u()) uv2[0]=uv2[0]-mgface->get_surface()->get_periode_u();
864     }
865     if (mgface->get_surface()->est_periodique_v()==1)
866     {
867     if (uv2[1]<0.0) uv2[1]=uv2[1]+mgface->get_surface()->get_periode_v();
868     if (uv2[1]>=mgface->get_surface()->get_periode_v()) uv2[1]=uv2[1]-mgface->get_surface()->get_periode_v();
869     }
870     coo=noeudori3->get_coord();
871     mgface->inverser(uv3,coo,1e-10);
872     if (mgface->get_surface()->est_periodique_u()==1)
873     {
874 francois 33 if (uv3[0]<0.0) uv3[0]=uv3[0]+mgface->get_surface()->get_periode_u();
875     if (uv3[0]>=mgface->get_surface()->get_periode_u()) uv3[0]=uv3[0]-mgface->get_surface()->get_periode_u();
876 5 }
877     if (mgface->get_surface()->est_periodique_v()==1)
878     {
879     if (uv3[1]<0.0) uv3[1]=uv3[1]+mgface->get_surface()->get_periode_v();
880     if (uv3[1]>=mgface->get_surface()->get_periode_v()) uv3[1]=uv3[1]-mgface->get_surface()->get_periode_v();
881     }
882     TPL_MAP_ENTITE<MG_FRONT_2D*> liste_trouvee;
883     double u=0.3333333333333333*(uv1[0]+uv2[0]+uv3[0]);
884     double v=0.3333333333333333*(uv1[1]+uv2[1]+uv3[1]);
885 francois 33 double rayonrecherche1=sqrt((u-uv1[0])*(u-uv1[0])+(v-uv1[1])*(v-uv1[1]))*2.;
886     double rayonrecherche2=sqrt((u-uv2[0])*(u-uv2[0])+(v-uv2[1])*(v-uv2[1]))*2.;
887     double rayonrecherche3=sqrt((u-uv3[0])*(u-uv3[0])+(v-uv3[1])*(v-uv3[1]))*2.;
888     double rayonrecherche=rayonrecherche1;
889     if (rayonrecherche2>rayonrecherche) rayonrecherche=rayonrecherche2;
890     if (rayonrecherche3>rayonrecherche) rayonrecherche=rayonrecherche3;
891 francois 632 double *xyz1=noeudori1->get_coord();
892     double *xyz2=noeudori2->get_coord();
893     double *xyz3=noeudori3->get_coord();
894     double xyz[3];
895     xyz[0]=0.333333333333333333333*(xyz1[0]+xyz2[0]+xyz3[0]);
896     xyz[1]=0.333333333333333333333*(xyz1[1]+xyz2[1]+xyz3[1]);
897     xyz[2]=0.333333333333333333333*(xyz1[2]+xyz2[2]+xyz3[2]);
898     OT_VECTEUR_3D vec1(xyz1,xyz);
899     OT_VECTEUR_3D vec2(xyz2,xyz);
900     OT_VECTEUR_3D vec3(xyz3,xyz);
901     rayonrecherche=std::max(vec1.get_longueur(),vec2.get_longueur());
902     rayonrecherche=std::max(rayonrecherche,vec3.get_longueur())*1.1;
903     //double rayonrecherche=sqrt((u-uv1[0])*(u-uv1[0])+(v-uv1[1])*(v-uv1[1]))*1.1;
904     ntree_de_front->rechercher(xyz[0],xyz[1],xyz[2],rayonrecherche,liste_trouvee);
905 5 int nb_entite=liste_trouvee.get_nb();
906     double du=decalage->calcul_decalage_parametre_u(u);
907     double dv=decalage->calcul_decalage_parametre_v(v);
908     double u1=decalage->decalage_parametre_u(uv1[0],du);
909     double v1=decalage->decalage_parametre_v(uv1[1],dv);
910     double u2=decalage->decalage_parametre_u(uv2[0],du);
911     double v2=decalage->decalage_parametre_v(uv2[1],dv);
912     double u3=decalage->decalage_parametre_u(uv3[0],du);
913     double v3=decalage->decalage_parametre_v(uv3[1],dv);
914     MG_FRONT_2D *ref1=NULL,*ref2=NULL,*ref3=NULL;
915     double angle1,angle2,angle3;
916     for(int j=0;j<nb_entite;j++)
917     {
918     MG_FRONT_2D *ft=liste_trouvee.get(j);
919     MG_NOEUD* noeudfront=ft->get_noeud2();
920     double uvfront[2];
921     uvfront[0]=noeudfront->get_u();
922     uvfront[1]=noeudfront->get_v();
923     double ufront=decalage->decalage_parametre_u(uvfront[0],du);
924     double vfront=decalage->decalage_parametre_v(uvfront[1],dv);
925     //noeud 1 du triangle a inserer
926 francois 632 //double dist=sqrt((ufront-u1)*(ufront-u1)+(vfront-v1)*(vfront-v1));
927     double *xyzfront=noeudfront->get_coord();
928     //mgface->evaluer(uvfront,xyzfront);
929     OT_VECTEUR_3D vec(xyz1,xyzfront);
930     double dist=vec.get_longueur();
931 francois 54 if (dist<1e-5*rayonrecherche)
932 5 {
933     if (ref1==NULL)
934     {
935     ref1=ft;
936     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
937     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
938     double uvfrontautre[2];
939     uvfrontautre[0]=noeudfrontautre->get_u();
940     uvfrontautre[1]=noeudfrontautre->get_v();
941     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
942     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
943     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
944     vecteur_baseu.norme();
945     vecteur_front.norme();
946     double cosangle=vecteur_baseu*vecteur_front;
947     if (cosangle>1.) cosangle=1.;
948     if (cosangle<-1.) cosangle=(-1.);
949     angle1=acos(cosangle);
950     OT_VECTEUR_3D w(0.,0.,1.);
951     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
952     double sangle=vecteur_basev*vecteur_front;
953     if (sangle<0.) angle1=2*M_PI-angle1;
954     }
955     else
956     {
957     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
958     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
959     double uvfrontautre[2];
960     uvfrontautre[0]=noeudfrontautre->get_u();
961     uvfrontautre[1]=noeudfrontautre->get_v();
962     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
963     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
964     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
965     vecteur_baseu.norme();
966     vecteur_front.norme();
967     double cosangle=vecteur_baseu*vecteur_front;
968     if (cosangle>1.) cosangle=1.;
969     if (cosangle<-1.) cosangle=(-1.);
970     double angle=acos(cosangle);
971     OT_VECTEUR_3D w(0.,0.,1.);
972     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
973     double sangle=vecteur_basev*vecteur_front;
974     if (sangle<0.) angle=2*M_PI-angle;
975     if (angle<angle1) {angle1=angle;ref1=ft;}
976     }
977     }
978     //noeud 2 du triangle a inserer
979 francois 632 //mgface->evaluer(uvfront,xyzfront);
980     OT_VECTEUR_3D vec2(xyz2,xyzfront);
981     dist=vec2.get_longueur();
982     //dist=sqrt((ufront-u2)*(ufront-u2)+(vfront-v2)*(vfront-v2));
983 francois 54 if (dist<1e-5*rayonrecherche)
984 5 {
985     if (ref2==NULL)
986     {
987     ref2=ft;
988     OT_VECTEUR_3D vecteur_baseu(u3-u2,v3-v2,0.);
989     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
990     double uvfrontautre[2];
991     uvfrontautre[0]=noeudfrontautre->get_u();
992     uvfrontautre[1]=noeudfrontautre->get_v();
993     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
994     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
995     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
996     vecteur_baseu.norme();
997     vecteur_front.norme();
998     double cosangle=vecteur_baseu*vecteur_front;
999     if (cosangle>1.) cosangle=1.;
1000     if (cosangle<-1.) cosangle=(-1.);
1001     angle2=acos(cosangle);
1002     OT_VECTEUR_3D w(0.,0.,1.);
1003     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1004     double sangle=vecteur_basev*vecteur_front;
1005     if (sangle<0.) angle2=2*M_PI-angle2;
1006     }
1007     else
1008     {
1009     OT_VECTEUR_3D vecteur_baseu(u3-u2,v3-v2,0.);
1010     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1011     double uvfrontautre[2];
1012     uvfrontautre[0]=noeudfrontautre->get_u();
1013     uvfrontautre[1]=noeudfrontautre->get_v();
1014     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1015     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1016     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1017     vecteur_baseu.norme();
1018     vecteur_front.norme();
1019     double cosangle=vecteur_baseu*vecteur_front;
1020     if (cosangle>1.) cosangle=1.;
1021     if (cosangle<-1.) cosangle=(-1.);
1022     double angle=acos(cosangle);
1023     OT_VECTEUR_3D w(0.,0.,1.);
1024     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1025     double sangle=vecteur_basev*vecteur_front;
1026     if (sangle<0.) angle=2*M_PI-angle;
1027     if (angle<angle2) {angle2=angle;ref2=ft;}
1028     }
1029     }
1030     //noeud 3 du triangle a inserer
1031 francois 632 //dist=sqrt((ufront-u3)*(ufront-u3)+(vfront-v3)*(vfront-v3));
1032     //mgface->evaluer(uvfront,xyzfront);
1033     OT_VECTEUR_3D vec3(xyz3,xyzfront);
1034     dist=vec3.get_longueur();
1035 francois 54 if (dist<1e-5*rayonrecherche)
1036 5 {
1037     if (ref3==NULL)
1038     {
1039     ref3=ft;
1040     OT_VECTEUR_3D vecteur_baseu(u1-u3,v1-v3,0.);
1041     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1042     double uvfrontautre[2];
1043     uvfrontautre[0]=noeudfrontautre->get_u();
1044     uvfrontautre[1]=noeudfrontautre->get_v();
1045     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1046     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1047     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1048     vecteur_baseu.norme();
1049     vecteur_front.norme();
1050     double cosangle=vecteur_baseu*vecteur_front;
1051     if (cosangle>1.) cosangle=1.;
1052     if (cosangle<-1.) cosangle=(-1.);
1053     angle3=acos(cosangle);
1054     OT_VECTEUR_3D w(0.,0.,1.);
1055     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1056     double sangle=vecteur_basev*vecteur_front;
1057     if (sangle<0.) angle3=2*M_PI-angle3;
1058     }
1059     else
1060     {
1061     OT_VECTEUR_3D vecteur_baseu(u1-u3,v1-v3,0.);
1062     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1063     double uvfrontautre[2];
1064     uvfrontautre[0]=noeudfrontautre->get_u();
1065     uvfrontautre[1]=noeudfrontautre->get_v();
1066     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1067     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1068     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1069     vecteur_baseu.norme();
1070     vecteur_front.norme();
1071     double cosangle=vecteur_baseu*vecteur_front;
1072     if (cosangle>1.) cosangle=1.;
1073     if (cosangle<-1.) cosangle=(-1.);
1074     double angle=acos(cosangle);
1075     OT_VECTEUR_3D w(0.,0.,1.);
1076     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1077     double sangle=vecteur_basev*vecteur_front;
1078     if (sangle<0.) angle=2*M_PI-angle;
1079     if (angle<angle3) {angle3=angle;ref3=ft;}
1080    
1081     }
1082     }
1083     }
1084     // creation du triangle
1085     MG_NOEUD* noeud1;
1086     MG_NOEUD* noeud2;
1087     MG_NOEUD* noeud3;
1088     if (ref1!=NULL) noeud1=ref1->get_noeud2();
1089     else
1090     {
1091     double *coord=noeudori1->get_coord();
1092 francois 35 noeud1=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],IMPOSE);
1093 5 noeud1->change_u(uv1[0]);
1094     noeud1->change_v(uv1[1]);
1095 francois 447 noeud1->change_nouveau_numero(noeudori1->get_nouveau_numero());
1096 5 }
1097     if (ref2!=NULL) noeud2=ref2->get_noeud2();
1098     else
1099     {
1100     double *coord=noeudori2->get_coord();
1101 francois 35 noeud2=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],IMPOSE);
1102 5 noeud2->change_u(uv2[0]);
1103     noeud2->change_v(uv2[1]);
1104 francois 155 noeud2->change_nouveau_numero(noeudori2->get_nouveau_numero());
1105 5 }
1106     if (ref3!=NULL) noeud3=ref3->get_noeud2();
1107     else
1108     {
1109     double *coord=noeudori3->get_coord();
1110 francois 35 noeud3=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],IMPOSE);
1111 5 noeud3->change_u(uv3[0]);
1112     noeud3->change_v(uv3[1]);
1113 francois 447 noeud3->change_nouveau_numero(noeudori3->get_nouveau_numero());
1114 5 }
1115     MG_SEGMENT* mgsegment1=mg_maillage->get_mg_segment(noeud1->get_id(),noeud2->get_id());
1116     MG_SEGMENT* mgsegment2=mg_maillage->get_mg_segment(noeud2->get_id(),noeud3->get_id());
1117     MG_SEGMENT* mgsegment3=mg_maillage->get_mg_segment(noeud3->get_id(),noeud1->get_id());
1118     int seg1=1,seg2=1,seg3=1;
1119 francois 35 if (mgsegment1==NULL) mgsegment1=mg_maillage->ajouter_mg_segment(mgface,noeud1,noeud2,IMPOSE); else seg1=0;
1120     if (mgsegment2==NULL) mgsegment2=mg_maillage->ajouter_mg_segment(mgface,noeud2,noeud3,IMPOSE); else seg2=0;
1121     if (mgsegment3==NULL) mgsegment3=mg_maillage->ajouter_mg_segment(mgface,noeud3,noeud1,IMPOSE); else seg3=0;
1122 francois 54 M3D_TRIANGLE* mtriangle=new M3D_TRIANGLE(mgface,noeud1,noeud2,noeud3,mgsegment1,mgsegment2,mgsegment3,IMPOSE);
1123 5 mg_maillage->ajouter_mg_triangle(mtriangle);
1124 francois 632 int segtotal=seg1+seg2+seg3;
1125 5 if (segtotal==3)
1126     {
1127     MG_FRONT_2D* ft1=ajouter_front(front_courant,noeud1,noeud2,mgsegment1);
1128     MG_FRONT_2D* ft2=ajouter_front(front_courant,noeud2,noeud3,mgsegment2);
1129     MG_FRONT_2D* ft3=ajouter_front(front_courant,noeud3,noeud1,mgsegment3);
1130     if (ref1==NULL)
1131     {
1132     ft1->changer_front_precedent(ft3);
1133     ft3->changer_front_suivant(ft1);
1134     }
1135     else
1136     {
1137     MG_FRONT_2D* tmp=ref1->get_front_suivant();
1138     ft1->changer_front_precedent(ref1);
1139     ref1->changer_front_suivant(ft1);
1140     ft3->changer_front_suivant(tmp);
1141     tmp->changer_front_precedent(ft3);
1142     }
1143     if (ref2==NULL)
1144     {
1145     ft1->changer_front_suivant(ft2);
1146     ft2->changer_front_precedent(ft1);
1147     }
1148     else
1149     {
1150     MG_FRONT_2D* tmp=ref2->get_front_suivant();
1151     ft2->changer_front_precedent(ref2);
1152     ref2->changer_front_suivant(ft2);
1153     ft1->changer_front_suivant(tmp);
1154     tmp->changer_front_precedent(ft1);
1155     }
1156     if (ref3==NULL)
1157     {
1158     ft2->changer_front_suivant(ft3);
1159     ft3->changer_front_precedent(ft2);
1160     }
1161     else
1162     {
1163     MG_FRONT_2D* tmp=ref3->get_front_suivant();
1164     ft3->changer_front_precedent(ref3);
1165     ref3->changer_front_suivant(ft3);
1166     ft2->changer_front_suivant(tmp);
1167     tmp->changer_front_precedent(ft2);
1168     }
1169     }
1170     if (segtotal==2)
1171     {
1172     MG_FRONT_2D *front1,*front2,*front3;
1173     MG_SEGMENT *segcre1,*segcre2;
1174     if (seg3==0)
1175     {
1176     front1=ref1;front2=ref3;front3=ref2;
1177     segcre1=mgsegment1;segcre2=mgsegment2;
1178     }
1179     if (seg1==0)
1180     {
1181     front1=ref2;front2=ref1;front3=ref3;
1182     segcre1=mgsegment2;segcre2=mgsegment3;
1183     }
1184     if (seg2==0)
1185     {
1186     front1=ref3;front2=ref2;front3=ref1;
1187     segcre1=mgsegment3;segcre2=mgsegment1;
1188     }
1189     MG_FRONT_2D* ft1=ajouter_front(front_courant,segcre1->get_noeud1(),segcre1->get_noeud2(),segcre1);
1190     MG_FRONT_2D* ft2=ajouter_front(front_courant,segcre2->get_noeud1(),segcre2->get_noeud2(),segcre2);
1191     front1->changer_front_suivant(ft1);
1192     ft1->changer_front_precedent(front1);
1193     if (front3==NULL)
1194     {
1195     ft1->changer_front_suivant(ft2);
1196     ft2->changer_front_precedent(ft1);
1197     }
1198     else
1199     {
1200     MG_FRONT_2D* tmp=front3->get_front_suivant();
1201     ft1->changer_front_suivant(tmp);
1202     tmp->changer_front_precedent(ft1);
1203     ft2->changer_front_precedent(front3);
1204     front3->changer_front_suivant(ft2);
1205     }
1206     ft2->changer_front_suivant(front2->get_front_suivant());
1207     front2->get_front_suivant()->changer_front_precedent(ft2);
1208     supprimer_front(front2);
1209     }
1210     if (segtotal==1)
1211     {
1212     MG_FRONT_2D *front1,*front2,*front3;
1213     MG_SEGMENT *segcre1;
1214     if (seg1==1)
1215     {
1216     front1=ref1;front2=ref3;front3=ref2;
1217     segcre1=mgsegment1;
1218     }
1219     if (seg2==1)
1220     {
1221     front1=ref2;front2=ref1;front3=ref3;
1222     segcre1=mgsegment2;
1223     }
1224     if (seg3==1)
1225     {
1226     front1=ref3;front2=ref2;front3=ref1;
1227     segcre1=mgsegment3;
1228     }
1229     MG_FRONT_2D* ft1=ajouter_front(front_courant,segcre1->get_noeud1(),segcre1->get_noeud2(),segcre1);
1230     front1->changer_front_suivant(ft1);
1231     ft1->changer_front_precedent(front1);
1232     ft1->changer_front_suivant(front3->get_front_suivant());
1233     front3->get_front_suivant()->changer_front_precedent(ft1);
1234     supprimer_front(front2);
1235     supprimer_front(front3);
1236     }
1237     if (segtotal==0)
1238     {
1239     supprimer_front(ref1);
1240     supprimer_front(ref2);
1241     supprimer_front(ref3);
1242     }
1243    
1244    
1245     }
1246     }
1247    
1248 francois 447 void MAILLEUR2D::change_niveau_optimisation(int num)
1249     {
1250     niveau_optimisation=num;
1251     }
1252 5
1253 francois 447 int MAILLEUR2D::get_niveau_optimisation(void)
1254     {
1255     return niveau_optimisation;
1256     }
1257    
1258    
1259 5 // FONCTIONS GERANT L ENTITE FRONT (ajout suppression et tout le bordel)
1260     MG_FRONT_2D* MAILLEUR2D::ajouter_front(FRONT& front,MG_NOEUD* noeud1,MG_NOEUD* noeud2,MG_SEGMENT* segment)
1261     {
1262     MG_FRONT_2D* ft=new MG_FRONT_2D(noeud1,noeud2,segment);
1263     ajouter_front(front,ft);
1264 francois 632 ntree_de_front->inserer(ft);
1265 5 return ft;
1266     }
1267    
1268     void MAILLEUR2D::ajouter_front(FRONT& front,MG_FRONT_2D *ft)
1269     {
1270     std::pair<const double,MG_FRONT_2D*> tmp(ft->get_segment()->get_longueur(),ft);
1271     front.insert(tmp);
1272     }
1273    
1274     MG_FRONT_2D* MAILLEUR2D::get_front(FRONT& front,unsigned int num)
1275     {
1276     FRONT::iterator i=front.begin();
1277     for (unsigned long j=0;j<num;j++) i++;
1278     return ((*i).second);
1279     }
1280    
1281    
1282     unsigned int MAILLEUR2D::get_nb_front(FRONT& front)
1283     {
1284     return front.size();
1285     }
1286    
1287    
1288     void MAILLEUR2D::supprimer_front(MG_FRONT_2D* ft)
1289     {
1290 francois 632 ntree_de_front->supprimer(ft);
1291 5
1292     FRONT::iterator j=front_courant.lower_bound(ft->get_segment()->get_longueur());
1293     int ok=0;
1294     if (j==front_courant.end()) ok=2;
1295     while (ok==0)
1296     {
1297     MG_FRONT_2D* fttmp=(*j).second;
1298     if (ft==fttmp) {ok=1;front_courant.erase(j);}
1299     if (fttmp->get_segment()->get_longueur()>ft->get_segment()->get_longueur()) ok=2;
1300     j++;
1301     }
1302     if (ok!=1)
1303     {
1304     j=front_attente.lower_bound(ft->get_segment()->get_longueur());
1305     while (ft!=(*j).second) j++;
1306     front_attente.erase(j);
1307     }
1308    
1309     delete ft;
1310     }
1311    
1312     void MAILLEUR2D::echange_de_front(FRONT& front_original,FRONT& front_destination,MG_FRONT_2D* ft)
1313     {
1314     FRONT::iterator j=front_original.lower_bound(ft->get_segment()->get_longueur());
1315     while (ft!=(*j).second) j++;
1316     front_original.erase(j);
1317     ajouter_front(front_destination,ft);
1318     }
1319 francois 632
1320