ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/magic/lib/mailleur/src/mailleur2d.cpp
Revision: 33
Committed: Fri Jul 20 15:31:26 2007 UTC (17 years, 9 months ago) by francois
Original Path: magic/lib/mailleur/mailleur/src/mailleur2d.cpp
File size: 64113 byte(s)
Log Message:
bug insere contrainte triangle

File Contents

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