ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/magic/lib/mailleur_auto/src/mailleur2d.cpp
Revision: 1008
Committed: Mon Mar 25 16:37:35 2019 UTC (6 years, 1 month ago) by francois
File size: 80650 byte(s)
Log Message:
parametrisation de la methode de calcul des polycristaux

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 couturad 966 int MAILLEUR2D::maille(MG_GROUPE_TOPOLOGIQUE* mggt)
52 5 {
53 couturad 966 if (mg_face!=NULL)
54     {
55     if(maille(mg_face)==FAIL) return FAIL;
56     }
57 5 else
58     {
59 francois 210 TPL_MAP_ENTITE<MG_ELEMENT_TOPOLOGIQUE*> lst;
60     if (mggt!=NULL)
61     {
62 couturad 906 std::map<MG_ELEMENT_TOPOLOGIQUE*,MG_ELEMENT_TOPOLOGIQUE*>::iterator it;
63     for(MG_ELEMENT_TOPOLOGIQUE* ele=mggt->get_premier(it);ele!=NULL;ele=mggt->get_suivant(it))
64     {
65     lst.ajouter(ele);
66     ele->get_topologie_sousjacente(&lst);
67     }
68 francois 210 }
69 5 int nb_face=mg_geometrie->get_nb_mg_face();
70     for (int i=0;i<nb_face;i++)
71     {
72     MG_FACE* mgface=mg_geometrie->get_mg_face(i);
73 francois 210 if (mggt!=NULL)
74     if (lst.existe(mgface)==0) continue;
75 couturad 967 if(maille(mgface)==FAIL) return FAIL;
76 5 }
77     }
78 couturad 966 return OK;
79 5 }
80    
81    
82 couturad 966 int MAILLEUR2D::maille(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_SEGMENT*> *lstseg,TPL_LISTE_ENTITE<MG_TRIANGLE*> *lsttri)
83 5 {
84     periode_u=mgface->get_surface()->get_periode_u();
85     periode_v=mgface->get_surface()->get_periode_v();
86     decalage=new OT_DECALAGE_PARAMETRE(periode_u,periode_v);
87     //afficheur << MAILLAGEFACE << mgface->get_id() << endaff;
88     initialise_frontiere(mgface);
89 francois 632 cree_ntree(mgface);
90 francois 820 TPL_MAP_ENTITE<MG_SOMMET*> liste_pole_sommet;
91     initialise_front(mgface,liste_pole_sommet);
92 5 if (lstseg!=NULL) insere_contrainte_segment(mgface,lstseg);
93     if (lsttri!=NULL) insere_contrainte_triangle(mgface,lsttri);
94 francois 820 if (mgface->get_nb_pole()>0) traite_pole(mgface,liste_pole_sommet);
95 couturad 966 if(progresse_front(mgface)==FAIL)
96     {
97     delete ntree_de_segment;
98     delete ntree_de_front;
99     delete decalage;
100     return FAIL;
101     }
102 francois 645 int verif=param.get_valeur("Verification_coin_face_mailleur2D");
103 francois 696 TPL_LISTE_ENTITE<MG_TRIANGLE*> lsttriaffectecoin;
104 francois 645 if (verif==1)
105 francois 696 verifie_coin_sommet(mgface,&lsttriaffectecoin);
106 francois 447 MAILLEUR2D_OPTIMISATION opt(mg_maillage,niveau_optimisation);
107 francois 696 if (affichageactif==1) opt.active_affichage(affiche2);
108 francois 447 opt.optimise(mgface);
109 francois 696 if (verif==1)
110     for (int i=0;i<lsttriaffectecoin.get_nb();i++)
111 francois 791 lsttriaffectecoin.get(i)->change_origine(MAGIC::ORIGINE::MAILLEUR_AUTO);
112 francois 632 delete ntree_de_segment;
113     //delete quadtree_de_frontiere;
114     delete ntree_de_front;
115 5 delete decalage;
116     segment_frontiere.vide();
117     noeud_frontiere.vide();
118     //ofstream o3("test_2D.mai",ios::out|ios::trunc);
119     //o3.precision(16);
120     //o3.setf(ios::showpoint);
121     //mg_maillage->enregistrer_sous_mesh_2D(o3);
122 couturad 966 return OK;
123 5 }
124    
125    
126 francois 820 void MAILLEUR2D::traite_pole(MG_FACE* mgface,TPL_MAP_ENTITE<MG_SOMMET*> &liste_pole_sommet)
127     {
128     int nbpolesursommet=liste_pole_sommet.get_nb();
129     char message[255];
130     sprintf(message," face comportant %d pole dont %d pole sur un sommet",mgface->get_nb_pole(),nbpolesursommet);
131     affiche(message);
132     std::vector<double> liste_pole;
133     mgface->get_liste_pole_uv(&liste_pole,mg_geometrie->get_valeur_precision());
134     for (int i=0;i<liste_pole.size();i=i+2)
135     {
136     double uv[3]={liste_pole[i],liste_pole[i+1],0.};
137     double xyz[3];
138     mgface->evaluer(uv,xyz);
139     double tenseur_metrique[9];
140     metrique->evaluer(xyz,tenseur_metrique);
141     double dcible=1./sqrt(tenseur_metrique[0]);
142     MG_SOMMET* som=NULL;
143     TPL_MAP_ENTITE<MG_SOMMET*>::ITERATEUR it;
144     for (MG_SOMMET* s=liste_pole_sommet.get_premier(it);s!=NULL;s=liste_pole_sommet.get_suivant(it))
145     {
146     double xyztmp[3];
147     s->get_point()->evaluer(xyztmp);
148     OT_VECTEUR_3D vec(xyz,xyztmp);
149     if (vec.get_longueur()<1e-10*dcible) som=s;
150    
151     }
152     if (som!=NULL)
153     {
154     double xyz[3];
155     som->get_point()->evaluer(xyz);
156     TPL_MAP_ENTITE<MG_FRONT_2D*> liste_trouvee;
157     ntree_de_front->rechercher(xyz[0],xyz[1],xyz[2],0.,liste_trouvee);
158     for (int j=0;j<liste_trouvee.get_nb();j++)
159     {
160     MG_FRONT_2D *ft=liste_trouvee.get(j);
161     if (ft->get_noeud2()->get_lien_topologie()==som)
162     {
163     MG_FRONT_2D *fts=ft->get_front_suivant();
164     double pu=mgface->get_surface()->get_periode_u();
165     double pv=mgface->get_surface()->get_periode_v();
166     int num=0;
167     if (pv>0) num=1;
168     MG_NOEUD* no1=ft->get_noeud1();
169     MG_NOEUD* nopo=ft->get_noeud2();
170     MG_NOEUD* no2=fts->get_noeud2();
171     MG_FRONT_2D* ftpp=ft->get_front_precedent();
172     MG_FRONT_2D* ftss=fts->get_front_suivant();
173     OT_VECTEUR_3D n1n2(ft->get_noeud1()->get_coord(),ft->get_noeud2()->get_coord());
174     OT_VECTEUR_3D n2s(fts->get_noeud1()->get_coord(),fts->get_noeud2()->get_coord());
175     n1n2.norme();
176     n2s.norme();
177     double coo[3];
178     double uv[3];
179     double uvpole[3];
180     uv[0]=ft->get_noeud2()->get_u();
181     uv[1]=ft->get_noeud2()->get_v();
182     uvpole[0]=nopo->get_u();
183     uvpole[1]=nopo->get_v();
184     uvpole[2]=0.;
185     mgface->calcul_normale_unitaire(uv,coo);
186     OT_VECTEUR_3D nplan(coo);
187     OT_VECTEUR_3D n=nplan&n1n2;
188     n.norme();
189     double cs=(-1)*(n1n2*n2s);
190     if (cs>1.) cs=1.;
191     if (cs<-1.) cs=-1.;
192     double sn=(-1)*(n*n2s);
193     double angle=acos(cs);
194     if (sn<0) angle=-angle;
195     if (angle<1e-6) angle=angle+2*M_PI;
196     int nbtri=(int)(angle*1.01/M_PI*3.);
197     supprimer_front(ft);
198     supprimer_front(fts);
199     MG_SEGMENT** tabseg=new MG_SEGMENT*[nbtri];
200     for (int i=0;i<nbtri;i++)
201     tabseg[i]=NULL;
202     uv[0]=no1->get_u();
203     uv[1]=no2->get_v();
204     int ierr=1;
205     do
206     {
207     if (ierr==0) uv[(num+1)%2]=uv[(num+1)%2]-(uv[(num+1)%2]-uvpole[(num+1)%2])*0.5;
208     ierr=1;
209     MG_NOEUD* noc=no1;
210     for (int i=0;i<nbtri-1;i++)
211     {
212     uv[num]=(i+1)*1.0/nbtri*angle;
213     double xyzn[3];
214     mgface->evaluer(uv,xyzn);
215     MG_NOEUD* nn=mg_maillage->ajouter_mg_noeud(mgface,xyzn[0],xyzn[1],xyzn[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
216     nn->change_u(uv[0]);
217     nn->change_v(uv[1]);
218     ierr=ierr*insere_segment(mgface,&(tabseg[i]),noc,nn,TOUS_FRONT);
219     noc=nn;
220     }
221     ierr=ierr*insere_segment(mgface,&(tabseg[nbtri-1]),noc,no2,TOUS_FRONT);
222     }
223     while (ierr==0);
224     OT_VECTEUR_3D w(0.,0.,1.);
225     double uvn1[3]={tabseg[0]->get_noeud1()->get_u(),tabseg[0]->get_noeud1()->get_v(),0.};
226     double uvn2[3]={tabseg[0]->get_noeud2()->get_u(),tabseg[0]->get_noeud2()->get_v(),0.};
227     OT_VECTEUR_3D uvn1n2(uvn1,uvn2);
228     uvn1n2.norme();
229     OT_VECTEUR_3D uvn1pole(uvn1,uvpole);
230     uvn1pole.norme();
231     double sens=(w&uvn1n2)*uvn1pole;
232     MG_FRONT_2D* ftppcourant=ftpp;
233     if (sens>0) ftppcourant=ftss;
234     for (int i=0;i<nbtri;i++)
235     {
236     if (sens<0)
237     insere_triangle(mgface,nopo,tabseg[i]->get_noeud1(),tabseg[i]->get_noeud2());
238     else
239     insere_triangle(mgface,nopo,tabseg[i]->get_noeud2(),tabseg[i]->get_noeud1());
240     if (sens<0)
241     {
242     MG_FRONT_2D *ft=ajouter_front(front_courant,tabseg[i]->get_noeud1(),tabseg[i]->get_noeud2(),tabseg[i]);
243     ft->changer_front_precedent(ftppcourant);
244     ftppcourant->changer_front_suivant(ft);
245     ftppcourant=ft;
246     }
247     else
248     {
249     MG_FRONT_2D *ft=ajouter_front(front_courant,tabseg[i]->get_noeud2(),tabseg[i]->get_noeud1(),tabseg[i]);
250     ft->changer_front_suivant(ftppcourant);
251     ftppcourant->changer_front_precedent(ft);
252     ftppcourant=ft;
253     }
254     }
255     if (sens<0)
256     {
257     ftppcourant->changer_front_suivant(ftss);
258     ftss->changer_front_precedent(ftppcourant);
259     }
260     else
261     {
262     ftppcourant->changer_front_precedent(ftpp);
263     ftpp->changer_front_suivant(ftppcourant);
264     }
265     delete [] tabseg;
266     }
267     }
268     }
269     else
270     {
271     double pu=mgface->get_surface()->get_periode_u();
272     double pv=mgface->get_surface()->get_periode_v();
273     if (pu>0.)
274     {
275     double u1=pu/2.;
276     double v1=uv[1];
277     double u2=pu/2.;
278     double v2=uv[1]+0.001*(vmax-vmin);
279     if (v2>vmax) v2=uv[1]-0.001*(vmax-vmin);
280     double u,v;
281     metrique->ajuste_distance_metrique(mgface,u1,v1,u2,v2,u,v,sqrt(3)/3.,0,0,pas);
282     double un1=0.;
283     double un2=pu/3;
284     double un3=2*pu/3;
285     double uvn1[3]={un1,v,0.};
286     double uvn2[3]={un2,v,0.};
287     double uvn3[3]={un3,v,0.};
288     double xyzn1[3],xyzn2[3],xyzn3[3];
289     mgface->evaluer(uvn1,xyzn1);
290     mgface->evaluer(uvn2,xyzn2);
291     mgface->evaluer(uvn3,xyzn3);
292     MG_NOEUD* nn1=mg_maillage->ajouter_mg_noeud(mgface,xyzn1[0],xyzn1[1],xyzn1[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
293     MG_NOEUD* nn2=mg_maillage->ajouter_mg_noeud(mgface,xyzn2[0],xyzn2[1],xyzn2[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
294     MG_NOEUD* nn3=mg_maillage->ajouter_mg_noeud(mgface,xyzn3[0],xyzn3[1],xyzn3[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
295     MG_SEGMENT *seg1=NULL,*seg2=NULL,*seg3=NULL;
296     int ierr1=insere_segment(mgface,&seg1,nn1,nn2,TOUS_FRONT);
297     int ierr2=insere_segment(mgface,&seg2,nn2,nn3,TOUS_FRONT);
298     int ierr3=insere_segment(mgface,&seg3,nn3,nn1,TOUS_FRONT);
299     while (ierr1*ierr2*ierr3==0)
300     {
301     v=v-(v-uv[1])*0.5;
302     uvn1[1]=v;
303     uvn2[1]=v;
304     uvn3[1]=v;
305     mgface->evaluer(uvn1,xyzn1);
306     mgface->evaluer(uvn2,xyzn2);
307     mgface->evaluer(uvn3,xyzn3);
308     if (seg1!=NULL) ntree_de_segment->supprimer(seg1);
309     if (seg2!=NULL) ntree_de_segment->supprimer(seg2);
310     if (seg3!=NULL) ntree_de_segment->supprimer(seg3);
311     nn1->change_coord(xyzn1);
312     nn2->change_coord(xyzn2);
313     nn3->change_coord(xyzn3);
314     ierr1=insere_segment(mgface,&seg1,nn1,nn2,TOUS_FRONT);
315     ierr2=insere_segment(mgface,&seg2,nn2,nn3,TOUS_FRONT);
316     ierr3=insere_segment(mgface,&seg3,nn3,nn1,TOUS_FRONT);
317     }
318     OT_VECTEUR_3D w(0.,0.,1.);
319     OT_VECTEUR_3D n1n2(uvn1,uvn2);
320     n1n2.norme();
321     OT_VECTEUR_3D n1pole(uvn1,uv);
322     n1pole.norme();
323     double sens=(w&n1n2)*n1pole;
324     if (sens<0)
325     {
326     insere_triangle(mgface,nn1,nn2,nn3);
327     MG_FRONT_2D *ft1=ajouter_front(front_courant,nn1,nn2,seg1);
328     MG_FRONT_2D *ft2=ajouter_front(front_courant,nn2,nn3,seg2);
329     MG_FRONT_2D *ft3=ajouter_front(front_courant,nn3,nn1,seg3);
330     ft1->changer_front_suivant(ft2);
331     ft1->changer_front_precedent(ft3);
332     ft2->changer_front_suivant(ft3);
333     ft2->changer_front_precedent(ft1);
334     ft3->changer_front_suivant(ft1);
335     ft3->changer_front_precedent(ft2);
336     }
337     else
338     {
339     insere_triangle(mgface,nn2,nn1,nn3);
340     MG_FRONT_2D *ft1=ajouter_front(front_courant,nn2,nn1,seg1);
341     MG_FRONT_2D *ft2=ajouter_front(front_courant,nn3,nn2,seg2);
342     MG_FRONT_2D *ft3=ajouter_front(front_courant,nn1,nn3,seg3);
343     ft1->changer_front_suivant(ft3);
344     ft1->changer_front_precedent(ft2);
345     ft2->changer_front_suivant(ft1);
346     ft2->changer_front_precedent(ft3);
347     ft3->changer_front_suivant(ft2);
348     ft3->changer_front_precedent(ft1);
349     }
350    
351     }
352     else if (pv>0.)
353     {
354     double u1=uv[0];
355     double v1=pv/2.;
356     double u2=uv[0]+0.001*(umax-umin);;
357     double v2=pv/2;
358     if (u2>umax) u2=uv[0]-0.001*(umax-umin);
359     double u,v;
360     metrique->ajuste_distance_metrique(mgface,u1,v1,u2,v2,u,v,sqrt(3)/3.,0,0,pas);
361     double vn1=0.;
362     double vn2=pu/3;
363     double vn3=2*pu/3;
364     double uvn1[3]={u,vn1,0.};
365     double uvn2[3]={u,vn2,0.};
366     double uvn3[3]={u,vn3,0.};
367     double xyzn1[3],xyzn2[3],xyzn3[3];
368     mgface->evaluer(uvn1,xyzn1);
369     mgface->evaluer(uvn2,xyzn2);
370     mgface->evaluer(uvn3,xyzn3);
371     MG_NOEUD* nn1=mg_maillage->ajouter_mg_noeud(mgface,xyzn1[0],xyzn1[1],xyzn1[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
372     MG_NOEUD* nn2=mg_maillage->ajouter_mg_noeud(mgface,xyzn2[0],xyzn2[1],xyzn2[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
373     MG_NOEUD* nn3=mg_maillage->ajouter_mg_noeud(mgface,xyzn3[0],xyzn3[1],xyzn3[2],MAGIC::ORIGINE::MAILLEUR_AUTO);
374     MG_SEGMENT *seg1=NULL,*seg2=NULL,*seg3=NULL;
375     int ierr1=insere_segment(mgface,&seg1,nn1,nn2,TOUS_FRONT);
376     int ierr2=insere_segment(mgface,&seg2,nn2,nn3,TOUS_FRONT);
377     int ierr3=insere_segment(mgface,&seg3,nn3,nn1,TOUS_FRONT);
378     while (ierr1*ierr2*ierr3==0)
379     {
380     u=u-(u-uv[0])*0.5;
381     uvn1[0]=u;
382     uvn2[0]=u;
383     uvn3[0]=u;
384     mgface->evaluer(uvn1,xyzn1);
385     mgface->evaluer(uvn2,xyzn2);
386     mgface->evaluer(uvn3,xyzn3);
387     if (seg1!=NULL) ntree_de_segment->supprimer(seg1);
388     if (seg2!=NULL) ntree_de_segment->supprimer(seg2);
389     if (seg3!=NULL) ntree_de_segment->supprimer(seg3);
390     nn1->change_coord(xyzn1);
391     nn2->change_coord(xyzn2);
392     nn3->change_coord(xyzn3);
393     ierr1=insere_segment(mgface,&seg1,nn1,nn2,TOUS_FRONT);
394     ierr2=insere_segment(mgface,&seg2,nn2,nn3,TOUS_FRONT);
395     ierr3=insere_segment(mgface,&seg3,nn3,nn1,TOUS_FRONT);
396     }
397     OT_VECTEUR_3D w(0.,0.,1.);
398     OT_VECTEUR_3D n1n2(uvn1,uvn2);
399     n1n2.norme();
400     OT_VECTEUR_3D n1pole(uvn1,uv);
401     n1pole.norme();
402     double sens=(w&n1n2)*n1pole;
403     if (sens<0)
404     {
405     MG_FRONT_2D *ft1=ajouter_front(front_courant,nn1,nn2,seg1);
406     MG_FRONT_2D *ft2=ajouter_front(front_courant,nn2,nn3,seg2);
407     MG_FRONT_2D *ft3=ajouter_front(front_courant,nn3,nn1,seg3);
408     ft1->changer_front_suivant(ft2);
409     ft1->changer_front_precedent(ft3);
410     ft2->changer_front_suivant(ft3);
411     ft2->changer_front_precedent(ft1);
412     ft3->changer_front_suivant(ft1);
413     ft3->changer_front_precedent(ft2);
414     }
415     else
416     {
417     MG_FRONT_2D *ft1=ajouter_front(front_courant,nn2,nn1,seg1);
418     MG_FRONT_2D *ft2=ajouter_front(front_courant,nn3,nn2,seg2);
419     MG_FRONT_2D *ft3=ajouter_front(front_courant,nn1,nn3,seg3);
420     ft1->changer_front_suivant(ft3);
421     ft1->changer_front_precedent(ft2);
422     ft2->changer_front_suivant(ft1);
423     ft2->changer_front_precedent(ft3);
424     ft3->changer_front_suivant(ft2);
425     ft3->changer_front_precedent(ft1);
426     }
427    
428     }
429     }
430     }
431     }
432    
433    
434    
435    
436 francois 696 void MAILLEUR2D::verifie_coin_sommet(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_TRIANGLE*> *lstaffectecoin)
437 francois 645 {
438     TPL_MAP_ENTITE<MG_SOMMET*> lstsom;
439     int nbboucle=mgface->get_nb_mg_boucle();
440     for (int i=0;i<nbboucle;i++)
441     {
442     MG_BOUCLE *bou=mgface->get_mg_boucle(i);
443     int nbare=bou->get_nb_mg_coarete();
444     for (int j=0;j<nbare;j++)
445     {
446     lstsom.ajouter(bou->get_mg_coarete(j)->get_arete()->get_cosommet1()->get_sommet());
447     lstsom.ajouter(bou->get_mg_coarete(j)->get_arete()->get_cosommet2()->get_sommet());
448     }
449     }
450     TPL_MAP_ENTITE<MG_SOMMET*>::ITERATEUR it;
451     for (MG_SOMMET* som=lstsom.get_premier(it);som!=NULL;som=lstsom.get_suivant(it))
452     {
453     MG_NOEUD* no;
454     int i=0;
455     do
456     {
457     no=(MG_NOEUD*)som->get_lien_maillage()->get(i);
458     i++;
459     }
460     while (mg_maillage->get_mg_noeudid(no->get_id())!=no);
461     int nbtri=no->get_lien_triangle()->get_nb();
462     int nbtrivoisin=0;
463     MG_TRIANGLE* trivoi;
464     for (int i=0;i<nbtri;i++)
465     {
466     MG_TRIANGLE* tri=no->get_lien_triangle()->get(i);
467     if (mg_maillage->get_mg_triangleid(tri->get_id())!=tri) continue;
468     if (tri->get_lien_topologie()==mgface)
469     nbtrivoisin++;
470     trivoi=tri;
471     }
472 francois 696 if (nbtrivoisin>1)
473     for (int i=0;i<nbtri;i++)
474     {
475     MG_TRIANGLE* tri=no->get_lien_triangle()->get(i);
476     if (mg_maillage->get_mg_triangleid(tri->get_id())!=tri) continue;
477     if (tri->get_lien_topologie()==mgface)
478 francois 791 tri->change_origine(MAGIC::ORIGINE::IMPOSE);
479 francois 696 lstaffectecoin->ajouter(tri);
480     }
481 francois 791 if ((nbtrivoisin==1) && (trivoi->get_origine()==MAGIC::ORIGINE::MAILLEUR_AUTO))
482 francois 645 {
483     MG_NOEUD *no1,*no2;
484     if (no==trivoi->get_noeud1()) {no1=trivoi->get_noeud2();no2=trivoi->get_noeud3();}
485     if (no==trivoi->get_noeud2()) {no1=trivoi->get_noeud3();no2=trivoi->get_noeud1();}
486     if (no==trivoi->get_noeud3()) {no1=trivoi->get_noeud1();no2=trivoi->get_noeud2();}
487     MG_TRIANGLE* autretri=NULL;
488     for (int i=0;i<no1->get_lien_triangle()->get_nb();i++)
489     for (int j=0;j<no2->get_lien_triangle()->get_nb();j++)
490     {
491     MG_TRIANGLE* tri1=no1->get_lien_triangle()->get(i);
492     MG_TRIANGLE* tri2=no2->get_lien_triangle()->get(j);
493     if (tri1==tri2)
494     if (tri1!=trivoi) autretri=tri1;
495     }
496     if (autretri!=NULL)
497     {
498     MG_NOEUD* autrenoeud;
499     if ((autretri->get_noeud1()!=no1) && (autretri->get_noeud1()!=no2)) autrenoeud=autretri->get_noeud1();
500     if ((autretri->get_noeud2()!=no1) && (autretri->get_noeud2()!=no2)) autrenoeud=autretri->get_noeud2();
501     if ((autretri->get_noeud3()!=no1) && (autretri->get_noeud3()!=no2)) autrenoeud=autretri->get_noeud3();
502 francois 700 double nqual1=OPERATEUR::qualite_triangle(no1->get_coord(),autrenoeud->get_coord(),no->get_coord());
503     double nqual2=OPERATEUR::qualite_triangle(no2->get_coord(),no->get_coord(),autrenoeud->get_coord());
504     OT_VECTEUR_3D n1n3(no1->get_coord(),no->get_coord());
505     OT_VECTEUR_3D n1n4(no1->get_coord(),autrenoeud->get_coord());
506     double xyznormal[3];
507     double uv[2]={no1->get_u(),no1->get_v()};
508     mgface->calcul_normale_unitaire(uv,xyznormal);
509     OT_VECTEUR_3D normalface(xyznormal);
510     OT_VECTEUR_3D normal=normalface&n1n3;
511     normal.norme();
512     n1n4.norme();
513     if (normal*n1n4<0.0001) nqual1=-nqual1;
514     OT_VECTEUR_3D n2n4(no2->get_coord(),autrenoeud->get_coord());
515     OT_VECTEUR_3D n2n3(no2->get_coord(),no->get_coord());
516     double uv2[2]={no2->get_u(),no2->get_v()};
517     mgface->calcul_normale_unitaire(uv2,xyznormal);
518     OT_VECTEUR_3D normalface2(xyznormal);
519     OT_VECTEUR_3D normal2=normalface&n2n4;
520     normal2.norme();
521     n2n3.norme();
522     if (normal2*n2n3<0.0001) nqual2=-nqual2;
523     if (nqual1<1e-4) continue;
524     if (nqual2<1e-4) continue;
525     MG_TRIANGLE* tri1=insere_triangle(mgface,no1,autrenoeud,no);
526     MG_TRIANGLE* tri2=insere_triangle(mgface,no2,no,autrenoeud);
527 francois 791 tri1->change_origine(MAGIC::ORIGINE::IMPOSE);
528     tri2->change_origine(MAGIC::ORIGINE::IMPOSE);
529 francois 696 lstaffectecoin->ajouter(tri1);
530     lstaffectecoin->ajouter(tri2);
531 francois 645 mg_maillage->supprimer_mg_triangleid(trivoi->get_id());
532     mg_maillage->supprimer_mg_triangleid(autretri->get_id());
533     }
534     }
535    
536     }
537 5
538 francois 645 }
539 5
540    
541     void MAILLEUR2D::initialise_frontiere(MG_FACE* mgface)
542     {
543 francois 632 umin=1e308;vmin=1e-308;
544     umax=-1e308;vmax=-1e-308;
545 5 int nb_boucle=mgface->get_nb_mg_boucle();
546     for (int i=0;i<nb_boucle;i++)
547     {
548     MG_BOUCLE* mgboucle=mgface->get_mg_boucle(i);
549     int nb_coarete=mgboucle->get_nb_mg_coarete();
550     for (int j=0;j<nb_coarete;j++)
551     {
552     MG_COARETE* coarete=mgboucle->get_mg_coarete(j);
553     MG_ARETE* mgarete=coarete->get_arete();
554     int nb_segment=mgarete->get_lien_maillage()->get_nb();
555     for (int k=0;k<nb_segment;k++)
556     {
557     refresh();
558     MG_SEGMENT* mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get(k);
559     MG_SEGMENT* mgsegtemp=mg_maillage->get_mg_segmentid(mgsegment->get_id());
560     if (mgsegtemp==NULL) continue;
561     MG_NOEUD* mgnoeud=mgsegment->get_noeud1();
562     segment_frontiere.ajouter(mgsegment);
563 francois 61 if (!noeud_frontiere.est_dans_la_liste(mgnoeud))
564     {
565     double uv[2];
566     double *coo=mgnoeud->get_coord();
567     mgface->inverser(uv,coo,1e-4);
568     if (mgface->get_surface()->est_periodique_u()==1)
569     {
570 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_u();
571     if (uv[0]<-eps) uv[0]=uv[0]+mgface->get_surface()->get_periode_u();
572     if (uv[0]>=mgface->get_surface()->get_periode_u()-eps) uv[0]=uv[0]-mgface->get_surface()->get_periode_u();
573 francois 61 }
574     if (mgface->get_surface()->est_periodique_v()==1)
575     {
576 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_v();
577     if (uv[1]<-eps) uv[1]=uv[1]+mgface->get_surface()->get_periode_v();
578     if (uv[1]>=mgface->get_surface()->get_periode_v()-eps) uv[1]=uv[1]-mgface->get_surface()->get_periode_v();
579 francois 61 }
580 francois 632 if (uv[0]<umin) umin=uv[0];
581     if (uv[1]<vmin) vmin=uv[1];
582     if (uv[0]>umax) umax=uv[0];
583     if (uv[1]>vmax) vmax=uv[1];
584 francois 61 mgnoeud->change_u(uv[0]);
585     mgnoeud->change_v(uv[1]);
586     noeud_frontiere.ajouter(mgnoeud);
587     }
588 5 mgnoeud=mgsegment->get_noeud2();
589 francois 61 if (!noeud_frontiere.est_dans_la_liste(mgnoeud))
590 5 {
591     double uv[2];
592     double *coo=mgnoeud->get_coord();
593     mgface->inverser(uv,coo,1e-4);
594     if (mgface->get_surface()->est_periodique_u()==1)
595     {
596 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_u();
597     if (uv[0]<-eps) uv[0]=uv[0]+mgface->get_surface()->get_periode_u();
598     if (uv[0]>=mgface->get_surface()->get_periode_u()-eps) uv[0]=uv[0]-mgface->get_surface()->get_periode_u();
599 5 }
600     if (mgface->get_surface()->est_periodique_v()==1)
601     {
602 francois 315 double eps=1e-10*mgface->get_surface()->get_periode_v();
603     if (uv[1]<-eps) uv[1]=uv[1]+mgface->get_surface()->get_periode_v();
604     if (uv[1]>=mgface->get_surface()->get_periode_v()-eps) uv[1]=uv[1]-mgface->get_surface()->get_periode_v();
605 5 }
606 francois 632 if (uv[0]<umin) umin=uv[0];
607     if (uv[1]<vmin) vmin=uv[1];
608     if (uv[0]>umax) umax=uv[0];
609     if (uv[1]>vmax) vmax=uv[1];
610 5 mgnoeud->change_u(uv[0]);
611     mgnoeud->change_v(uv[1]);
612     noeud_frontiere.ajouter(mgnoeud);
613     }
614     }
615    
616     }
617     }
618    
619     }
620    
621 francois 632 void MAILLEUR2D::cree_ntree(MG_FACE* mgface)
622 5 {
623     int nb_noeud=noeud_frontiere.get_nb();
624 francois 632 int nb_echan=(int)param.get_valeur((char*)"Echantillon_face");
625     BOITE_3D boiteface=mgface->get_boite_3D(nb_echan);
626     boiteface.change_grosseur(1.1);
627     BOITE_3D boitemetrique=metrique->get_boite_3D();
628     BOITE_3D boite=boiteface&boitemetrique;
629 francois 1008 //boite=boitemetrique;
630 francois 632 double xmin=boite.get_xmin();
631     double ymin=boite.get_ymin();
632     double zmin=boite.get_zmin();
633     double xmax=boite.get_xmax();
634     double ymax=boite.get_ymax();
635     double zmax=boite.get_zmax();
636     ntree_de_segment=new TPL_NTREE_FCT<MG_SEGMENT*,FCT_TAILLE>;
637     ntree_de_front=new TPL_OCTREE<MG_FRONT_2D*,MG_NOEUD*>;
638     ntree_de_segment->initialiser(*metrique,xmin,ymin,zmin,xmax,ymax,zmax);
639     ntree_de_front->initialiser(ntree_de_segment);
640 5 int nb_segment=segment_frontiere.get_nb();
641     for (int j=0;j<nb_segment;j++)
642     {
643 francois 632 MG_SEGMENT* seg=segment_frontiere.get(j);
644     ntree_de_segment->inserer(segment_frontiere.get(j));
645 5 }
646     }
647    
648    
649 francois 820 void MAILLEUR2D::initialise_front(MG_FACE* mgface,TPL_MAP_ENTITE<MG_SOMMET*> &liste_pole)
650 5 {
651     MG_FRONT_2D::initialise_compteur_id();
652     int nb_boucle=mgface->get_nb_mg_boucle();
653     for (int iboucle=0;iboucle<nb_boucle;iboucle++)
654     {
655     unsigned int nb_front_avant_cette_boucle=get_nb_front(front_courant);
656     MG_BOUCLE* mgboucle=mgface->get_mg_boucle(iboucle);
657     unsigned int nbcoaretetotale=mgboucle->get_nb_mg_coarete();
658     MG_COARETE* mgcoarete=mgboucle->get_mg_coarete(0);
659     MG_NOEUD* noeud_de_depart;
660     int bon_noeud=0;
661     int numnoeud=0;
662     while (bon_noeud==0)
663     {
664     if (mgcoarete->get_orientation()==MEME_SENS) noeud_de_depart=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet1()->get_sommet()->get_lien_maillage()->get(numnoeud);
665     else noeud_de_depart=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet2()->get_sommet()->get_lien_maillage()->get(numnoeud);
666     MG_NOEUD* noeudtemp=mg_maillage->get_mg_noeudid(noeud_de_depart->get_id());
667     if (noeudtemp==NULL) numnoeud++; else bon_noeud=1;
668     }
669     MG_FRONT_2D* premier_front;
670     MG_NOEUD* noeud_courant=noeud_de_depart;
671     MG_FRONT_2D* front_precedent=NULL;
672     unsigned int nbcoaretetraite=0;
673     do
674     {
675 francois 820 MG_SEGMENT* segment_courant=NULL;
676 5 nbcoaretetraite++;
677     MG_NOEUD* noeud_d_arrivee;
678     int bon_noeud=0;
679     int numnoeud=0;
680     while (bon_noeud==0)
681     {
682     if (mgcoarete->get_orientation()==MEME_SENS) noeud_d_arrivee=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet2()->get_sommet()->get_lien_maillage()->get(numnoeud);
683     else noeud_d_arrivee=(MG_NOEUD*)mgcoarete->get_arete()->get_cosommet1()->get_sommet()->get_lien_maillage()->get(numnoeud);
684     MG_NOEUD* noeudtemp=mg_maillage->get_mg_noeudid(noeud_d_arrivee->get_id());
685     if (noeudtemp==NULL) numnoeud++; else bon_noeud=1;
686     }
687     MG_ARETE* mgarete=mgcoarete->get_arete();
688     int passe_aretefermee=0;
689     do
690     {
691     int trouve=0;
692     int i;
693     if ((mgcoarete->get_arete()->get_cosommet1()->get_sommet()==mgcoarete->get_arete()->get_cosommet2()->get_sommet())&&(passe_aretefermee==0))
694     {
695     passe_aretefermee=1;
696     MG_SEGMENT* mgsegment_depart1=NULL;
697     MG_SEGMENT* mgsegment_depart2=NULL;
698     TPL_SET<MG_ELEMENT_MAILLAGE*>::ITERATEUR it;
699     MG_SEGMENT* mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_premier(it);
700     do
701     {
702     if ((mgsegment->get_noeud1()==noeud_courant) || (mgsegment->get_noeud2()==noeud_courant)) mgsegment_depart1=mgsegment;
703     mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_suivant(it);
704     }
705     while (mgsegment_depart1==NULL);
706     do
707     {
708     if ((mgsegment->get_noeud1()==noeud_courant) || (mgsegment->get_noeud2()==noeud_courant)) mgsegment_depart2=mgsegment;
709     mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_suivant(it);
710     }
711     while (mgsegment_depart2==NULL);
712     MG_NOEUD* noeud1_2;
713     MG_NOEUD* noeud2_2;
714     if (mgsegment_depart1->get_noeud1()==noeud_courant) noeud1_2=mgsegment_depart1->get_noeud2(); else noeud1_2=mgsegment_depart1->get_noeud1();
715     if (mgsegment_depart2->get_noeud1()==noeud_courant) noeud2_2=mgsegment_depart2->get_noeud2(); else noeud2_2=mgsegment_depart2->get_noeud1();
716     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());
717     double coo[3];
718     mgarete->deriver(mgarete->get_tmin(),coo);
719     OT_VECTEUR_3D tangeante(coo[0]*mgcoarete->get_orientation(),coo[1]*mgcoarete->get_orientation(),coo[2]*mgcoarete->get_orientation());
720     MG_NOEUD* noeud_suivant;
721     if (vecteur1*tangeante>0.)
722     {
723     mgsegment=mgsegment_depart1;
724     noeud_suivant=noeud1_2;
725     }
726     else
727     {
728     mgsegment=mgsegment_depart2;
729     noeud_suivant=noeud2_2;
730     }
731     MG_FRONT_2D* front=ajouter_front(front_courant,noeud_courant,noeud_suivant,mgsegment);
732 francois 632 ntree_de_segment->inserer(mgsegment);
733 5 if (get_nb_front(front_courant)==nb_front_avant_cette_boucle+1) premier_front=front;
734     front->changer_front_precedent(front_precedent);
735 couturad 683 if (front_precedent!=NULL) front_precedent->changer_front_suivant(front);
736 5 front_precedent=front;
737     noeud_courant=noeud_suivant;
738     segment_courant=mgsegment;
739     }
740     else
741     {
742     trouve=0;
743     TPL_SET<MG_ELEMENT_MAILLAGE*>::ITERATEUR it;
744     MG_SEGMENT* mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_premier(it);
745     do
746     {
747     if ((mgsegment->get_noeud1()==noeud_courant) || (mgsegment->get_noeud2()==noeud_courant))
748     if (mgsegment!=segment_courant)
749     {
750     trouve=1;
751     MG_NOEUD* noeud_suivant;
752     if (mgsegment->get_noeud1()==noeud_courant) noeud_suivant=mgsegment->get_noeud2();
753     else if (mgsegment->get_noeud2()==noeud_courant) noeud_suivant=mgsegment->get_noeud1();
754     MG_FRONT_2D* front=ajouter_front(front_courant,noeud_courant,noeud_suivant,mgsegment);
755 francois 632 ntree_de_segment->inserer(mgsegment);
756 5 if (get_nb_front(front_courant)==nb_front_avant_cette_boucle+1) premier_front=front;
757     else front_precedent->changer_front_suivant(front);
758     front->changer_front_precedent(front_precedent);
759     front_precedent=front;
760     noeud_courant=noeud_suivant;
761     segment_courant=mgsegment;
762     }
763     mgsegment=(MG_SEGMENT*)mgarete->get_lien_maillage()->get_suivant(it);
764     }
765     while (trouve==0);
766     }
767     }
768     while (noeud_courant!=noeud_d_arrivee);
769     int trouve=0;
770     MG_SOMMET* mgsommet;
771     if (mgcoarete->get_orientation()==MEME_SENS) mgsommet=mgcoarete->get_arete()->get_cosommet2()->get_sommet();
772     else mgsommet=mgcoarete->get_arete()->get_cosommet1()->get_sommet();
773 francois 820 if (mgsommet->est_pole()) liste_pole.ajouter(mgsommet);
774 5 double xyz[3];
775     mgsommet->get_point()->evaluer(xyz);
776     int nbcoaretesuivante=mgboucle->get_nb_mg_coarete();
777     MG_COARETE* mgcoaretetmp=NULL;
778     double angleref=0.;
779     double angleref2=0.;
780     for (int i=0;i<nbcoaretesuivante;i++)
781     {
782     MG_COARETE* mgcoarete_suivante=mgboucle->get_mg_coarete(i);
783     MG_SOMMET* mgsommet_suivant;
784     if (mgcoarete_suivante->get_orientation()==MEME_SENS) mgsommet_suivant=mgcoarete_suivante->get_arete()->get_cosommet1()->get_sommet();
785     else mgsommet_suivant=mgcoarete_suivante->get_arete()->get_cosommet2()->get_sommet();
786     if (mgsommet==mgsommet_suivant)
787     {
788     if (trouve==0)
789     {
790     trouve=1;
791     mgcoaretetmp=mgcoarete_suivante;
792     }
793     else
794     {
795     //angleref
796     double uv[2];
797     mgface->inverser(uv,xyz);
798     double normal[3];
799     mgface->calcul_normale_unitaire(uv,normal);
800     double dir1[3];
801     double dir2[3];
802     MG_COSOMMET* mgcosommet;
803     if (mgcoarete->get_orientation()==MEME_SENS) mgcosommet=mgcoarete->get_arete()->get_cosommet2();
804     else mgcosommet=mgcoarete->get_arete()->get_cosommet1();
805     mgcoarete->get_arete()->deriver(mgcosommet->get_t(),dir1);
806     if (mgcoaretetmp->get_orientation()==MEME_SENS) mgcosommet=mgcoaretetmp->get_arete()->get_cosommet1();
807     else mgcosommet=mgcoaretetmp->get_arete()->get_cosommet2();
808     mgcoaretetmp->get_arete()->deriver(mgcosommet->get_t(),dir2);
809     int sens1=mgcoarete->get_orientation();
810     int sens2=mgcoaretetmp->get_orientation();
811     OT_VECTEUR_3D vec1(-dir1[0]*sens1,-dir1[1]*sens1,-dir1[2]*sens1);
812     OT_VECTEUR_3D vec2(dir2[0]*sens2,dir2[1]*sens2,dir2[2]*sens2);
813     vec1.norme();
814     vec2.norme();
815     OT_VECTEUR_3D nor=normal&vec1;
816     double cs=vec1*vec2;
817     double sn=-1*(vec2*nor);
818     angleref=acos(cs);
819     if (sn<0) angleref=-angleref;
820     if (angleref<0) angleref=angleref+2.*M_PI;
821     if (mgcoarete->get_arete()==mgcoaretetmp->get_arete()) angleref=2*M_PI;
822     if (angleref<1e-10)
823     {
824     double dt=1e-3*(mgcoaretetmp->get_arete()->get_tmax()-mgcoaretetmp->get_arete()->get_tmax());
825     mgcoaretetmp->get_arete()->deriver(mgcosommet->get_t()+dt,dir2);
826     OT_VECTEUR_3D vec2(dir2[0]*sens2,dir2[1]*sens2,dir2[2]*sens2);
827     vec2.norme();
828     double cs=vec1*vec2;
829     double sn=-1*(vec2*nor);
830     angleref=acos(cs);
831     if (sn<0) angleref2=-angleref2;
832     if (angleref<0) angleref2=angleref2+2.*M_PI;
833     }
834     //angle
835     if (mgcoarete->get_orientation()==MEME_SENS) mgcosommet=mgcoarete->get_arete()->get_cosommet2();
836     else mgcosommet=mgcoarete->get_arete()->get_cosommet1();
837     mgcoarete->get_arete()->deriver(mgcosommet->get_t(),dir1);
838     if (mgcoarete_suivante->get_orientation()==MEME_SENS) mgcosommet=mgcoarete_suivante->get_arete()->get_cosommet1();
839     else mgcosommet=mgcoarete_suivante->get_arete()->get_cosommet2();
840     mgcoarete_suivante->get_arete()->deriver(mgcosommet->get_t(),dir2);
841     sens1=mgcoarete->get_orientation();
842     sens2=mgcoarete_suivante->get_orientation();
843     vec1.change_x(-dir1[0]*sens1);
844     vec1.change_y(-dir1[1]*sens1);
845     vec1.change_z(-dir1[2]*sens1);
846     vec2.change_x(dir2[0]*sens2);
847     vec2.change_y(dir2[1]*sens2);
848     vec2.change_z(dir2[2]*sens2);
849     vec1.norme();
850     vec2.norme();
851     nor=normal&vec1;
852     cs=vec1*vec2;
853     sn=-1*(vec2*nor);
854     double angle=acos(cs);
855     if (sn<0) angle=-angle;
856     if (angle<0) angle=angle+2.*M_PI;
857     if (mgcoarete->get_arete()==mgcoarete_suivante->get_arete()) angle=2*M_PI;
858     if (angle<angleref)
859     {
860     angleref=angle;
861     mgcoaretetmp=mgcoarete_suivante;
862     }
863     else if ((angle<1e-10) && (angleref<1e-10))
864     {
865     double dt=1e-3*(mgcoarete_suivante->get_arete()->get_tmax()-mgcoarete_suivante->get_arete()->get_tmax());
866     mgcoarete_suivante->get_arete()->deriver(mgcosommet->get_t()+dt,dir2);
867     OT_VECTEUR_3D vec2(dir2[0]*sens2,dir2[1]*sens2,dir2[2]*sens2);
868     vec2.norme();
869     double cs=vec1*vec2;
870     double sn=-1*(vec2*nor);
871     angle=acos(cs);
872     if (sn<0) angle=-angle;
873     if (angle<0) angle=angle+2.*M_PI;
874     if (angle<angleref2)
875     mgcoaretetmp=mgcoarete_suivante;
876    
877     }
878    
879     }
880     }
881 francois 820
882 5 }
883     mgcoarete=mgcoaretetmp;
884 couturad 919 // if(nbcoaretetraite>nbcoaretetotale) break;
885 5 }
886     while ((noeud_courant!=noeud_de_depart) || (nbcoaretetraite!=nbcoaretetotale));
887     front_precedent->changer_front_suivant(premier_front);
888     premier_front->changer_front_precedent(front_precedent);
889     }
890     }
891    
892 couturad 919 int MAILLEUR2D::progresse_front(MG_FACE* mgface)
893 5 {
894     int compteur=0;
895 couturad 919 long Nb_iteration_max_mailleur2d = (long)param.get_valeur((char*)"Nb_iteration_max_mailleur2d");
896 5 while (get_nb_front(front_courant)!=0)
897     {
898 couturad 919 if(compteur>Nb_iteration_max_mailleur2d)
899     {
900     std::cerr << "*** MAILLEUR2D::progresse_front : Nb_iteration_max_mailleur2d atteint ! ***" << std::endl;
901 couturad 951 mg_maillage->get_gestionnaire()->enregistrer("void.magic");
902 couturad 919 return FAIL;
903     }
904 couturad 906 // std::cout << "compteur = " << compteur << std::endl;
905 francois 33 //ofstream o3("c:\\void_1D.mai",ios::out|ios::trunc);
906 francois 820 //o3.(16);
907 francois 33 //o3.setf(ios::showpoint);
908     //mg_maillage->enregistrer_sous_mesh_1D(o3);
909 couturad 919 //ofstream o4("c:\\void_2D.mai",ios::out|ios::trunc);B
910 francois 33 //o4.precision(16);
911     //o4.setf(ios::showpoint);
912     //mg_maillage->enregistrer_sous_mesh_2D(o4);
913 couturad 683 //mg_maillage->get_gestionnaire()->enregistrer("void.magic");
914 5 compteur++;
915 francois 315 /*if (mg_maillage->get_nb_mg_triangle()+558>=1160)
916     {int i=0;
917     LISTE_MG_NOEUD::iterator it;for (MG_NOEUD* noeud=mg_maillage->get_premier_noeud(it);noeud;noeud=mg_maillage->get_suivant_noeud(it))
918     {
919     noeud->change_nouveau_numero(i+1);
920     std::cout << i+1 << " " << noeud->get_u() << " " << noeud->get_v() << std::endl; ;
921     i++;
922     }
923     mg_maillage->get_gestionnaire()->enregistrer("toto.magic");
924     }*/
925 couturad 919 // if (compteur%1000==1)
926    
927     // if(compteur>1000)
928     // {
929 couturad 906 // mg_maillage->get_gestionnaire()->enregistrer("toto.magic");
930 couturad 919 // compteur=0;
931     // }
932 5 refresh();
933     MG_FRONT_2D* ft=get_front(front_courant,0);
934     MG_FRONT_2D* ftp=ft->get_front_precedent();
935     MG_FRONT_2D* fts=ft->get_front_suivant();
936     double eps=0.0001*ft->get_segment()->get_longueur();
937     MG_NOEUD* nop=ftp->get_noeud1();
938     MG_NOEUD* no1=ft->get_noeud1();
939     MG_NOEUD* no2=ft->get_noeud2();
940     MG_NOEUD* nos=fts->get_noeud2();
941     /* angle precedent et angle suivant */
942     OT_VECTEUR_3D n1n2(no1->get_coord(),no2->get_coord());
943     OT_VECTEUR_3D n2s(no2->get_coord(),nos->get_coord());
944     OT_VECTEUR_3D pn1(nop->get_coord(),no1->get_coord());
945     n1n2.norme();
946     n2s.norme();
947     pn1.norme();
948     double coo[3];
949     double uv[2];
950     uv[0]=no1->get_u();
951     uv[1]=no1->get_v();
952     mgface->calcul_normale_unitaire(uv,coo);
953     OT_VECTEUR_3D nplan(coo);
954     OT_VECTEUR_3D n=nplan&n1n2;
955     n.norme();
956     double pcp=(-1)*(n1n2*pn1);
957     double psp=(-1)*(n*pn1);
958     int anglep;
959     if ((pcp>=0.1786481777)&&(psp>eps)) anglep=1; else anglep=0;
960     uv[0]=no2->get_u();
961     uv[1]=no2->get_v();
962     mgface->calcul_normale_unitaire(uv,coo);
963     OT_VECTEUR_3D nplan2(coo);
964     n=nplan2&n1n2;
965     n.norme();
966     double pcs=(-1.)*(n1n2*n2s);
967     double pss=n*n2s;
968     int angles;
969     if ((pcs>=0.1786481777)&&(pss>eps)) angles=1; else angles=0;
970     int type_cas_front[7];
971     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;
972     if (ftp->get_front_precedent()==fts->get_front_suivant()) type_cas_front[CAS_FRONT_4]=1; else type_cas_front[CAS_FRONT_4]=0;
973     if ( (anglep==1) && (angles==1) ) type_cas_front[CAS_FERME_CAVITE]=1; else type_cas_front[CAS_FERME_CAVITE]=0;
974     if ( anglep==1 ) type_cas_front[CAS_FERME_CAVITE_P]=1; else type_cas_front[CAS_FERME_CAVITE_P]=0;
975     if ( angles==1 ) type_cas_front[CAS_FERME_CAVITE_S]=1; else type_cas_front[CAS_FERME_CAVITE_S]=0;
976     type_cas_front[CAS_GENERAL]=1;
977     int solution=PASTROUVE;
978     if (type_cas_front[CAS_FRONT_3]) solution=traite_front(CAS_FRONT_3,mgface,ftp,ft,fts);
979     if ((solution==PASTROUVE) && (type_cas_front[CAS_FRONT_4])) solution=traite_front(CAS_FRONT_4,mgface,ftp,ft,fts);
980     if ((solution==PASTROUVE) && (type_cas_front[CAS_FERME_CAVITE])) solution=traite_front(CAS_FERME_CAVITE,mgface,ftp,ft,fts);
981     if ((solution==PASTROUVE) && (type_cas_front[CAS_FERME_CAVITE_P])) solution=traite_front(CAS_FERME_CAVITE_P,mgface,ftp,ft,fts);
982     if ((solution==PASTROUVE) && (type_cas_front[CAS_FERME_CAVITE_S])) solution=traite_front(CAS_FERME_CAVITE_S,mgface,ftp,ft,fts);
983     if ((solution==PASTROUVE) && (type_cas_front[CAS_GENERAL]))
984     {
985     solution=traite_front(CAS_GENERAL,mgface,ftp,ft,fts);
986     if ((solution!=PASTROUVE)&&(solution!=TROUVE))
987     if (!type_cas_front[solution]) solution=traite_front(solution,mgface,ftp,ft,fts); else solution=PASTROUVE;
988     if (solution==PASTROUVE)
989     {
990     echange_de_front(front_courant,front_attente,ft);
991     ft->incremente_ifail();
992     solution=TROUVE;
993     }
994     }
995     if (get_nb_front(front_courant)==0) front_courant.swap(front_attente);
996     }
997 couturad 919 return OK;
998 5 }
999    
1000    
1001    
1002 francois 447
1003 5 void MAILLEUR2D::insere_contrainte_segment(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_SEGMENT*> *lstseg)
1004     {
1005     int nbseg=lstseg->get_nb();
1006     for (int i=0;i<nbseg;i++)
1007     {
1008     MG_SEGMENT* segori=lstseg->get(i);
1009     MG_NOEUD* noeudori1=segori->get_noeud1();
1010     MG_NOEUD* noeudori2=segori->get_noeud2();
1011     double uv1[2];
1012     double uv2[2];
1013     double *coo=noeudori1->get_coord();
1014     mgface->inverser(uv1,coo,1e-10);
1015     if (mgface->get_surface()->est_periodique_u()==1)
1016     {
1017     if (uv1[0]<0.0) uv1[0]=uv1[0]+mgface->get_surface()->get_periode_u();
1018     if (uv1[0]>=mgface->get_surface()->get_periode_u()) uv1[0]=uv1[0]-mgface->get_surface()->get_periode_u();
1019     }
1020     if (mgface->get_surface()->est_periodique_v()==1)
1021     {
1022     if (uv1[1]<0.0) uv1[1]=uv1[1]+mgface->get_surface()->get_periode_v();
1023     if (uv1[1]>=mgface->get_surface()->get_periode_v()) uv1[1]=uv1[1]-mgface->get_surface()->get_periode_v();
1024     }
1025     coo=noeudori2->get_coord();
1026     mgface->inverser(uv2,coo,1e-10);
1027     if (mgface->get_surface()->est_periodique_u()==1)
1028     {
1029     if (uv2[0]<0.0) uv2[0]=uv2[0]+mgface->get_surface()->get_periode_u();
1030     if (uv2[0]>=mgface->get_surface()->get_periode_u()) uv2[0]=uv2[0]-mgface->get_surface()->get_periode_u();
1031     }
1032     if (mgface->get_surface()->est_periodique_v()==1)
1033     {
1034     if (uv2[1]<0.0) uv2[1]=uv2[1]+mgface->get_surface()->get_periode_v();
1035     if (uv2[1]>=mgface->get_surface()->get_periode_v()) uv2[1]=uv2[1]-mgface->get_surface()->get_periode_v();
1036     }
1037    
1038     TPL_MAP_ENTITE<MG_FRONT_2D*> liste_trouvee;
1039 francois 632 double *xyz1=noeudori1->get_coord();
1040     double *xyz2=noeudori2->get_coord();
1041     double xyz[3];
1042     xyz[0]=0.5*(xyz1[0]+xyz2[0]);
1043     xyz[1]=0.5*(xyz1[1]+xyz2[1]);
1044     xyz[2]=0.5*(xyz1[2]+xyz2[2]);
1045     OT_VECTEUR_3D vec(xyz1,xyz);
1046     //double rayonrecherche=sqrt((u-uv1[0])*(u-uv1[0])+(v-uv1[1])*(v-uv1[1]))*1.1;
1047     double rayonrecherche=vec.get_longueur()*1.1;
1048     ntree_de_front->rechercher(xyz[0],xyz[1],xyz[2],rayonrecherche,liste_trouvee);
1049    
1050     double u=0.5*(uv1[0]+uv2[0]);
1051 5 double v=0.5*(uv1[1]+uv2[1]);
1052     int nb_entite=liste_trouvee.get_nb();
1053     double du=decalage->calcul_decalage_parametre_u(u);
1054     double dv=decalage->calcul_decalage_parametre_v(v);
1055     double u1=decalage->decalage_parametre_u(uv1[0],du);
1056     double v1=decalage->decalage_parametre_v(uv1[1],dv);
1057     double u2=decalage->decalage_parametre_u(uv2[0],du);
1058     double v2=decalage->decalage_parametre_v(uv2[1],dv);
1059     MG_FRONT_2D *ref1=NULL,*ref2=NULL;
1060     double angle1,angle2;
1061     for(int j=0;j<nb_entite;j++)
1062     {
1063     MG_FRONT_2D *ft=liste_trouvee.get(j);
1064     MG_NOEUD* noeudfront=ft->get_noeud2();
1065     double uvfront[2];
1066     uvfront[0]=noeudfront->get_u();
1067     uvfront[1]=noeudfront->get_v();
1068     double ufront=decalage->decalage_parametre_u(uvfront[0],du);
1069     double vfront=decalage->decalage_parametre_v(uvfront[1],dv);
1070     //noeud 1 du segment a inserer
1071 francois 632 double *xyzfront=noeudfront->get_coord();
1072     //mgface->evaluer(uvfront,xyzfront);
1073     OT_VECTEUR_3D vec(xyz1,xyzfront);
1074     double dist=vec.get_longueur();
1075     //double dist=sqrt((ufront-u1)*(ufront-u1)+(vfront-v1)*(vfront-v1));
1076 francois 61 if (dist<1e-5*rayonrecherche)
1077 5 {
1078     if (ref1==NULL)
1079     {
1080     ref1=ft;
1081     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
1082     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1083     double uvfrontautre[2];
1084     uvfrontautre[0]=noeudfrontautre->get_u();
1085     uvfrontautre[1]=noeudfrontautre->get_v();
1086     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1087     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1088     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1089     vecteur_baseu.norme();
1090     vecteur_front.norme();
1091     double cosangle=vecteur_baseu*vecteur_front;
1092     if (cosangle>1.) cosangle=1.;
1093     if (cosangle<-1.) cosangle=(-1.);
1094     angle1=acos(cosangle);
1095     }
1096     else
1097     {
1098     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
1099     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1100     double uvfrontautre[2];
1101     uvfrontautre[0]=noeudfrontautre->get_u();
1102     uvfrontautre[1]=noeudfrontautre->get_v();
1103     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1104     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1105     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1106     vecteur_baseu.norme();
1107     vecteur_front.norme();
1108     double cosangle=vecteur_baseu*vecteur_front;
1109     if (cosangle>1.) cosangle=1.;
1110     if (cosangle<-1.) cosangle=(-1.);
1111     double angle=acos(cosangle);
1112     if (angle<angle1) {angle1=angle;ref1=ft;}
1113     }
1114     }
1115     //noeud 2 du segment a inserer
1116 francois 632 OT_VECTEUR_3D vec2(xyz2,xyzfront);
1117     dist=vec2.get_longueur();
1118     //dist=sqrt((ufront-u2)*(ufront-u2)+(vfront-v2)*(vfront-v2));
1119 francois 61 if (dist<1e-5*rayonrecherche)
1120 5 {
1121     if (ref2==NULL)
1122     {
1123     ref2=ft;
1124     OT_VECTEUR_3D vecteur_baseu(u1-u2,v1-v2,0.);
1125     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1126     double uvfrontautre[2];
1127     uvfrontautre[0]=noeudfrontautre->get_u();
1128     uvfrontautre[1]=noeudfrontautre->get_v();
1129     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1130     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1131     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1132     vecteur_baseu.norme();
1133     vecteur_front.norme();
1134     double cosangle=vecteur_baseu*vecteur_front;
1135     if (cosangle>1.) cosangle=1.;
1136     if (cosangle<-1.) cosangle=(-1.);
1137     angle2=acos(cosangle);
1138     }
1139     else
1140     {
1141     OT_VECTEUR_3D vecteur_baseu(u1-u2,v1-v2,0.);
1142     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1143     double uvfrontautre[2];
1144     uvfrontautre[0]=noeudfrontautre->get_u();
1145     uvfrontautre[1]=noeudfrontautre->get_v();
1146     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1147     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1148     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1149     vecteur_baseu.norme();
1150     vecteur_front.norme();
1151     double cosangle=vecteur_baseu*vecteur_front;
1152     if (cosangle>1.) cosangle=1.;
1153     if (cosangle<-1.) cosangle=(-1.);
1154     double angle=acos(cosangle);
1155     if (angle<angle2) {angle1=angle;ref2=ft;}
1156     }
1157     }
1158    
1159     }
1160     // creation du segemnt
1161     MG_NOEUD* noeud1;
1162     MG_NOEUD* noeud2;
1163     if (ref1!=NULL) noeud1=ref1->get_noeud2();
1164     else
1165     {
1166     double *coord=noeudori1->get_coord();
1167 francois 791 noeud1=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],MAGIC::ORIGINE::IMPOSE);
1168 5 noeud1->change_u(uv1[0]);
1169     noeud1->change_v(uv1[1]);
1170 francois 447 noeud1->change_nouveau_numero(noeudori1->get_nouveau_numero());
1171 francois 155 }
1172 5 if (ref2!=NULL) noeud2=ref2->get_noeud2();
1173     else
1174     {
1175     double *coord=noeudori2->get_coord();
1176 francois 791 noeud2=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],MAGIC::ORIGINE::IMPOSE);
1177 5 noeud2->change_u(uv2[0]);
1178     noeud2->change_v(uv2[1]);
1179 francois 155 noeud2->change_nouveau_numero(noeudori2->get_nouveau_numero());
1180     }
1181 francois 791 MG_SEGMENT* mgsegment=mg_maillage->ajouter_mg_segment(mgface,noeud1,noeud2,MAGIC::ORIGINE::IMPOSE);
1182 5 MG_FRONT_2D *nv_ft=ajouter_front(front_courant,noeud1,noeud2,mgsegment);
1183     MG_FRONT_2D *nv_ft2=ajouter_front(front_courant,noeud2,noeud1,mgsegment);
1184     if (ref1==NULL)
1185     {
1186     nv_ft->changer_front_precedent(nv_ft2);
1187     nv_ft2->changer_front_suivant(nv_ft);
1188     }
1189     else
1190     {
1191     MG_FRONT_2D *tmp=ref1->get_front_suivant();
1192     ref1->changer_front_suivant(nv_ft);
1193     nv_ft->changer_front_precedent(ref1);
1194     nv_ft2->changer_front_suivant(tmp);
1195     tmp->changer_front_precedent(nv_ft2);
1196     }
1197     if (ref2==NULL)
1198     {
1199     nv_ft->changer_front_suivant(nv_ft2);
1200     nv_ft2->changer_front_precedent(nv_ft);
1201     }
1202     else
1203     {
1204     MG_FRONT_2D *tmp=ref2->get_front_suivant();
1205     ref2->changer_front_suivant(nv_ft2);
1206     nv_ft2->changer_front_precedent(ref2);
1207     nv_ft->changer_front_suivant(tmp);
1208     tmp->changer_front_precedent(nv_ft);
1209     }
1210    
1211     }
1212     }
1213    
1214     void MAILLEUR2D::insere_contrainte_triangle(MG_FACE* mgface,TPL_LISTE_ENTITE<MG_TRIANGLE*> *lsttri)
1215     {
1216     int nbtri=lsttri->get_nb();
1217     for (int i=0;i<nbtri;i++)
1218     {
1219     MG_TRIANGLE* triori=lsttri->get(i);
1220     MG_NOEUD* noeudori1=triori->get_noeud1();
1221     MG_NOEUD* noeudori2=triori->get_noeud2();
1222     MG_NOEUD* noeudori3=triori->get_noeud3();
1223     double uv1[2];
1224     double uv2[2];
1225     double uv3[2];
1226     double *coo=noeudori1->get_coord();
1227     mgface->inverser(uv1,coo,1e-10);
1228     if (mgface->get_surface()->est_periodique_u()==1)
1229     {
1230     if (uv1[0]<0.0) uv1[0]=uv1[0]+mgface->get_surface()->get_periode_u();
1231     if (uv1[0]>=mgface->get_surface()->get_periode_u()) uv1[0]=uv1[0]-mgface->get_surface()->get_periode_u();
1232     }
1233     if (mgface->get_surface()->est_periodique_v()==1)
1234     {
1235     if (uv1[1]<0.0) uv1[1]=uv1[1]+mgface->get_surface()->get_periode_v();
1236     if (uv1[1]>=mgface->get_surface()->get_periode_v()) uv1[1]=uv1[1]-mgface->get_surface()->get_periode_v();
1237     }
1238     coo=noeudori2->get_coord();
1239     mgface->inverser(uv2,coo,1e-10);
1240     if (mgface->get_surface()->est_periodique_u()==1)
1241     {
1242     if (uv2[0]<0.0) uv2[0]=uv2[0]+mgface->get_surface()->get_periode_u();
1243     if (uv2[0]>=mgface->get_surface()->get_periode_u()) uv2[0]=uv2[0]-mgface->get_surface()->get_periode_u();
1244     }
1245     if (mgface->get_surface()->est_periodique_v()==1)
1246     {
1247     if (uv2[1]<0.0) uv2[1]=uv2[1]+mgface->get_surface()->get_periode_v();
1248     if (uv2[1]>=mgface->get_surface()->get_periode_v()) uv2[1]=uv2[1]-mgface->get_surface()->get_periode_v();
1249     }
1250     coo=noeudori3->get_coord();
1251     mgface->inverser(uv3,coo,1e-10);
1252     if (mgface->get_surface()->est_periodique_u()==1)
1253     {
1254 francois 33 if (uv3[0]<0.0) uv3[0]=uv3[0]+mgface->get_surface()->get_periode_u();
1255     if (uv3[0]>=mgface->get_surface()->get_periode_u()) uv3[0]=uv3[0]-mgface->get_surface()->get_periode_u();
1256 5 }
1257     if (mgface->get_surface()->est_periodique_v()==1)
1258     {
1259     if (uv3[1]<0.0) uv3[1]=uv3[1]+mgface->get_surface()->get_periode_v();
1260     if (uv3[1]>=mgface->get_surface()->get_periode_v()) uv3[1]=uv3[1]-mgface->get_surface()->get_periode_v();
1261     }
1262     TPL_MAP_ENTITE<MG_FRONT_2D*> liste_trouvee;
1263     double u=0.3333333333333333*(uv1[0]+uv2[0]+uv3[0]);
1264     double v=0.3333333333333333*(uv1[1]+uv2[1]+uv3[1]);
1265 francois 33 double rayonrecherche1=sqrt((u-uv1[0])*(u-uv1[0])+(v-uv1[1])*(v-uv1[1]))*2.;
1266     double rayonrecherche2=sqrt((u-uv2[0])*(u-uv2[0])+(v-uv2[1])*(v-uv2[1]))*2.;
1267     double rayonrecherche3=sqrt((u-uv3[0])*(u-uv3[0])+(v-uv3[1])*(v-uv3[1]))*2.;
1268     double rayonrecherche=rayonrecherche1;
1269     if (rayonrecherche2>rayonrecherche) rayonrecherche=rayonrecherche2;
1270     if (rayonrecherche3>rayonrecherche) rayonrecherche=rayonrecherche3;
1271 francois 632 double *xyz1=noeudori1->get_coord();
1272     double *xyz2=noeudori2->get_coord();
1273     double *xyz3=noeudori3->get_coord();
1274     double xyz[3];
1275     xyz[0]=0.333333333333333333333*(xyz1[0]+xyz2[0]+xyz3[0]);
1276     xyz[1]=0.333333333333333333333*(xyz1[1]+xyz2[1]+xyz3[1]);
1277     xyz[2]=0.333333333333333333333*(xyz1[2]+xyz2[2]+xyz3[2]);
1278     OT_VECTEUR_3D vec1(xyz1,xyz);
1279     OT_VECTEUR_3D vec2(xyz2,xyz);
1280     OT_VECTEUR_3D vec3(xyz3,xyz);
1281     rayonrecherche=std::max(vec1.get_longueur(),vec2.get_longueur());
1282     rayonrecherche=std::max(rayonrecherche,vec3.get_longueur())*1.1;
1283     //double rayonrecherche=sqrt((u-uv1[0])*(u-uv1[0])+(v-uv1[1])*(v-uv1[1]))*1.1;
1284     ntree_de_front->rechercher(xyz[0],xyz[1],xyz[2],rayonrecherche,liste_trouvee);
1285 5 int nb_entite=liste_trouvee.get_nb();
1286     double du=decalage->calcul_decalage_parametre_u(u);
1287     double dv=decalage->calcul_decalage_parametre_v(v);
1288     double u1=decalage->decalage_parametre_u(uv1[0],du);
1289     double v1=decalage->decalage_parametre_v(uv1[1],dv);
1290     double u2=decalage->decalage_parametre_u(uv2[0],du);
1291     double v2=decalage->decalage_parametre_v(uv2[1],dv);
1292     double u3=decalage->decalage_parametre_u(uv3[0],du);
1293     double v3=decalage->decalage_parametre_v(uv3[1],dv);
1294     MG_FRONT_2D *ref1=NULL,*ref2=NULL,*ref3=NULL;
1295     double angle1,angle2,angle3;
1296     for(int j=0;j<nb_entite;j++)
1297     {
1298     MG_FRONT_2D *ft=liste_trouvee.get(j);
1299     MG_NOEUD* noeudfront=ft->get_noeud2();
1300     double uvfront[2];
1301     uvfront[0]=noeudfront->get_u();
1302     uvfront[1]=noeudfront->get_v();
1303     double ufront=decalage->decalage_parametre_u(uvfront[0],du);
1304     double vfront=decalage->decalage_parametre_v(uvfront[1],dv);
1305     //noeud 1 du triangle a inserer
1306 francois 632 //double dist=sqrt((ufront-u1)*(ufront-u1)+(vfront-v1)*(vfront-v1));
1307     double *xyzfront=noeudfront->get_coord();
1308     //mgface->evaluer(uvfront,xyzfront);
1309     OT_VECTEUR_3D vec(xyz1,xyzfront);
1310     double dist=vec.get_longueur();
1311 francois 54 if (dist<1e-5*rayonrecherche)
1312 5 {
1313     if (ref1==NULL)
1314     {
1315     ref1=ft;
1316     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
1317     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1318     double uvfrontautre[2];
1319     uvfrontautre[0]=noeudfrontautre->get_u();
1320     uvfrontautre[1]=noeudfrontautre->get_v();
1321     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1322     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1323     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1324     vecteur_baseu.norme();
1325     vecteur_front.norme();
1326     double cosangle=vecteur_baseu*vecteur_front;
1327     if (cosangle>1.) cosangle=1.;
1328     if (cosangle<-1.) cosangle=(-1.);
1329     angle1=acos(cosangle);
1330     OT_VECTEUR_3D w(0.,0.,1.);
1331     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1332     double sangle=vecteur_basev*vecteur_front;
1333     if (sangle<0.) angle1=2*M_PI-angle1;
1334     }
1335     else
1336     {
1337     OT_VECTEUR_3D vecteur_baseu(u2-u1,v2-v1,0.);
1338     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1339     double uvfrontautre[2];
1340     uvfrontautre[0]=noeudfrontautre->get_u();
1341     uvfrontautre[1]=noeudfrontautre->get_v();
1342     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1343     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1344     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1345     vecteur_baseu.norme();
1346     vecteur_front.norme();
1347     double cosangle=vecteur_baseu*vecteur_front;
1348     if (cosangle>1.) cosangle=1.;
1349     if (cosangle<-1.) cosangle=(-1.);
1350     double angle=acos(cosangle);
1351     OT_VECTEUR_3D w(0.,0.,1.);
1352     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1353     double sangle=vecteur_basev*vecteur_front;
1354     if (sangle<0.) angle=2*M_PI-angle;
1355     if (angle<angle1) {angle1=angle;ref1=ft;}
1356     }
1357     }
1358     //noeud 2 du triangle a inserer
1359 francois 632 //mgface->evaluer(uvfront,xyzfront);
1360     OT_VECTEUR_3D vec2(xyz2,xyzfront);
1361     dist=vec2.get_longueur();
1362     //dist=sqrt((ufront-u2)*(ufront-u2)+(vfront-v2)*(vfront-v2));
1363 francois 54 if (dist<1e-5*rayonrecherche)
1364 5 {
1365     if (ref2==NULL)
1366     {
1367     ref2=ft;
1368     OT_VECTEUR_3D vecteur_baseu(u3-u2,v3-v2,0.);
1369     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1370     double uvfrontautre[2];
1371     uvfrontautre[0]=noeudfrontautre->get_u();
1372     uvfrontautre[1]=noeudfrontautre->get_v();
1373     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1374     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1375     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1376     vecteur_baseu.norme();
1377     vecteur_front.norme();
1378     double cosangle=vecteur_baseu*vecteur_front;
1379     if (cosangle>1.) cosangle=1.;
1380     if (cosangle<-1.) cosangle=(-1.);
1381     angle2=acos(cosangle);
1382     OT_VECTEUR_3D w(0.,0.,1.);
1383     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1384     double sangle=vecteur_basev*vecteur_front;
1385     if (sangle<0.) angle2=2*M_PI-angle2;
1386     }
1387     else
1388     {
1389     OT_VECTEUR_3D vecteur_baseu(u3-u2,v3-v2,0.);
1390     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1391     double uvfrontautre[2];
1392     uvfrontautre[0]=noeudfrontautre->get_u();
1393     uvfrontautre[1]=noeudfrontautre->get_v();
1394     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1395     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1396     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1397     vecteur_baseu.norme();
1398     vecteur_front.norme();
1399     double cosangle=vecteur_baseu*vecteur_front;
1400     if (cosangle>1.) cosangle=1.;
1401     if (cosangle<-1.) cosangle=(-1.);
1402     double angle=acos(cosangle);
1403     OT_VECTEUR_3D w(0.,0.,1.);
1404     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1405     double sangle=vecteur_basev*vecteur_front;
1406     if (sangle<0.) angle=2*M_PI-angle;
1407     if (angle<angle2) {angle2=angle;ref2=ft;}
1408     }
1409     }
1410     //noeud 3 du triangle a inserer
1411 francois 632 //dist=sqrt((ufront-u3)*(ufront-u3)+(vfront-v3)*(vfront-v3));
1412     //mgface->evaluer(uvfront,xyzfront);
1413     OT_VECTEUR_3D vec3(xyz3,xyzfront);
1414     dist=vec3.get_longueur();
1415 francois 54 if (dist<1e-5*rayonrecherche)
1416 5 {
1417     if (ref3==NULL)
1418     {
1419     ref3=ft;
1420     OT_VECTEUR_3D vecteur_baseu(u1-u3,v1-v3,0.);
1421     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1422     double uvfrontautre[2];
1423     uvfrontautre[0]=noeudfrontautre->get_u();
1424     uvfrontautre[1]=noeudfrontautre->get_v();
1425     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1426     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1427     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1428     vecteur_baseu.norme();
1429     vecteur_front.norme();
1430     double cosangle=vecteur_baseu*vecteur_front;
1431     if (cosangle>1.) cosangle=1.;
1432     if (cosangle<-1.) cosangle=(-1.);
1433     angle3=acos(cosangle);
1434     OT_VECTEUR_3D w(0.,0.,1.);
1435     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1436     double sangle=vecteur_basev*vecteur_front;
1437     if (sangle<0.) angle3=2*M_PI-angle3;
1438     }
1439     else
1440     {
1441     OT_VECTEUR_3D vecteur_baseu(u1-u3,v1-v3,0.);
1442     MG_NOEUD* noeudfrontautre=ft->get_noeud1();
1443     double uvfrontautre[2];
1444     uvfrontautre[0]=noeudfrontautre->get_u();
1445     uvfrontautre[1]=noeudfrontautre->get_v();
1446     double ufrontautre=decalage->decalage_parametre_u(uvfrontautre[0],du);
1447     double vfrontautre=decalage->decalage_parametre_v(uvfrontautre[1],dv);
1448     OT_VECTEUR_3D vecteur_front(ufrontautre-ufront,vfrontautre-vfront,0.);
1449     vecteur_baseu.norme();
1450     vecteur_front.norme();
1451     double cosangle=vecteur_baseu*vecteur_front;
1452     if (cosangle>1.) cosangle=1.;
1453     if (cosangle<-1.) cosangle=(-1.);
1454     double angle=acos(cosangle);
1455     OT_VECTEUR_3D w(0.,0.,1.);
1456     OT_VECTEUR_3D vecteur_basev=w&vecteur_baseu;
1457     double sangle=vecteur_basev*vecteur_front;
1458     if (sangle<0.) angle=2*M_PI-angle;
1459     if (angle<angle3) {angle3=angle;ref3=ft;}
1460    
1461     }
1462     }
1463     }
1464     // creation du triangle
1465     MG_NOEUD* noeud1;
1466     MG_NOEUD* noeud2;
1467     MG_NOEUD* noeud3;
1468     if (ref1!=NULL) noeud1=ref1->get_noeud2();
1469     else
1470     {
1471     double *coord=noeudori1->get_coord();
1472 francois 791 noeud1=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],MAGIC::ORIGINE::IMPOSE);
1473 5 noeud1->change_u(uv1[0]);
1474     noeud1->change_v(uv1[1]);
1475 francois 447 noeud1->change_nouveau_numero(noeudori1->get_nouveau_numero());
1476 5 }
1477     if (ref2!=NULL) noeud2=ref2->get_noeud2();
1478     else
1479     {
1480     double *coord=noeudori2->get_coord();
1481 francois 791 noeud2=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],MAGIC::ORIGINE::IMPOSE);
1482 5 noeud2->change_u(uv2[0]);
1483     noeud2->change_v(uv2[1]);
1484 francois 155 noeud2->change_nouveau_numero(noeudori2->get_nouveau_numero());
1485 5 }
1486     if (ref3!=NULL) noeud3=ref3->get_noeud2();
1487     else
1488     {
1489     double *coord=noeudori3->get_coord();
1490 francois 791 noeud3=mg_maillage->ajouter_mg_noeud(mgface,coord[0],coord[1],coord[2],MAGIC::ORIGINE::IMPOSE);
1491 5 noeud3->change_u(uv3[0]);
1492     noeud3->change_v(uv3[1]);
1493 francois 447 noeud3->change_nouveau_numero(noeudori3->get_nouveau_numero());
1494 5 }
1495     MG_SEGMENT* mgsegment1=mg_maillage->get_mg_segment(noeud1->get_id(),noeud2->get_id());
1496     MG_SEGMENT* mgsegment2=mg_maillage->get_mg_segment(noeud2->get_id(),noeud3->get_id());
1497     MG_SEGMENT* mgsegment3=mg_maillage->get_mg_segment(noeud3->get_id(),noeud1->get_id());
1498     int seg1=1,seg2=1,seg3=1;
1499 francois 791 if (mgsegment1==NULL) mgsegment1=mg_maillage->ajouter_mg_segment(mgface,noeud1,noeud2,MAGIC::ORIGINE::IMPOSE); else seg1=0;
1500     if (mgsegment2==NULL) mgsegment2=mg_maillage->ajouter_mg_segment(mgface,noeud2,noeud3,MAGIC::ORIGINE::IMPOSE); else seg2=0;
1501     if (mgsegment3==NULL) mgsegment3=mg_maillage->ajouter_mg_segment(mgface,noeud3,noeud1,MAGIC::ORIGINE::IMPOSE); else seg3=0;
1502     M3D_TRIANGLE* mtriangle=new M3D_TRIANGLE(mgface,noeud1,noeud2,noeud3,mgsegment1,mgsegment2,mgsegment3,MAGIC::ORIGINE::IMPOSE);
1503 5 mg_maillage->ajouter_mg_triangle(mtriangle);
1504 francois 632 int segtotal=seg1+seg2+seg3;
1505 5 if (segtotal==3)
1506     {
1507     MG_FRONT_2D* ft1=ajouter_front(front_courant,noeud1,noeud2,mgsegment1);
1508     MG_FRONT_2D* ft2=ajouter_front(front_courant,noeud2,noeud3,mgsegment2);
1509     MG_FRONT_2D* ft3=ajouter_front(front_courant,noeud3,noeud1,mgsegment3);
1510     if (ref1==NULL)
1511     {
1512     ft1->changer_front_precedent(ft3);
1513     ft3->changer_front_suivant(ft1);
1514     }
1515     else
1516     {
1517     MG_FRONT_2D* tmp=ref1->get_front_suivant();
1518     ft1->changer_front_precedent(ref1);
1519     ref1->changer_front_suivant(ft1);
1520     ft3->changer_front_suivant(tmp);
1521     tmp->changer_front_precedent(ft3);
1522     }
1523     if (ref2==NULL)
1524     {
1525     ft1->changer_front_suivant(ft2);
1526     ft2->changer_front_precedent(ft1);
1527     }
1528     else
1529     {
1530     MG_FRONT_2D* tmp=ref2->get_front_suivant();
1531     ft2->changer_front_precedent(ref2);
1532     ref2->changer_front_suivant(ft2);
1533     ft1->changer_front_suivant(tmp);
1534     tmp->changer_front_precedent(ft1);
1535     }
1536     if (ref3==NULL)
1537     {
1538     ft2->changer_front_suivant(ft3);
1539     ft3->changer_front_precedent(ft2);
1540     }
1541     else
1542     {
1543     MG_FRONT_2D* tmp=ref3->get_front_suivant();
1544     ft3->changer_front_precedent(ref3);
1545     ref3->changer_front_suivant(ft3);
1546     ft2->changer_front_suivant(tmp);
1547     tmp->changer_front_precedent(ft2);
1548     }
1549     }
1550     if (segtotal==2)
1551     {
1552     MG_FRONT_2D *front1,*front2,*front3;
1553     MG_SEGMENT *segcre1,*segcre2;
1554     if (seg3==0)
1555     {
1556     front1=ref1;front2=ref3;front3=ref2;
1557     segcre1=mgsegment1;segcre2=mgsegment2;
1558     }
1559     if (seg1==0)
1560     {
1561     front1=ref2;front2=ref1;front3=ref3;
1562     segcre1=mgsegment2;segcre2=mgsegment3;
1563     }
1564     if (seg2==0)
1565     {
1566     front1=ref3;front2=ref2;front3=ref1;
1567     segcre1=mgsegment3;segcre2=mgsegment1;
1568     }
1569     MG_FRONT_2D* ft1=ajouter_front(front_courant,segcre1->get_noeud1(),segcre1->get_noeud2(),segcre1);
1570     MG_FRONT_2D* ft2=ajouter_front(front_courant,segcre2->get_noeud1(),segcre2->get_noeud2(),segcre2);
1571     front1->changer_front_suivant(ft1);
1572     ft1->changer_front_precedent(front1);
1573     if (front3==NULL)
1574     {
1575     ft1->changer_front_suivant(ft2);
1576     ft2->changer_front_precedent(ft1);
1577     }
1578     else
1579     {
1580     MG_FRONT_2D* tmp=front3->get_front_suivant();
1581     ft1->changer_front_suivant(tmp);
1582     tmp->changer_front_precedent(ft1);
1583     ft2->changer_front_precedent(front3);
1584     front3->changer_front_suivant(ft2);
1585     }
1586     ft2->changer_front_suivant(front2->get_front_suivant());
1587     front2->get_front_suivant()->changer_front_precedent(ft2);
1588     supprimer_front(front2);
1589     }
1590     if (segtotal==1)
1591     {
1592     MG_FRONT_2D *front1,*front2,*front3;
1593     MG_SEGMENT *segcre1;
1594     if (seg1==1)
1595     {
1596     front1=ref1;front2=ref3;front3=ref2;
1597     segcre1=mgsegment1;
1598     }
1599     if (seg2==1)
1600     {
1601     front1=ref2;front2=ref1;front3=ref3;
1602     segcre1=mgsegment2;
1603     }
1604     if (seg3==1)
1605     {
1606     front1=ref3;front2=ref2;front3=ref1;
1607     segcre1=mgsegment3;
1608     }
1609     MG_FRONT_2D* ft1=ajouter_front(front_courant,segcre1->get_noeud1(),segcre1->get_noeud2(),segcre1);
1610     front1->changer_front_suivant(ft1);
1611     ft1->changer_front_precedent(front1);
1612     ft1->changer_front_suivant(front3->get_front_suivant());
1613     front3->get_front_suivant()->changer_front_precedent(ft1);
1614     supprimer_front(front2);
1615     supprimer_front(front3);
1616     }
1617     if (segtotal==0)
1618     {
1619     supprimer_front(ref1);
1620     supprimer_front(ref2);
1621     supprimer_front(ref3);
1622     }
1623    
1624    
1625     }
1626     }
1627    
1628 francois 447 void MAILLEUR2D::change_niveau_optimisation(int num)
1629     {
1630     niveau_optimisation=num;
1631     }
1632 5
1633 francois 447 int MAILLEUR2D::get_niveau_optimisation(void)
1634     {
1635     return niveau_optimisation;
1636     }
1637    
1638    
1639 5 // FONCTIONS GERANT L ENTITE FRONT (ajout suppression et tout le bordel)
1640     MG_FRONT_2D* MAILLEUR2D::ajouter_front(FRONT& front,MG_NOEUD* noeud1,MG_NOEUD* noeud2,MG_SEGMENT* segment)
1641     {
1642     MG_FRONT_2D* ft=new MG_FRONT_2D(noeud1,noeud2,segment);
1643     ajouter_front(front,ft);
1644 francois 632 ntree_de_front->inserer(ft);
1645 5 return ft;
1646     }
1647    
1648     void MAILLEUR2D::ajouter_front(FRONT& front,MG_FRONT_2D *ft)
1649     {
1650     std::pair<const double,MG_FRONT_2D*> tmp(ft->get_segment()->get_longueur(),ft);
1651     front.insert(tmp);
1652     }
1653    
1654     MG_FRONT_2D* MAILLEUR2D::get_front(FRONT& front,unsigned int num)
1655     {
1656     FRONT::iterator i=front.begin();
1657     for (unsigned long j=0;j<num;j++) i++;
1658     return ((*i).second);
1659     }
1660    
1661    
1662     unsigned int MAILLEUR2D::get_nb_front(FRONT& front)
1663     {
1664     return front.size();
1665     }
1666    
1667    
1668     void MAILLEUR2D::supprimer_front(MG_FRONT_2D* ft)
1669     {
1670 francois 632 ntree_de_front->supprimer(ft);
1671 5
1672     FRONT::iterator j=front_courant.lower_bound(ft->get_segment()->get_longueur());
1673     int ok=0;
1674     if (j==front_courant.end()) ok=2;
1675     while (ok==0)
1676     {
1677     MG_FRONT_2D* fttmp=(*j).second;
1678     if (ft==fttmp) {ok=1;front_courant.erase(j);}
1679     if (fttmp->get_segment()->get_longueur()>ft->get_segment()->get_longueur()) ok=2;
1680     j++;
1681     }
1682     if (ok!=1)
1683     {
1684     j=front_attente.lower_bound(ft->get_segment()->get_longueur());
1685     while (ft!=(*j).second) j++;
1686     front_attente.erase(j);
1687     }
1688    
1689     delete ft;
1690     }
1691    
1692     void MAILLEUR2D::echange_de_front(FRONT& front_original,FRONT& front_destination,MG_FRONT_2D* ft)
1693     {
1694     FRONT::iterator j=front_original.lower_bound(ft->get_segment()->get_longueur());
1695     while (ft!=(*j).second) j++;
1696     front_original.erase(j);
1697     ajouter_front(front_destination,ft);
1698     }
1699 francois 632
1700