ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/magic/lib/fichier/src/mg_file.cpp
Revision: 794
Committed: Wed Apr 6 17:39:34 2016 UTC (9 years, 1 month ago) by francois
File size: 84913 byte(s)
Log Message: 
bug resolu a a propos de la non prise en compte du versionnage des fichiers magic pour les coques et les poutres

File Contents

# User Rev Content
1 francois 283 //------------------------------------------------------------
2     //------------------------------------------------------------
3     // MAGiC
4     // Jean Christophe Cuilli�e et Vincent FRANCOIS
5     // D�artement de G�ie M�anique - UQTR
6     //------------------------------------------------------------
7     // Le projet MAGIC est un projet de recherche du d�artement
8     // de g�ie m�anique de l'Universit�du Qu�ec �
9     // Trois Rivi�es
10     // Les librairies ne peuvent �re utilis�s sans l'accord
11     // des auteurs (contact : francois@uqtr.ca)
12     //------------------------------------------------------------
13     //------------------------------------------------------------
14     //
15     // mg_file.cpp
16     //
17     //------------------------------------------------------------
18     //------------------------------------------------------------
19     // COPYRIGHT 2000
20     // Version du 02/03/2006 �11H22
21     //------------------------------------------------------------
22     //------------------------------------------------------------
23    
24    
25     #include "gestionversion.h"
26    
27     #pragma hdrstop
28    
29     #include <string.h>
30     #include "mg_file.h"
31 francois 526 #include "mg_sommet_noeud.h"
32 francois 576 #include "mg_arete_element.h"
33     #include "mg_face_element.h"
34     #include "mg_volume_element.h"
35 francois 685 #include "mg_coque_element.h"
36 francois 753 #include "mg_poutre_element.h"
37 francois 283 #include "pars_argument.h"
38     #include "parse.h"
39 francois 763 #include "ot_chaine.h"
40 francois 283 #ifdef BREP_STEP
41     #include "step_surface.h"
42     #include "step_courbe.h"
43     #include "step_point.h"
44     #endif
45     #ifdef BREP_SAT
46     #include "acis_surface.h"
47     #include "acis_courbe.h"
48     #include "acis_point.h"
49     #endif
50     #include "lc_point.h"
51 francois 310 #include "fem_segment2.h"
52 francois 767 #include "fem_mini_segment2.h"
53 francois 310 #include "fem_segment3.h"
54     #include "fem_triangle3.h"
55     #include "fem_triangle6.h"
56     #include "fem_quadrangle4.h"
57     #include "fem_quadrangle8.h"
58     #include "fem_tetra4.h"
59 francois 380 #include "xfem_segment2.h"
60 francois 410 #include "xfem_triangle3.h"
61 francois 339 #include "xfem_tetra4.h"
62 francois 310 #include "fem_tetra10.h"
63     #include "fem_hexa8.h"
64     #include "fem_hexa20.h"
65 francois 283 //OCC
66     #ifdef BREP_OCC
67     #include "occ_surface.h"
68     #include "occ_point.h"
69     #include "occ_courbe.h"
70 couturad 740 #include "occ_fonction.h"
71 francois 283 #include "TopoDS_Shape.hxx"
72     #include "TopoDS.hxx"
73     #endif
74 francois 689 #ifdef CSG_OCC
75 couturad 740 #include "mg_assemblage.h"
76 francois 689 #include "mg_primitive_boite.h"
77 couturad 723 #include "mg_primitive_sphere.h"
78     #include "mg_primitive_cylindre.h"
79 couturad 724 #include "mg_primitive_cone.h"
80     #include "mg_primitive_tore.h"
81 francois 689 #include "mg_primitive_complexe.h"
82     #include "mg_operateur_boolean_union.h"
83 couturad 723 #include "mg_operateur_boolean_difference.h"
84     #include "mg_operateur_boolean_intersection.h"
85 francois 689 #endif
86 francois 283 //---------------------------------------------------------------------------
87     // CAD4FE Headers
88     #ifdef WINDOWS_VERSION
89     #include "CAD4FE_MCEdge.h"
90     #include "CAD4FE_MCFace.h"
91     #include "CAD4FE_MCVertex.h"
92     #include "CAD4FE_PolySurface.h"
93     #include "CAD4FE_PolyCurve.h"
94     #include "CAD4FE_MCNode.h"
95     #include "CAD4FE_MCSegment.h"
96     #include "CAD4FE_MCTriangle.h"
97     #include "CAD4FE_m3d_MCTriangle.h"
98     #endif
99     //---------------------------------------------------------------------------
100    
101    
102     //---------------------------------------------------------------------------
103     #pragma package(smart_init)
104    
105    
106     MG_FILE::MG_FILE(char* chemin):MG_GESTIONNAIRE()
107     {
108     code_de_lecture=lire(chemin);
109     }
110    
111 francois 551 MG_FILE::MG_FILE():MG_GESTIONNAIRE()
112     {
113     }
114    
115 francois 283 MG_FILE::~MG_FILE()
116     {
117     }
118    
119     int MG_FILE::get_code_de_lecture(void)
120     {
121     return code_de_lecture;
122     }
123    
124     long MG_FILE::cid(std::string str)
125     {
126     const char *p=str.c_str();
127     if (*p=='$') return atol(p+1);
128     return -1;
129     }
130    
131 francois 551
132 francois 763 void MG_FILE::lire_ccf(double version,int nb,int numparam,class PARSE& parse,class PARS_ARGUMENT (&param)[100],MG_ELEMENT_TOPOLOGIQUE *ele)
133     {
134     if (version<2.0)
135     {
136     for (int i=0;i<nb;i++)
137     {
138     parse.decode(param[numparam].argument[i].c_str(),"(@,@)",param+numparam+1);
139     char nom[3];
140     strcpy(nom,param[numparam+1].argument[0].c_str());
141     if (strcmp(nom,"CM")==0)
142     {
143     unsigned long val;
144     val=atol(param[numparam+2].argument[0].c_str());
145     ele->ajouter_ccf(nom,val);
146     }
147     else
148     {
149     double val;
150     val=atof(param[numparam+2].argument[0].c_str());
151     ele->ajouter_ccf(nom,val);
152     }
153     }
154     }
155 francois 788 else if (version<2.1)
156 francois 763 {
157     for (int i=0;i<nb;i++)
158     {
159     char test[500];
160     strcpy(test,param[numparam].argument[i].c_str());
161     parse.decode(param[numparam].argument[i].c_str(),"(@,@,@)",param+numparam+1);
162     char formulation[10];
163     strcpy(formulation,param[numparam+1].argument[0].c_str());
164     char nom[3];
165     strcpy(nom,param[numparam+2].argument[0].c_str());
166     if (formulation[0]=='N')
167     {
168     double val;
169     val=atof(param[numparam+3].argument[0].c_str());
170     ele->ajouter_ccf(nom,val);
171     }
172     if (formulation[0]=='I')
173     {
174     unsigned long val;
175     val=atol(param[numparam+3].argument[0].c_str());
176     ele->ajouter_ccf(nom,val);
177     }
178     if (formulation[0]=='F')
179     {
180     parse.decode(param[numparam].argument[i].c_str(),"(@,@,@,@,(@))",param+numparam+1);
181     char formule[500];
182     strcpy(formule,param[numparam+3].argument[0].c_str());
183     char variable[500];
184     strcpy(variable,param[numparam+5].argument[0].c_str());
185     OT_CHAINE ot;
186     std::vector<std::string> listvariable=ot.split(variable,',');
187     ele->ajouter_ccf(nom,formule,listvariable);
188     }
189     }
190     }
191 francois 788 else
192     {
193     for (int i=0;i<nb;i++)
194     {
195     char test[500];
196     strcpy(test,param[numparam].argument[i].c_str());
197     parse.decode(param[numparam].argument[i].c_str(),"(@,@,@,@)",param+numparam+1);
198     char formulation[10];
199     strcpy(formulation,param[numparam+1].argument[0].c_str());
200     char nom[3];
201     strcpy(nom,param[numparam+2].argument[0].c_str());
202     char suiv[10];
203     strcpy(suiv,param[numparam+3].argument[0].c_str());
204     if (formulation[0]=='N')
205     {
206     double val;
207     val=atof(param[numparam+4].argument[0].c_str());
208     ele->ajouter_ccf(nom,val,suiv);
209     }
210     if (formulation[0]=='I')
211     {
212     unsigned long val;
213     val=atol(param[numparam+4].argument[0].c_str());
214     ele->ajouter_ccf(nom,val,suiv);
215     }
216     if (formulation[0]=='F')
217     {
218     parse.decode(param[numparam].argument[i].c_str(),"(@,@,@,,@@,(@))",param+numparam+1);
219     char formule[500];
220     strcpy(formule,param[numparam+4].argument[0].c_str());
221     char variable[500];
222     strcpy(variable,param[numparam+6].argument[0].c_str());
223     OT_CHAINE ot;
224     std::vector<std::string> listvariable=ot.split(variable,',');
225     ele->ajouter_ccf(nom,formule,listvariable,suiv);
226     }
227     }
228 francois 763 }
229 francois 788 }
230 francois 551
231     void MG_FILE::lire_NOEUD(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
232     {
233     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
234     long idtopo=cid(param[2].argument[0]);
235     double x=atof(param[3].argument[0].c_str());
236     double y=atof(param[4].argument[0].c_str());
237     double z=atof(param[5].argument[0].c_str());
238     int ori=atoi(param[6].argument[0].c_str());
239     MG_ELEMENT_TOPOLOGIQUE* topo;
240     if (idtopo>-1)
241     {
242     topo=mggeo->get_mg_sommetid(idtopo);
243     if (topo==NULL) topo=mggeo->get_mg_areteid(idtopo);
244     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
245     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
246     }
247     else topo=NULL;
248     MG_NOEUD* noeud=new MG_NOEUD(id,topo,x,y,z,ori);
249     mgmai->ajouter_mg_noeud(noeud);
250     }
251    
252     void MG_FILE::lire_SEGMENT(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
253     {
254     parse.decode(data.c_str(),"@,@,@,@",param+2);
255     long idtopo=cid(param[2].argument[0]);
256     long idn1=cid(param[3].argument[0]);
257     long idn2=cid(param[4].argument[0]);
258     int ori=atoi(param[5].argument[0].c_str());
259     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
260     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
261     MG_ELEMENT_TOPOLOGIQUE* topo;
262     if (idtopo>-1)
263     {
264     topo=mggeo->get_mg_areteid(idtopo);
265     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
266     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
267 francois 767 if (topo==NULL) topo=mggeo->get_mg_poutreid(idtopo);
268 francois 551 }
269     else topo=NULL;
270     MG_SEGMENT* seg=new MG_SEGMENT(id,topo,noeud1,noeud2,ori);
271     mgmai->ajouter_mg_segment(seg);
272     }
273    
274    
275     void MG_FILE::lire_TRIANGLE(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
276     {
277     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
278     long idtopo=cid(param[2].argument[0]);
279     long idn1=cid(param[3].argument[0]);
280     long idn2=cid(param[4].argument[0]);
281     long idn3=cid(param[5].argument[0]);
282     int ori=atoi(param[6].argument[0].c_str());
283     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
284     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
285     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
286     MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
287     if (idtopo>-1)
288     {
289     topo=mggeo->get_mg_faceid(idtopo);
290     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
291     }
292     mgmai->ajouter_mg_triangle(topo,noeud1,noeud2,noeud3,ori,id);
293     }
294    
295     void MG_FILE::lire_QUADRANGLE(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
296     {
297     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
298     long idtopo=cid(param[2].argument[0]);
299     long idn1=cid(param[3].argument[0]);
300     long idn2=cid(param[4].argument[0]);
301     long idn3=cid(param[5].argument[0]);
302     long idn4=cid(param[6].argument[0]);
303     int ori=atoi(param[7].argument[0].c_str());
304     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
305     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
306     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
307     MG_NOEUD* noeud4=mgmai->get_mg_noeudid(idn4);
308     MG_ELEMENT_TOPOLOGIQUE* topo;
309     if (idtopo>-1)
310     {
311     topo=mggeo->get_mg_faceid(idtopo);
312     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
313     }
314     else topo=NULL;
315     mgmai->ajouter_mg_quadrangle(topo,noeud1,noeud2,noeud3,noeud4,ori,id);
316     }
317    
318    
319     void MG_FILE::lire_TETRA(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
320     {
321     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
322     long idtopo=cid(param[2].argument[0]);
323     long idn1=cid(param[3].argument[0]);
324     long idn2=cid(param[4].argument[0]);
325     long idn3=cid(param[5].argument[0]);
326     long idn4=cid(param[6].argument[0]);
327     int ori=atoi(param[7].argument[0].c_str());
328     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
329     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
330     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
331     MG_NOEUD* noeud4=mgmai->get_mg_noeudid(idn4);
332     MG_ELEMENT_TOPOLOGIQUE* topo;
333     if (idtopo>-1) topo=mggeo->get_mg_volumeid(idtopo);
334     else topo=NULL;
335     if (noeud1&&noeud2&&noeud3&&noeud4) mgmai->ajouter_mg_tetra(topo,noeud1,noeud2,noeud3,noeud4,ori,id);
336     }
337    
338     void MG_FILE::lire_HEXA(long id,class PARSE& parse,class PARS_ARGUMENT (&param)[100],std::string& data,MG_MAILLAGE *mgmai,MG_GEOMETRIE *mggeo)
339     {
340     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
341     long idtopo=cid(param[2].argument[0]);
342     long idn1=cid(param[3].argument[0]);
343     long idn2=cid(param[4].argument[0]);
344     long idn3=cid(param[5].argument[0]);
345     long idn4=cid(param[6].argument[0]);
346     long idn5=cid(param[7].argument[0]);
347     long idn6=cid(param[8].argument[0]);
348     long idn7=cid(param[9].argument[0]);
349     long idn8=cid(param[10].argument[0]);
350     int ori=atoi(param[11].argument[0].c_str());
351     MG_NOEUD* noeud1=mgmai->get_mg_noeudid(idn1);
352     MG_NOEUD* noeud2=mgmai->get_mg_noeudid(idn2);
353     MG_NOEUD* noeud3=mgmai->get_mg_noeudid(idn3);
354     MG_NOEUD* noeud4=mgmai->get_mg_noeudid(idn4);
355     MG_NOEUD* noeud5=mgmai->get_mg_noeudid(idn5);
356     MG_NOEUD* noeud6=mgmai->get_mg_noeudid(idn6);
357     MG_NOEUD* noeud7=mgmai->get_mg_noeudid(idn7);
358     MG_NOEUD* noeud8=mgmai->get_mg_noeudid(idn8);
359     MG_ELEMENT_TOPOLOGIQUE* topo;
360     if (idtopo>-1) topo=mggeo->get_mg_volumeid(idtopo);
361     else topo=NULL;
362     mgmai->ajouter_mg_hexa(topo,noeud1,noeud2,noeud3,noeud4,noeud5,noeud6,noeud7,noeud8,ori,id);
363     }
364    
365    
366    
367    
368    
369    
370    
371    
372 francois 283 int MG_FILE::lire(char* chemin)
373     {
374     FILE *in;
375 francois 706 //char ligne[3000];
376 francois 283 in=fopen(chemin,"rt");
377     if (in==NULL) return 0;
378     PARS_ARGUMENT param[100];
379     PARSE parse;
380    
381     MG_GEOMETRIE *mggeo;
382 francois 689 MG_ARBRE* arbre;
383 francois 283 #ifdef WINDOWS_VERSION
384     std::multimap<CAD4FE::MCVertex*, unsigned long> mapMergedRefVertices;
385     #endif
386     bool updatedMergedRefVertices = false;
387 francois 763 version_fichier=1.0;
388 francois 283 do
389     {
390     int ierr;
391     std::string ligne=parse.lire(in,';',&ierr);
392     parse.decode(ligne.c_str(),"@;",param);
393     const char *chaine=param[0].argument[0].c_str();
394     if ((chaine[0]=='/') && (chaine[1]=='/'))
395     {
396     if ((chaine[2]=='*')&&(chaine[3]=='i'))
397     {
398     unsigned long id;
399     sscanf(chaine,"//*i:%lu;",&id);
400     entiteidmax=id;
401     }
402 francois 763 if ((chaine[2]=='*')&&(chaine[3]=='v'))
403     sscanf(chaine,"//*v:%lf;",&version_fichier);
404 francois 283 }
405     else if (param[0].argument[0]!="FIN")
406     {
407     parse.decode(ligne.c_str(),"%@=@(@);",param);
408     std::string entite=param[1].argument[0];
409     long id=atol(param[0].argument[0].c_str());
410     std::string data=param[2].argument[0] ;
411     MG_MAILLAGE *mgmai;
412     FEM_MAILLAGE *femmai;
413     if (entite=="GEOMETRIE")
414     {
415     parse.decode(data.c_str(),"@,@,@,@",param+2);
416     double unite=atof(param[2].argument[0].c_str());
417     std::string typegeo=param[3].argument[0];
418     std::string chemin=param[4].argument[0];
419 francois 576 if (typegeo=="VIRTUEL")
420     {
421     mggeo=new MG_GEOMETRIE((char*)typegeo.c_str(),id,(char*)chemin.c_str(),unite);
422     ajouter_mg_geometrie(mggeo);
423     }
424 francois 283 #ifdef BREP_STEP
425     if (typegeo=="STEP")
426     {
427 couturad 740 mggeo=new MG_GEOMETRIE((char*)"STEP",id,(char *)chemin.c_str(),unite);
428 francois 283 ajouter_mg_geometrie(mggeo);
429     }
430     #endif
431     #ifdef BREP_SAT
432     if (typegeo=="ACIS")
433     {
434 couturad 740 mggeo=new MG_GEOMETRIE((char*)"ACIS",id,(char *)chemin.c_str(),unite);
435 francois 283 ajouter_mg_geometrie(mggeo);
436     }
437     #endif
438    
439     #ifdef BREP_OCC
440     if (typegeo=="OCC")
441     {
442     mggeo=new MG_GEOMETRIE((char*)"OCC",id,chemin.c_str(),unite);
443     ajouter_mg_geometrie(mggeo);
444     }
445 couturad 740 if (typegeo=="OCCV2015")
446     {
447     mggeo=new MG_GEOMETRIE((char*)"OCCV2015",id,chemin.c_str(),unite);
448     ajouter_mg_geometrie(mggeo);
449     }
450 francois 283 #endif
451    
452     std::string nommat="";
453     if (param[5].argument[0]!="")
454     nommat=param[5].argument[0];
455     mggeo->change_gest_materiau((char*)nommat.c_str());
456     }
457 francois 689 #ifdef CSG_OCC
458     if (entite=="ARBRE")
459     {
460     parse.decode(data.c_str(),"@",param+2);
461     std::string nom=param[2].argument[0];
462     arbre=new MG_ARBRE(id,nom.c_str());
463     ajouter_mg_arbre(arbre);
464     }
465 couturad 740 if (entite == "ASSEMBLAGE")
466     {
467     parse.decode(data.c_str(),"@,@,(&)",param+2);
468     std::string nom=param[2].argument[0];
469     int nb_primitive = atoi((char*)param[3].argument[0].c_str());
470     MG_ASSEMBLAGE *mgassembl=new MG_ASSEMBLAGE(id,nom.c_str());
471     for(int i=0;i<nb_primitive;i++)
472     {
473     unsigned long id2 = cid(param[4].argument[i]);
474 francois 741 mgassembl->ajouter_mg_primitive(id2);
475 couturad 740 }
476     arbre->ajouter_mg_assemblage(mgassembl);
477     }
478 francois 689 if (entite=="BOITE")
479     {
480     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
481     double x1=atof((char*)param[2].argument[0].c_str());
482     double y1=atof((char*)param[3].argument[0].c_str());
483     double z1=atof((char*)param[4].argument[0].c_str());
484     double x2=atof((char*)param[5].argument[0].c_str());
485     double y2=atof((char*)param[6].argument[0].c_str());
486     double z2=atof((char*)param[7].argument[0].c_str());
487     MG_PRIMITIVE_BOITE *b=new MG_PRIMITIVE_BOITE(id,x1,y1,z1,x2,y2,z2);
488     b->construit();
489     arbre->ajouter_mg_primitive(b);
490     }
491 couturad 723 if (entite=="SPHERE")
492 francois 689 {
493 couturad 723 parse.decode(data.c_str(),"@,@,@,@",param+2);
494     double centre_x=atof((char*)param[2].argument[0].c_str());
495     double centre_y=atof((char*)param[3].argument[0].c_str());
496     double centre_z=atof((char*)param[4].argument[0].c_str());
497     double rayon=atof((char*)param[5].argument[0].c_str());
498     MG_PRIMITIVE_SPHERE *b=new MG_PRIMITIVE_SPHERE(id,centre_x,centre_y,centre_z,rayon);
499     b->construit();
500     arbre->ajouter_mg_primitive(b);
501     }
502     if (entite=="CYLINDRE")
503     {
504     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
505     double extremite_x=atof((char*)param[2].argument[0].c_str());
506     double extremite_y=atof((char*)param[3].argument[0].c_str());
507     double extremite_z=atof((char*)param[4].argument[0].c_str());
508     double longitude=atof((char*)param[5].argument[0].c_str());
509     double latitude=atof((char*)param[6].argument[0].c_str());
510     double rayon=atof((char*)param[7].argument[0].c_str());
511     double longueur=atof((char*)param[8].argument[0].c_str());
512     MG_PRIMITIVE_CYLINDRE *b=new MG_PRIMITIVE_CYLINDRE(id,extremite_x,extremite_y,extremite_z,longitude,latitude,rayon,longueur);
513     b->construit();
514     arbre->ajouter_mg_primitive(b);
515     }
516 couturad 724 if (entite=="TORE")
517     {
518     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
519     double centre_x=atof((char*)param[2].argument[0].c_str());
520     double centre_y=atof((char*)param[3].argument[0].c_str());
521     double centre_z=atof((char*)param[4].argument[0].c_str());
522     double longitude=atof((char*)param[5].argument[0].c_str());
523     double latitude=atof((char*)param[6].argument[0].c_str());
524     double rayon_cercle=atof((char*)param[7].argument[0].c_str());
525     double rayon_tore=atof((char*)param[8].argument[0].c_str());
526     MG_PRIMITIVE_TORE *b=new MG_PRIMITIVE_TORE(id,centre_x,centre_y,centre_z,longitude,latitude,rayon_cercle,rayon_tore);
527     b->construit();
528     arbre->ajouter_mg_primitive(b);
529     }
530     if (entite=="CONE")
531     {
532     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
533     double base_x=atof((char*)param[2].argument[0].c_str());
534     double base_y=atof((char*)param[3].argument[0].c_str());
535     double base_z=atof((char*)param[4].argument[0].c_str());
536     double longitude=atof((char*)param[5].argument[0].c_str());
537     double latitude=atof((char*)param[6].argument[0].c_str());
538     double rayon=atof((char*)param[7].argument[0].c_str());
539     double hauteur=atof((char*)param[8].argument[0].c_str());
540     MG_PRIMITIVE_CONE *b=new MG_PRIMITIVE_CONE(id,base_x,base_y,base_z,longitude,latitude,rayon,hauteur);
541     b->construit();
542     arbre->ajouter_mg_primitive(b);
543     }
544 couturad 723 if (entite=="UNION")
545     {
546 francois 689 parse.decode(data.c_str(),"@,@,@",param+2);
547     int sem=atoi((char*)param[2].argument[0].c_str());
548     long id1=cid((char*)param[3].argument[0].c_str());
549     long id2=cid((char*)param[4].argument[0].c_str());
550     MG_PRIMITIVE *p1=arbre->get_mg_primitiveid(id1);
551     MG_PRIMITIVE *p2=arbre->get_mg_primitiveid(id2);
552     MG_OPERATEUR_BOOLEAN_UNION *op=new MG_OPERATEUR_BOOLEAN_UNION(id,sem,p1,p2);
553     arbre->ajouter_mg_operateur_boolean(op);
554     }
555 couturad 723 if (entite=="DIFFERENCE")
556     {
557     parse.decode(data.c_str(),"@,@,@",param+2);
558     int sem=atoi((char*)param[2].argument[0].c_str());
559     long id1=cid((char*)param[3].argument[0].c_str());
560     long id2=cid((char*)param[4].argument[0].c_str());
561     MG_PRIMITIVE *p1=arbre->get_mg_primitiveid(id1);
562     MG_PRIMITIVE *p2=arbre->get_mg_primitiveid(id2);
563     MG_OPERATEUR_BOOLEAN_DIFFERENCE *op=new MG_OPERATEUR_BOOLEAN_DIFFERENCE(id,sem,p1,p2);
564     arbre->ajouter_mg_operateur_boolean(op);
565     }
566     if (entite=="INTERSECTION")
567     {
568     parse.decode(data.c_str(),"@,@,@",param+2);
569     int sem=atoi((char*)param[2].argument[0].c_str());
570     long id1=cid((char*)param[3].argument[0].c_str());
571     long id2=cid((char*)param[4].argument[0].c_str());
572     MG_PRIMITIVE *p1=arbre->get_mg_primitiveid(id1);
573     MG_PRIMITIVE *p2=arbre->get_mg_primitiveid(id2);
574     MG_OPERATEUR_BOOLEAN_INTERSECTION *op=new MG_OPERATEUR_BOOLEAN_INTERSECTION(id,sem,p1,p2);
575     arbre->ajouter_mg_operateur_boolean(op);
576     }
577 francois 689 if (entite=="PRIM_COMPLEXE")
578     {
579     parse.decode(data.c_str(),"@",param+2);
580     long id1=cid((char*)param[2].argument[0].c_str());
581     MG_OPERATEUR_BOOLEAN *op=arbre->get_mg_operateur_booleanid(id1);
582     MG_PRIMITIVE* p=op->construit(id);
583     arbre->ajouter_mg_primitive(p);
584     }
585    
586    
587    
588    
589     #endif
590 francois 283 if (entite=="GEOMETRIE_EPS")
591     {
592     parse.decode(data.c_str(),"@",param+2);
593     double val=atof((char*)param[2].argument[0].c_str());
594     mggeo->change_valeur_precision(val);
595     }
596     if (entite=="GROUPE_TOPOLOGIQUE")
597     {
598     parse.decode(data.c_str(),"@,(&)",param+2);
599     MG_GROUPE_TOPOLOGIQUE* mggt=new MG_GROUPE_TOPOLOGIQUE(id);
600     mggeo->ajouter_mg_groupe_topologique(mggt);
601     int nb=atoi(param[2].argument[0].c_str());
602     for (int i=0;i<nb;i++)
603     {
604     unsigned long id2=cid(param[3].argument[i].c_str());
605     MG_ELEMENT_TOPOLOGIQUE* ele;
606     ele=mggeo->get_mg_sommetid(id2);
607     if (ele==NULL) ele=mggeo->get_mg_areteid(id2);
608     if (ele==NULL) ele=mggeo->get_mg_faceid(id2);
609     if (ele==NULL) ele=mggeo->get_mg_volumeid(id2);
610     if (ele!=NULL) mggt->ajouter(ele);
611     }
612    
613     }
614 francois 711 if (entite=="GEOM_FONCTION")
615     {
616     parse.decode(data.c_str(),"@,@,(&)",param+2);
617     int dim=atoi((char*)param[2].argument[0].c_str());
618     MG_GEOM_FONCTION *gf=new MG_GEOM_FONCTION(id,dim);
619     mggeo->ajouter_mg_geom_fonction(gf);
620     int nb=atoi(param[3].argument[0].c_str());
621     for (int i=0;i<nb;i++)
622     {
623     parse.decode(param[4].argument[i].c_str(),"(&)",param+5);
624     double *coo=new double[dim];
625     for (int j=0;j<dim;j++)
626     coo[j]=atof(param[5].argument[j].c_str());
627     gf->ajouter_point(coo);
628     delete [] coo;
629     }
630    
631     }
632    
633 francois 283 if (entite=="VOLUME")
634     {
635 francois 763 if (version_fichier<2)
636     {
637     parse.decode(data.c_str(),"@,@,@,@,(&)",param+2);
638 francois 283 MG_VOLUME* mgvol=new MG_VOLUME(param[2].argument[0],id);
639     mggeo->ajouter_mg_volume(mgvol);
640     int nummat=atoi((char*)param[4].argument[0].c_str());
641     mgvol->change_num_materiau(nummat);
642     int nb=atoi(param[5].argument[0].c_str());
643 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,6,parse,param,mgvol);
644     }
645     else
646     {
647     parse.decode(data.c_str(),"@,@,@,(&)",param+2);
648     MG_VOLUME* mgvol=new MG_VOLUME(param[2].argument[0],id);
649     mggeo->ajouter_mg_volume(mgvol);
650     int nb=atoi(param[4].argument[0].c_str());
651     if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,mgvol);
652     }
653     /*{
654 francois 283 for (int i=0;i<nb;i++)
655     {
656     parse.decode(param[6].argument[i].c_str(),"(@,@)",param+7);
657     char nom[3];
658     double val;
659     strcpy(nom,param[7].argument[0].c_str());
660     val=atof(param[8].argument[0].c_str());
661     mgvol->ajouter_ccf(nom,val);
662     }
663 francois 763 }*/
664 francois 283 }
665     if (entite=="COQUE")
666     {
667 francois 794 if (version_fichier<2)
668     {
669     parse.decode(data.c_str(),"@,@,@,@,(&)",param+2);
670 francois 283 MG_COQUE* mgcoq=new MG_COQUE(param[2].argument[0],id);
671     mggeo->ajouter_mg_coque(mgcoq);
672     int nummat=atoi((char*)param[4].argument[0].c_str());
673     mgcoq->change_num_materiau(nummat);
674     int nb=atoi(param[5].argument[0].c_str());
675 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,6,parse,param,mgcoq);
676 francois 794 }
677     else
678     {
679     parse.decode(data.c_str(),"@,@,@,(&)",param+2);
680     MG_COQUE* mgcoq=new MG_COQUE(param[2].argument[0],id);
681     mggeo->ajouter_mg_coque(mgcoq);
682     int nb=atoi(param[4].argument[0].c_str());
683     if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,mgcoq);
684     }
685 francois 763 /*if (nb!=0)
686 francois 283 {
687     for (int i=0;i<nb;i++)
688     {
689     parse.decode(param[6].argument[i].c_str(),"(@,@)",param+7);
690     char nom[3];
691     double val;
692     strcpy(nom,param[7].argument[0].c_str());
693     val=atof(param[8].argument[0].c_str());
694     mgcoq->ajouter_ccf(nom,val);
695     }
696 francois 763 }*/
697 francois 283 }
698     if (entite=="POUTRE")
699     {
700 francois 794 if (version_fichier<2)
701     {
702     parse.decode(data.c_str(),"@,@,@,@,(&)",param+2);
703 francois 283 MG_POUTRE* mgpoutre=new MG_POUTRE(param[2].argument[0],id);
704     mggeo->ajouter_mg_poutre(mgpoutre);
705     int nummat=atoi((char*)param[4].argument[0].c_str());
706     mgpoutre->change_num_materiau(nummat);
707     int nb=atoi(param[5].argument[0].c_str());
708 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,6,parse,param,mgpoutre);
709 francois 794 }
710     else
711     {
712     parse.decode(data.c_str(),"@,@,@,(&)",param+2);
713     MG_POUTRE* mgpou=new MG_POUTRE(param[2].argument[0],id);
714     mggeo->ajouter_mg_poutre(mgpou);
715     int nb=atoi(param[4].argument[0].c_str());
716     if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,mgpou);
717     }
718    
719 francois 763 /*if (nb!=0)
720 francois 283 {
721     for (int i=0;i<nb;i++)
722     {
723     parse.decode(param[6].argument[i].c_str(),"(@,@)",param+7);
724     char nom[3];
725     double val;
726     strcpy(nom,param[7].argument[0].c_str());
727     val=atof(param[8].argument[0].c_str());
728     mgpoutre->ajouter_ccf(nom,val);
729     }
730 francois 763 }*/
731 francois 283 }
732     if (entite=="COQUILLE")
733     {
734     parse.decode(data.c_str(),"@,@",param+2);
735     long ident=cid(param[2].argument[0]);
736     MG_VOLUME* mgvol=mggeo->get_mg_volumeid(ident);
737     MG_COQUE* mgcoq=mggeo->get_mg_coqueid(ident);
738     if (mgvol!=NULL)
739     {
740     MG_COQUILLE* mgcoq=new MG_COQUILLE(id,mgvol);
741     mggeo->ajouter_mg_coquille(mgcoq,mgvol);
742     }
743     if (mgcoq!=NULL)
744     {
745     MG_COQUILLE* mgcoquille=new MG_COQUILLE(id,mgcoq);
746     mggeo->ajouter_mg_coquille(mgcoquille,mgcoq);
747     }
748    
749     }
750     #ifdef BREP_STEP
751     if (entite=="SURFACE_STEP")
752     {
753     parse.decode(data.c_str(),"@",param+2);
754     long idstepsuf=atol(param[2].argument[0].c_str());
755 couturad 740 ST_SURFACE *stsurf=mggeo->get_gest_step().lst_surface.getid(idstepsuf);
756 francois 283 STEP_SURFACE* stepsurf=new STEP_SURFACE(id,stsurf);
757     mggeo->ajouter_mg_surface(stepsurf);
758     }
759     if (entite=="COURBE_STEP")
760     {
761     parse.decode(data.c_str(),"@",param+2);
762     long idstepcur=atol(param[2].argument[0].c_str());
763 couturad 740 ST_COURBE *stcur=mggeo->get_gest_step().lst_courbe.getid(idstepcur);
764 francois 283 STEP_COURBE* stepcur=new STEP_COURBE(id,stcur);
765     mggeo->ajouter_mg_courbe(stepcur);
766     }
767    
768     if (entite=="POINT_STEP")
769     {
770     parse.decode(data.c_str(),"@",param+2);
771     long idsteppt=atol(param[2].argument[0].c_str());
772 couturad 740 ST_POINT *stpt=mggeo->get_gest_step().lst_point.getid(idsteppt);
773 francois 283 STEP_POINT* steppt=new STEP_POINT(id,stpt);
774     mggeo->ajouter_mg_point(steppt);
775     }
776    
777     #endif
778     #ifdef BREP_SAT
779     if (entite=="SURFACE_SAT")
780     {
781     parse.decode(data.c_str(),"@",param+2);
782     long idsatsuf=atol(param[2].argument[0].c_str());
783 couturad 740 SAT_SURFACE *satsurf=mggeo->get_gest_sat().lst_surface.getid(idsatsuf);
784 francois 283 ACIS_SURFACE* acissurf=new ACIS_SURFACE(id,satsurf);
785     mggeo->ajouter_mg_surface(acissurf);
786     }
787     if (entite=="COURBE_SAT")
788     {
789     parse.decode(data.c_str(),"@",param+2);
790     long idsatcur=atol(param[2].argument[0].c_str());
791 couturad 740 SAT_COURBE *satcur=mggeo->get_gest_sat().lst_courbe.getid(idsatcur);
792 francois 283 ACIS_COURBE* aciscur=new ACIS_COURBE(id,satcur);
793     mggeo->ajouter_mg_courbe(aciscur);
794     }
795    
796     if (entite=="POINT_SAT")
797     {
798     parse.decode(data.c_str(),"@",param+2);
799     long idsatpt=atol(param[2].argument[0].c_str());
800 couturad 740 SAT_POINT *satpt=mggeo->get_gest_sat().lst_point.getid(idsatpt);
801 francois 283 ACIS_POINT* acispt=new ACIS_POINT(id,satpt);
802     mggeo->ajouter_mg_point(acispt);
803     }
804    
805     #endif
806    
807     #ifdef BREP_OCC
808    
809     if (entite=="SURFACE_OCC")
810     {
811     parse.decode(data.c_str(),"@",param+2);
812     long idocc=atol(param[2].argument[0].c_str());
813 couturad 740 const TopoDS_Shape& occshape=mggeo->get_occ_fonction().GetShape(idocc);
814 francois 283 TopoDS_Face occface=TopoDS::Face(occshape);
815 couturad 740 OCC_SURFACE* occsurf=new OCC_SURFACE(id,occface,mggeo->get_occ_fonction());
816 francois 283 mggeo->ajouter_mg_surface(occsurf);
817     }
818     if (entite=="COURBE_OCC")
819     {
820     parse.decode(data.c_str(),"@",param+2);
821     long idocc=atol(param[2].argument[0].c_str());
822 couturad 740 const TopoDS_Shape& occshape=mggeo->get_occ_fonction().GetShape(idocc);
823 francois 283 TopoDS_Edge occedge=TopoDS::Edge(occshape);
824 couturad 740 OCC_COURBE* occcrb=new OCC_COURBE(id,occedge, mggeo->get_occ_fonction());
825 francois 283 mggeo->ajouter_mg_courbe(occcrb);
826     }
827     if (entite=="POINT_OCC")
828     {
829     parse.decode(data.c_str(),"@",param+2);
830     long idocc=atol(param[2].argument[0].c_str());
831 couturad 740 const TopoDS_Shape& occshape=mggeo->get_occ_fonction().GetShape(idocc);
832 francois 283 TopoDS_Vertex occvertex=TopoDS::Vertex(occshape);
833 couturad 740 OCC_POINT* occpoint=new OCC_POINT(id,occvertex, mggeo->get_occ_fonction());
834 francois 283 mggeo->ajouter_mg_point(occpoint);
835     }
836     #endif
837     #ifdef WINDOWS_VERSION
838     if (entite=="CAD4FE_POLYCURVE")
839     {
840     CAD4FE::PolyCurve * polycurve = NULL;
841     parse.decode(data.c_str(),"@,(&)",param+2);
842     int nb = atoi(param[2].argument[0].c_str());
843    
844     if (nb == 0)
845     {
846     printf("PolyCurve %d is formed with reference vertex : ", id);
847     parse.decode(param[3].argument[0].c_str(),"@",param+4);
848     int idRefVertex;
849     idRefVertex=cid(param[4].argument[0].c_str());
850     printf("%d ;\n ", idRefVertex);
851     MG_SOMMET * refVertex = mggeo->get_mg_sommetid(idRefVertex);
852     polycurve = new CAD4FE::PolyCurve(refVertex);
853     }
854     else
855     {
856     printf("PolyCurve %d is formed with reference edges : ", id);
857     polycurve = new CAD4FE::PolyCurve;
858     for (int i=0;i<nb;i++)
859     {
860     parse.decode(param[3].argument[i].c_str(),"@",param+4);
861     int idRefEdge;
862     idRefEdge=cid(param[4].argument[0].c_str());
863     printf("%d ; ", idRefEdge);
864     MG_ARETE * refEdge = mggeo->get_mg_areteid(idRefEdge);
865     CAD4FE::PolyCurve tmpPC(refEdge);
866     polycurve->Merge(tmpPC);
867     }
868     printf("\n");
869     }
870    
871     polycurve->change_id(id);
872     mggeo->ajouter_mg_courbe(polycurve);
873     }
874    
875    
876     if (entite=="CAD4FE_POLYSURFACE")
877     {
878     CAD4FE::PolySurface * polysurface = new CAD4FE::PolySurface;
879     polysurface->change_id(id);
880     mggeo->ajouter_mg_surface(polysurface);
881    
882     parse.decode(data.c_str(),"@,(&)",param+2);
883    
884     int nb = atoi(param[2].argument[0].c_str());
885     printf("PolySurface %d is formed with reference faces : ", id);
886     for (int i=0;i<nb;i++)
887     {
888     parse.decode(param[3].argument[i].c_str(),"@",param+4);
889     int idRefFace;
890     idRefFace=cid(param[4].argument[0].c_str());
891     printf("%d ; ", idRefFace);
892    
893     MG_FACE * refFace = mggeo->get_mg_faceid(idRefFace);
894     CAD4FE::PolySurface tmpSF(refFace);
895     polysurface->Merge(tmpSF);
896     }
897    
898     printf("\n");
899     }
900     if (entite=="CAD4FE_MCEDGE")
901     {
902     parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
903    
904     std::string idOriginal = param[2].argument[0];
905     long idPolyCurve=cid(param[3].argument[0]);
906     CAD4FE::PolyCurve * polycurve = (CAD4FE::PolyCurve *) mggeo->get_mg_courbeid(idPolyCurve);
907    
908     // sense is not used because a MCEdge always has
909     // a sense = 1 !
910     // (because polycurve domain is equal to mcEdge domain)
911     CAD4FE::MCEdge * mcEdge = new CAD4FE::MCEdge(idOriginal, polycurve);
912     mcEdge->change_id(id);
913     mggeo->ajouter_mg_arete(mcEdge);
914    
915     int nb=atoi(param[7].argument[0].c_str());
916     if (nb!=0)
917     {
918     for (int i=0;i<nb;i++)
919     {
920     parse.decode(param[8].argument[i].c_str(),"(@,@)",param+9);
921     char nom[3];
922     double val;
923     strcpy(nom,param[9].argument[0].c_str());
924     val=atof(param[10].argument[0].c_str());
925     mcEdge->ajouter_ccf(nom,val);
926     }
927     }
928     }
929     if (entite=="CAD4FE_MCFACE")
930     {
931     parse.decode(data.c_str(),"@,@,@,@,@,(&)",param+2);
932    
933     std::string idOriginal = param[2].argument[0];
934     long idPolySurface=cid(param[3].argument[0]);
935     CAD4FE::PolySurface * polysurface = (CAD4FE::PolySurface *) mggeo->get_mg_surfaceid(idPolySurface);
936    
937     CAD4FE::MCFace * mcFace = new CAD4FE::MCFace(idOriginal, polysurface);
938     mcFace->change_id(id);
939     mggeo->ajouter_mg_face(mcFace);
940    
941     int nb=atoi(param[6].argument[0].c_str());
942     if (nb!=0)
943     {
944     for (int i=0;i<nb;i++)
945     {
946     parse.decode(param[7].argument[i].c_str(),"(@,@)",param+8);
947     char nom[3];
948     double val;
949     strcpy(nom,param[8].argument[0].c_str());
950     val=atof(param[9].argument[0].c_str());
951     mcFace->ajouter_ccf(nom,val);
952     }
953     }
954     }
955     if (entite=="CAD4FE_MCVERTEX")
956     {
957     parse.decode(data.c_str(),"@,@,@,(&),@,(&)",param+2);
958     std::string idOriginal = param[2].argument[0];
959     long idsom=cid(param[3].argument[0]);
960     MG_SOMMET * mgsom = mggeo->get_mg_sommetid(idsom);
961     CAD4FE::MCVertex * mcVertex = new CAD4FE::MCVertex(mgsom);
962     mcVertex->change_id(id);
963     mggeo->ajouter_mg_sommet(mcVertex);
964     int nb_ref_vertex=atoi(param[4].argument[0].c_str());
965     if (nb_ref_vertex!=0)
966     {
967     for (int i=0;i<nb_ref_vertex;i++)
968     {
969     unsigned long idRefVertex=cid(param[5].argument[i]);
970     mcVertex->GetMergedRefVertices()[idRefVertex] = NULL;
971     mapMergedRefVertices.insert(std::make_pair(mcVertex,idRefVertex));
972     }
973     }
974     int nb_ccf=atoi(param[4+2].argument[0].c_str());
975     if (nb_ccf!=0)
976     {
977     for (int i=0;i<nb_ccf;i++)
978     {
979     parse.decode(param[5+2].argument[i].c_str(),"(@,@)",param+6+2);
980     char nom_ccf[3];
981     double val_ccf;
982     strcpy(nom_ccf,param[6+2].argument[0].c_str());
983     val_ccf=atof(param[7+2].argument[0].c_str());
984     mgsom->ajouter_ccf(nom_ccf,val_ccf);
985     }
986     }
987     }
988     #endif
989     if (entite=="FACE")
990     {
991     parse.decode(data.c_str(),"@,@,(@),@,@,(&)",param+2);
992     long idsurf=cid(param[3].argument[0]);
993     int sens=atoi(param[5].argument[0].c_str());
994     MG_SURFACE* mgsurf=mggeo->get_mg_surfaceid(idsurf);
995     MG_FACE* mgface=new MG_FACE(param[2].argument[0],id,mgsurf,sens);
996     mggeo->ajouter_mg_face(mgface);
997     int nb=atoi(param[6].argument[0].c_str());
998 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,7,parse,param,mgface);
999     /*if (nb!=0)
1000 francois 283 {
1001     for (int i=0;i<nb;i++)
1002     {
1003     parse.decode(param[7].argument[i].c_str(),"(@,@)",param+8);
1004     char nom[3];
1005     double val;
1006     strcpy(nom,param[8].argument[0].c_str());
1007     val=atof(param[9].argument[0].c_str());
1008     mgface->ajouter_ccf(nom,val);
1009     }
1010 francois 763 }*/
1011 francois 283 }
1012     if (entite=="COFACE")
1013     {
1014     parse.decode(data.c_str(),"@,@,@",param+2);
1015     long idface=cid(param[2].argument[0]);
1016     long idcoq=cid(param[3].argument[0]);
1017     int sens=atoi(param[4].argument[0].c_str());
1018     MG_FACE* mgface=mggeo->get_mg_faceid(idface);
1019     MG_COQUILLE* mgcoq=mggeo->get_mg_coquilleid(idcoq);
1020     MG_COFACE* mgcoface=mggeo->ajouter_mg_coface(id,mgface,mgcoq,sens);
1021     mgcoq->ajouter_mg_coface(mgcoface);
1022     }
1023     if (entite=="BOUCLE")
1024     {
1025     parse.decode(data.c_str(),"@,(@)",param+2);
1026     long ident=cid(param[2].argument[0]);
1027     MG_FACE* mgface=mggeo->get_mg_faceid(ident);
1028     MG_POUTRE* mgpoutre=mggeo->get_mg_poutreid(ident);
1029     if (mgface!=NULL)
1030     {
1031     MG_BOUCLE* mgbou=new MG_BOUCLE(id,mgface);
1032     mggeo->ajouter_mg_boucle(mgbou,mgface);
1033     }
1034     if (mgpoutre!=NULL)
1035     {
1036     MG_BOUCLE* mgbou=new MG_BOUCLE(id,mgpoutre);
1037     mggeo->ajouter_mg_boucle(mgbou,mgpoutre);
1038     }
1039     }
1040     if (entite=="POINT")
1041     {
1042     parse.decode(data.c_str(),"@,@,@",param+2);
1043     double xyz[3];
1044     xyz[0]=atof(param[2].argument[0].c_str());
1045     xyz[1]=atof(param[3].argument[0].c_str());
1046     xyz[2]=atof(param[4].argument[0].c_str());
1047     LC_POINT* point=new LC_POINT(id,xyz);
1048     mggeo->ajouter_mg_point(point);
1049     }
1050     if (entite=="SOMMET")
1051     {
1052     parse.decode(data.c_str(),"@,@,@,(&)",param+2);
1053     long idpoint=cid(param[3].argument[0]);
1054     MG_POINT* mgpt=mggeo->get_mg_pointid(idpoint);
1055     MG_SOMMET* mgsom=new MG_SOMMET(param[2].argument[0],id,mgpt);
1056     mggeo->ajouter_mg_sommet(mgsom);
1057     int nb=atoi(param[4].argument[0].c_str());
1058 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,mgsom);
1059     /*if (nb!=0)
1060 francois 283 {
1061     for (int i=0;i<nb;i++)
1062     {
1063     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1064     char nom[3];
1065     double val;
1066     strcpy(nom,param[6].argument[0].c_str());
1067     val=atof(param[7].argument[0].c_str());
1068     mgsom->ajouter_ccf(nom,val);
1069     }
1070 francois 763 }*/
1071 francois 283 }
1072 francois 576 if (entite=="ARETE_ELEMENT")
1073     {
1074     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
1075     MG_ARETE_ELEMENT* are=new MG_ARETE_ELEMENT(id);
1076     mggeo->ajouter_mg_arete(are);
1077     int nb=atoi(param[4].argument[0].c_str());
1078 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,are);
1079     /* if (nb!=0)
1080 francois 576 {
1081     for (int i=0;i<nb;i++)
1082     {
1083     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1084     char nom[3];
1085     double val;
1086     strcpy(nom,param[6].argument[0].c_str());
1087     val=atof(param[7].argument[0].c_str());
1088     are->ajouter_ccf(nom,val);
1089     }
1090 francois 763 }*/
1091 francois 576 }
1092     if (entite=="FACE_ELEMENT")
1093     {
1094     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
1095     MG_FACE_ELEMENT* face=new MG_FACE_ELEMENT(id);
1096     mggeo->ajouter_mg_face(face);
1097     int nb=atoi(param[4].argument[0].c_str());
1098 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,face);
1099     /*if (nb!=0)
1100 francois 576 {
1101     for (int i=0;i<nb;i++)
1102     {
1103     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1104     char nom[3];
1105     double val;
1106     strcpy(nom,param[6].argument[0].c_str());
1107     val=atof(param[7].argument[0].c_str());
1108     face->ajouter_ccf(nom,val);
1109     }
1110 francois 763 }*/
1111 francois 576 }
1112 francois 685 if (entite=="COQUE_ELEMENT")
1113     {
1114     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
1115     MG_COQUE_ELEMENT* coq=new MG_COQUE_ELEMENT(id);
1116     mggeo->ajouter_mg_coque(coq);
1117     int nbele=atoi(param[2].argument[0].c_str());
1118     for (int i=0;i<nbele;i++)
1119     {
1120     unsigned long idele=cid(param[3].argument[i].c_str());
1121     coq->ajouter_element(idele);
1122     }
1123     int nb=atoi(param[4].argument[0].c_str());
1124 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,coq);
1125     /* if (nb!=0)
1126 francois 685 {
1127     for (int i=0;i<nb;i++)
1128     {
1129     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1130     char nom[3];
1131     double val;
1132     strcpy(nom,param[6].argument[0].c_str());
1133     val=atof(param[7].argument[0].c_str());
1134     coq->ajouter_ccf(nom,val);
1135     }
1136 francois 763 }*/
1137 francois 685 }
1138 francois 753 if (entite=="POUTRE_ELEMENT")
1139 francois 576 {
1140     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
1141 francois 753 MG_POUTRE_ELEMENT* pou=new MG_POUTRE_ELEMENT(id);
1142     mggeo->ajouter_mg_poutre(pou);
1143     int nbele=atoi(param[2].argument[0].c_str());
1144     for (int i=0;i<nbele;i++)
1145     {
1146     unsigned long idele=cid(param[3].argument[i].c_str());
1147     pou->ajouter_element(idele);
1148     }
1149     int nb=atoi(param[4].argument[0].c_str());
1150 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,pou);
1151     /*if (nb!=0)
1152 francois 753 {
1153     for (int i=0;i<nb;i++)
1154     {
1155     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1156     char nom[3];
1157     double val;
1158     strcpy(nom,param[6].argument[0].c_str());
1159     val=atof(param[7].argument[0].c_str());
1160     pou->ajouter_ccf(nom,val);
1161     }
1162 francois 763 }*/
1163 francois 753 }
1164     if (entite=="VOLUME_ELEMENT")
1165     {
1166     parse.decode(data.c_str(),"@,(&),@,(&)",param+2);
1167 francois 576 MG_VOLUME_ELEMENT* vol=new MG_VOLUME_ELEMENT(id);
1168     mggeo->ajouter_mg_volume(vol);
1169     int nb=atoi(param[4].argument[0].c_str());
1170 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,5,parse,param,vol);
1171     /* if (nb!=0)
1172 francois 576 {
1173     for (int i=0;i<nb;i++)
1174     {
1175     parse.decode(param[5].argument[i].c_str(),"(@,@)",param+6);
1176     char nom[3];
1177     double val;
1178     strcpy(nom,param[6].argument[0].c_str());
1179     val=atof(param[7].argument[0].c_str());
1180     vol->ajouter_ccf(nom,val);
1181     }
1182 francois 763 }*/
1183 francois 576 }
1184 francois 526 if (entite=="SOMMET_NOEUD")
1185     {
1186     parse.decode(data.c_str(),"@,@,(&)",param+2);
1187     long idnoeud=cid(param[2].argument[0]);
1188     MG_SOMMET_NOEUD* mgsom=new MG_SOMMET_NOEUD(id,idnoeud);
1189     mggeo->ajouter_mg_sommet(mgsom);
1190     int nb=atoi(param[3].argument[0].c_str());
1191 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,4,parse,param,mgsom);
1192     /*if (nb!=0)
1193 francois 526 {
1194     for (int i=0;i<nb;i++)
1195     {
1196     parse.decode(param[4].argument[i].c_str(),"(@,@)",param+5);
1197     char nom[3];
1198     double val;
1199     strcpy(nom,param[5].argument[0].c_str());
1200     val=atof(param[6].argument[0].c_str());
1201     mgsom->ajouter_ccf(nom,val);
1202     }
1203 francois 763 }*/
1204 francois 526 }
1205 francois 283 if (entite=="ARETE")
1206     {
1207     parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
1208     long idcur=cid(param[3].argument[0]);
1209     int sens=atoi(param[6].argument[0].c_str());
1210     MG_COURBE* mgcur=mggeo->get_mg_courbeid(idcur);
1211     MG_ARETE* mgarete=new MG_ARETE(param[2].argument[0],id,mgcur,sens);
1212     mggeo->ajouter_mg_arete(mgarete);
1213     int nb=atoi(param[7].argument[0].c_str());
1214 francois 763 if (nb!=0) lire_ccf(version_fichier,nb,8,parse,param,mgarete);
1215     /*if (nb!=0)
1216 francois 283 {
1217     for (int i=0;i<nb;i++)
1218     {
1219     parse.decode(param[8].argument[i].c_str(),"(@,@)",param+9);
1220     char nom[3];
1221     double val;
1222     strcpy(nom,param[9].argument[0].c_str());
1223     val=atof(param[10].argument[0].c_str());
1224     mgarete->ajouter_ccf(nom,val);
1225     }
1226 francois 763 }*/
1227 francois 283 }
1228     if (entite=="COSOMMET")
1229     {
1230     parse.decode(data.c_str(),"@,@,@",param+2);
1231     long idsom=cid(param[2].argument[0]);
1232     long idarete=cid(param[3].argument[0]);
1233     int num=atoi(param[4].argument[0].c_str());
1234     MG_SOMMET* mgsom=mggeo->get_mg_sommetid(idsom);
1235     MG_ARETE* mgarete=mggeo->get_mg_areteid(idarete);
1236     MG_COSOMMET* mgcosom=mggeo->ajouter_mg_cosommet(id,mgarete,mgsom);
1237     if (num==1) mgarete->changer_cosommet1(mgcosom);
1238     if (num==2) mgarete->changer_cosommet2(mgcosom);
1239     }
1240     if (entite=="COARETE")
1241     {
1242     parse.decode(data.c_str(),"@,@,@",param+2);
1243     long idarete=cid(param[2].argument[0]);
1244     long idboucle=cid(param[3].argument[0]);
1245     int sens=atoi(param[4].argument[0].c_str());
1246     MG_ARETE* mgarete=mggeo->get_mg_areteid(idarete);
1247     MG_BOUCLE* mgboucle=mggeo->get_mg_boucleid(idboucle);
1248     MG_COARETE* mgcoarete=mggeo->ajouter_mg_coarete(id,mgarete,mgboucle,sens);
1249     mgboucle->ajouter_mg_coarete(mgcoarete);
1250     }
1251     if (entite=="VISU_COURBE")
1252     {
1253     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
1254     double xyz1[3];
1255     double xyz2[3];
1256     xyz1[0]=atof(param[2].argument[0].c_str());
1257     xyz1[1]=atof(param[3].argument[0].c_str());
1258     xyz1[2]=atof(param[4].argument[0].c_str());
1259     xyz2[0]=atof(param[5].argument[0].c_str());
1260     xyz2[1]=atof(param[6].argument[0].c_str());
1261     xyz2[2]=atof(param[7].argument[0].c_str());
1262     MG_VISU_COURBE* mgcrb=new MG_VISU_COURBE(id,xyz1,xyz2);
1263     mggeo->ajouter_mg_visu_courbe(mgcrb);
1264     }
1265     if (entite=="MAILLAGE")
1266     {
1267     parse.decode(data.c_str(),"@",param+2);
1268     long idgeo=cid(param[2].argument[0]);
1269 francois 626 mggeo=get_mg_geometrieid(idgeo);
1270 francois 283 mgmai=new MG_MAILLAGE(id,mggeo);
1271     ajouter_mg_maillage(mgmai);
1272     }
1273 francois 465 if (entite=="MAILLAGE_STRUCTURE")
1274     {
1275     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
1276     long idgeo=cid(param[2].argument[0]);
1277 francois 626 mggeo=get_mg_geometrieid(idgeo);
1278 francois 465 mgmai=new MG_MAILLAGE(id,mggeo);
1279     ajouter_mg_maillage(mgmai);
1280     double xmin=atof(param[3].argument[0].c_str());
1281     double ymin=atof(param[4].argument[0].c_str());
1282     double zmin=atof(param[5].argument[0].c_str());
1283     double xmax=atof(param[6].argument[0].c_str());
1284     double ymax=atof(param[7].argument[0].c_str());
1285     double zmax=atof(param[8].argument[0].c_str());
1286     int nx=atoi(param[9].argument[0].c_str());
1287     int ny=atoi(param[10].argument[0].c_str());
1288     int nz=atoi(param[11].argument[0].c_str());
1289     BOITE_3D b(xmin,ymin,zmin,xmax,ymax,zmax);
1290     mgmai->change_param_structure(b,nx,ny,nz);
1291     }
1292 francois 283 if (entite=="FEM_MAILLAGE")
1293     {
1294     parse.decode(data.c_str(),"@,@,@",param+2);
1295     int degre=atoi(param[2].argument[0].c_str());
1296     long idmai=cid(param[3].argument[0]);
1297     long idgeo=cid(param[4].argument[0]);
1298 francois 626 mggeo=get_mg_geometrieid(idgeo);
1299     mgmai=get_mg_maillageid(idmai);
1300 francois 283 femmai=new FEM_MAILLAGE(id,mggeo,mgmai,degre);
1301     ajouter_fem_maillage(femmai);
1302     }
1303 francois 465 if (entite=="FEM_MAILLAGE_STRUCTURE")
1304     {
1305     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@,@,@",param+2);
1306     int degre=atoi(param[2].argument[0].c_str());
1307     long idmai=cid(param[3].argument[0]);
1308     long idgeo=cid(param[4].argument[0]);
1309 francois 626 mggeo=get_mg_geometrieid(idgeo);
1310     mgmai=get_mg_maillageid(idmai);
1311 francois 465 femmai=new FEM_MAILLAGE(id,mggeo,mgmai,degre);
1312     ajouter_fem_maillage(femmai);
1313     double xmin=atof(param[5].argument[0].c_str());
1314     double ymin=atof(param[6].argument[0].c_str());
1315     double zmin=atof(param[7].argument[0].c_str());
1316     double xmax=atof(param[8].argument[0].c_str());
1317     double ymax=atof(param[9].argument[0].c_str());
1318     double zmax=atof(param[10].argument[0].c_str());
1319     int nx=atoi(param[11].argument[0].c_str());
1320     int ny=atoi(param[12].argument[0].c_str());
1321     int nz=atoi(param[13].argument[0].c_str());
1322     BOITE_3D b(xmin,ymin,zmin,xmax,ymax,zmax);
1323     femmai->change_param_structure(b,nx,ny,nz);
1324     }
1325 francois 551 if (entite=="NOEUD") lire_NOEUD(id,parse,param,data,mgmai,mggeo);
1326 francois 283 if (entite=="FEM_NOEUD")
1327     {
1328     parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
1329     long idtopo=cid(param[2].argument[0]);
1330     long idmai=cid(param[3].argument[0]);
1331     double x=atof(param[4].argument[0].c_str());
1332     double y=atof(param[5].argument[0].c_str());
1333     double z=atof(param[6].argument[0].c_str());
1334     int num=atoi(param[7].argument[0].c_str());
1335     int numopt=atoi(param[8].argument[0].c_str());
1336     MG_ELEMENT_MAILLAGE* elmai;
1337     if (idmai>-1)
1338     {
1339     elmai=mgmai->get_mg_noeudid(idmai);
1340     if (elmai==NULL) elmai=mgmai->get_mg_segmentid(idmai);
1341     if (elmai==NULL) elmai=mgmai->get_mg_triangleid(idmai);
1342     if (elmai==NULL) elmai=mgmai->get_mg_tetraid(idmai);
1343     }
1344     else elmai=NULL;
1345     FEM_NOEUD* noeud;
1346     if (elmai!=NULL) noeud=new FEM_NOEUD(id,elmai,x,y,z);
1347     else
1348     {
1349     MG_ELEMENT_TOPOLOGIQUE* topo;
1350     if (idtopo>-1)
1351     {
1352     topo=mggeo->get_mg_sommetid(idtopo);
1353     if (topo==NULL) topo=mggeo->get_mg_areteid(idtopo);
1354     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
1355     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
1356     }
1357     else topo=NULL;
1358     noeud=new FEM_NOEUD(id,topo,x,y,z);
1359     }
1360     noeud->change_numero(num);
1361     noeud->change_numero_opt(numopt);
1362     femmai->ajouter_fem_noeud(noeud);
1363     }
1364     if (entite=="FEM_NOEUD_DEF")
1365     {
1366     parse.decode(data.c_str(),"@,@,@",param+2);
1367     double x=atof(param[2].argument[0].c_str());
1368     double y=atof(param[3].argument[0].c_str());
1369     double z=atof(param[4].argument[0].c_str());
1370     FEM_NOEUD* noeud=femmai->get_fem_noeudid(id);
1371     noeud->change_dx(x);
1372     noeud->change_dy(y);
1373     noeud->change_dz(z);
1374     femmai->active_deforme();
1375     }
1376 francois 325 if (entite=="FEM_NOEUD_REAC")
1377     {
1378     parse.decode(data.c_str(),"@,@,@",param+2);
1379     double x=atof(param[2].argument[0].c_str());
1380     double y=atof(param[3].argument[0].c_str());
1381     double z=atof(param[4].argument[0].c_str());
1382     FEM_NOEUD* noeud=femmai->get_fem_noeudid(id);
1383     noeud->change_rx(x);
1384     noeud->change_ry(y);
1385     noeud->change_rz(z);
1386 francois 339 femmai->active_reaction();;
1387 francois 325 }
1388 francois 551 if (entite=="SEGMENT") lire_SEGMENT(id,parse,param,data,mgmai,mggeo);
1389 francois 399 if (entite=="FEM_ELEMENT_NOEUD")
1390     {
1391     parse.decode(data.c_str(),"@,@,@",param+2);
1392     long idtopo=cid(param[2].argument[0]);
1393     long idmai=cid(param[3].argument[0]);
1394     long idn1=cid(param[4].argument[0]);
1395     FEM_NOEUD* tab[1];
1396     tab[0]=femmai->get_fem_noeudid(idn1);
1397     MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1398     if (idtopo>-1)
1399     topo=mggeo->get_mg_sommetid(idtopo);
1400     MG_ELEMENT_MAILLAGE* elmai;
1401     if (idmai>-1)
1402     elmai=mgmai->get_mg_noeudid(idmai);
1403     else elmai=NULL;
1404     FEM_ELEMENT0* fem=new FEM_ELEMENT0(id,topo,elmai,tab);
1405     femmai->ajouter_fem_element0(fem);
1406     }
1407 francois 283 if (entite=="FEM_SEGMENT2")
1408     {
1409     parse.decode(data.c_str(),"@,@,@,@",param+2);
1410 francois 378 long idtopo=cid(param[2].argument[0]);
1411 francois 283 long idmai=cid(param[3].argument[0]);
1412     long idn1=cid(param[4].argument[0]);
1413     long idn2=cid(param[5].argument[0]);
1414     FEM_NOEUD* tab[2];
1415     tab[0]=femmai->get_fem_noeudid(idn1);
1416     tab[1]=femmai->get_fem_noeudid(idn2);
1417 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1418     if (idtopo>-1)
1419     topo=mggeo->get_mg_areteid(idtopo);
1420 francois 767 if (topo==NULL) topo=mggeo->get_mg_poutreid(idtopo);
1421 francois 378 MG_ELEMENT_MAILLAGE* elmai;
1422 francois 283 if (idmai>-1)
1423     elmai=mgmai->get_mg_segmentid(idmai);
1424     else elmai=NULL;
1425 francois 378 FEM_SEGMENT2* seg=new FEM_SEGMENT2(id,topo,elmai,tab);
1426 francois 309 femmai->ajouter_fem_element1(seg);
1427 francois 283 }
1428 francois 767 if (entite=="FEM_MINI_SEGMENT2")
1429     {
1430     parse.decode(data.c_str(),"@,@",param+2);
1431     long idn1=cid(param[2].argument[0]);
1432     long idn2=cid(param[3].argument[0]);
1433     FEM_NOEUD* tab[2];
1434     tab[0]=femmai->get_fem_noeudid(idn1);
1435     tab[1]=femmai->get_fem_noeudid(idn2);
1436     MG_SEGMENT* mseg=femmai->get_mg_maillage()->get_mg_segment(tab[0]->get_mg_element_maillage()->get_id(),tab[1]->get_mg_element_maillage()->get_id());
1437     FEM_MINI_SEGMENT2* seg=new FEM_MINI_SEGMENT2(id,mseg,tab);
1438     femmai->ajouter_fem_element1(seg);
1439     }
1440 francois 283 if (entite=="FEM_SEGMENT3")
1441     {
1442     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1443 francois 378 long idtopo=cid(param[2].argument[0]);
1444     long idmai=cid(param[3].argument[0]);
1445 francois 283 long idn1=cid(param[4].argument[0]);
1446     long idn2=cid(param[5].argument[0]);
1447     long idn3=cid(param[6].argument[0]);
1448     FEM_NOEUD* tab[3];
1449     tab[0]=femmai->get_fem_noeudid(idn1);
1450     tab[1]=femmai->get_fem_noeudid(idn2);
1451     tab[2]=femmai->get_fem_noeudid(idn3);
1452     MG_ELEMENT_MAILLAGE* elmai;
1453 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1454     if (idtopo>-1)
1455     topo=mggeo->get_mg_areteid(idtopo);
1456     if (idmai>-1)
1457 francois 283 elmai=mgmai->get_mg_segmentid(idmai);
1458     else elmai=NULL;
1459 francois 378 FEM_SEGMENT3* seg=new FEM_SEGMENT3(id,topo,elmai,tab);
1460 francois 309 femmai->ajouter_fem_element1(seg);
1461 francois 283 }
1462 francois 551 if (entite=="TRIANGLE") lire_TRIANGLE(id,parse,param,data,mgmai,mggeo);
1463     if (entite=="QUADRANGLE") lire_QUADRANGLE(id,parse,param,data,mgmai,mggeo);
1464 francois 283 if (entite=="FEM_TRIANGLE3")
1465     {
1466     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1467 francois 378 long idtopo=cid(param[2].argument[0]);
1468 francois 283 long idmai=cid(param[3].argument[0]);
1469     long idn1=cid(param[4].argument[0]);
1470     long idn2=cid(param[5].argument[0]);
1471     long idn3=cid(param[6].argument[0]);
1472     FEM_NOEUD* tab[3];
1473     tab[0]=femmai->get_fem_noeudid(idn1);
1474     tab[1]=femmai->get_fem_noeudid(idn2);
1475     tab[2]=femmai->get_fem_noeudid(idn3);
1476     MG_ELEMENT_MAILLAGE* elmai;
1477     if (idmai>-1)
1478     elmai=mgmai->get_mg_triangleid(idmai);
1479     else elmai=NULL;
1480 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1481     if (idtopo>-1)
1482 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1483 francois 378 FEM_TRIANGLE3* tri=new FEM_TRIANGLE3(id,topo,elmai,tab);
1484 francois 309 femmai->ajouter_fem_element2(tri);
1485 francois 283 }
1486     if (entite=="FEM_TRIANGLE6")
1487     {
1488     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@",param+2);
1489 francois 378 long idtopo=cid(param[2].argument[0]);
1490 francois 283 long idmai=cid(param[3].argument[0]);
1491     long idn1=cid(param[4].argument[0]);
1492     long idn2=cid(param[5].argument[0]);
1493     long idn3=cid(param[6].argument[0]);
1494     long idn4=cid(param[7].argument[0]);
1495     long idn5=cid(param[8].argument[0]);
1496     long idn6=cid(param[9].argument[0]);
1497     FEM_NOEUD* tab[6];
1498     tab[0]=femmai->get_fem_noeudid(idn1);
1499     tab[1]=femmai->get_fem_noeudid(idn2);
1500     tab[2]=femmai->get_fem_noeudid(idn3);
1501     tab[3]=femmai->get_fem_noeudid(idn4);
1502     tab[4]=femmai->get_fem_noeudid(idn5);
1503     tab[5]=femmai->get_fem_noeudid(idn6);
1504     MG_ELEMENT_MAILLAGE* elmai;
1505     if (idmai>-1)
1506     elmai=mgmai->get_mg_triangleid(idmai);
1507     else elmai=NULL;
1508 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1509     if (idtopo>-1)
1510 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1511 francois 378 FEM_TRIANGLE6* tri=new FEM_TRIANGLE6(id,topo,elmai,tab);
1512 francois 309 femmai->ajouter_fem_element2(tri);
1513 francois 283 }
1514 francois 310 if (entite=="FEM_QUADRANGLE4")
1515     {
1516     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
1517 francois 378 long idtopo=cid(param[2].argument[0]);
1518     long idmai=cid(param[3].argument[0]);
1519 francois 310 long idn1=cid(param[4].argument[0]);
1520     long idn2=cid(param[5].argument[0]);
1521     long idn3=cid(param[6].argument[0]);
1522     long idn4=cid(param[7].argument[0]);
1523     FEM_NOEUD* tab[4];
1524     tab[0]=femmai->get_fem_noeudid(idn1);
1525     tab[1]=femmai->get_fem_noeudid(idn2);
1526     tab[2]=femmai->get_fem_noeudid(idn3);
1527     tab[3]=femmai->get_fem_noeudid(idn4);
1528     MG_ELEMENT_MAILLAGE* elmai;
1529     if (idmai>-1)
1530     elmai=mgmai->get_mg_quadrangleid(idmai);
1531     else elmai=NULL;
1532 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1533     if (idtopo>-1)
1534 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1535 francois 378 FEM_QUADRANGLE4* quad=new FEM_QUADRANGLE4(id,topo,elmai,tab);
1536 francois 310 femmai->ajouter_fem_element2(quad);
1537     }
1538     if (entite=="FEM_QUADRANGLE8")
1539     {
1540     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
1541 francois 378 long idtopo=cid(param[2].argument[0]);
1542     long idmai=cid(param[3].argument[0]);
1543 francois 310 long idn1=cid(param[4].argument[0]);
1544     long idn2=cid(param[5].argument[0]);
1545     long idn3=cid(param[6].argument[0]);
1546     long idn4=cid(param[7].argument[0]);
1547     long idn5=cid(param[8].argument[0]);
1548     long idn6=cid(param[9].argument[0]);
1549     long idn7=cid(param[10].argument[0]);
1550     long idn8=cid(param[11].argument[0]);
1551     FEM_NOEUD* tab[8];
1552     tab[0]=femmai->get_fem_noeudid(idn1);
1553     tab[1]=femmai->get_fem_noeudid(idn2);
1554     tab[2]=femmai->get_fem_noeudid(idn3);
1555     tab[3]=femmai->get_fem_noeudid(idn4);
1556     tab[4]=femmai->get_fem_noeudid(idn5);
1557     tab[5]=femmai->get_fem_noeudid(idn6);
1558     tab[6]=femmai->get_fem_noeudid(idn7);
1559     tab[7]=femmai->get_fem_noeudid(idn8);
1560     MG_ELEMENT_MAILLAGE* elmai;
1561     if (idmai>-1)
1562     elmai=mgmai->get_mg_quadrangleid(idmai);
1563     else elmai=NULL;
1564 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1565     if (idtopo>-1)
1566 francois 383 topo=mggeo->get_mg_faceid(idtopo);
1567 francois 378 FEM_QUADRANGLE8* quad=new FEM_QUADRANGLE8(id,topo,elmai,tab);
1568 francois 310 femmai->ajouter_fem_element2(quad);
1569     }
1570 francois 551 if (entite=="TETRAEDRE") lire_TETRA(id,parse,param,data,mgmai,mggeo);
1571    
1572     if (entite=="HEXAEDRE") lire_HEXA(id,parse,param,data,mgmai,mggeo);
1573 francois 283 if (entite=="FEM_TETRA4")
1574     {
1575 francois 339 parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
1576 francois 378 long idtopo=cid(param[2].argument[0]);
1577     long idmai=cid(param[3].argument[0]);
1578 francois 283 long idn1=cid(param[4].argument[0]);
1579     long idn2=cid(param[5].argument[0]);
1580     long idn3=cid(param[6].argument[0]);
1581     long idn4=cid(param[7].argument[0]);
1582 francois 339 long etat=atoi(param[8].argument[0].c_str());
1583 francois 283 FEM_NOEUD* tab[4];
1584     tab[0]=femmai->get_fem_noeudid(idn1);
1585     tab[1]=femmai->get_fem_noeudid(idn2);
1586     tab[2]=femmai->get_fem_noeudid(idn3);
1587     tab[3]=femmai->get_fem_noeudid(idn4);
1588     MG_ELEMENT_MAILLAGE* elmai;
1589     if (idmai>-1)
1590     elmai=mgmai->get_mg_tetraid(idmai);
1591     else elmai=NULL;
1592 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1593     if (idtopo>-1)
1594 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1595 francois 378 FEM_TETRA4* tet=new FEM_TETRA4(id,topo,elmai,tab);
1596 francois 410 tet->change_etat(0,etat);
1597 francois 309 femmai->ajouter_fem_element3(tet);
1598 francois 283 }
1599 francois 399 if (entite=="XFEM_ELEMENT_NOEUD")
1600 francois 339 {
1601 francois 380 parse.decode(data.c_str(),"@,@,@,@",param+2);
1602 francois 399 unsigned long idele=cid(param[2].argument[0]);
1603     unsigned long idtopo=cid(param[3].argument[0]);
1604     unsigned long idn1=cid(param[4].argument[0]);
1605 francois 380 int etat=atoi(param[5].argument[0].c_str());
1606 francois 399 MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_sommetid(idtopo);
1607     FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element0id(idele);
1608     if (mai==NULL) mai=femmai->get_fem_element1id(idele);
1609     if (mai==NULL) mai=femmai->get_fem_element2id(idele);
1610     if (mai==NULL) mai=femmai->get_fem_element3id(idele);
1611 francois 380 FEM_NOEUD* tab[4];
1612     tab[0]=femmai->get_fem_noeudid(idn1);
1613 francois 399 XFEM_ELEMENT0* xele=new XFEM_ELEMENT0(id,mai,topo,tab);
1614     femmai->ajouter_xfem_element0(xele);
1615     xele->change_etat(etat);
1616     }
1617     if (entite=="XFEM_SEGMENT2")
1618     {
1619     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1620     unsigned long idele=cid(param[2].argument[0]);
1621     unsigned long idtopo=cid(param[3].argument[0]);
1622     unsigned long idn1=cid(param[4].argument[0]);
1623     unsigned long idn2=cid(param[5].argument[0]);
1624     int etat=atoi(param[6].argument[0].c_str());
1625     FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element1id(idele);
1626     if (mai==NULL) mai=femmai->get_fem_element2id(idele);
1627     if (mai==NULL) mai=femmai->get_fem_element3id(idele);
1628     MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_areteid(idtopo);
1629     FEM_NOEUD* tab[4];
1630     tab[0]=femmai->get_fem_noeudid(idn1);
1631 francois 380 tab[1]=femmai->get_fem_noeudid(idn2);
1632 francois 399 XFEM_SEGMENT2* xseg=new XFEM_SEGMENT2(id,mai,topo,tab);
1633 francois 380 femmai->ajouter_xfem_element1(xseg);
1634 francois 399 xseg->change_etat(etat);
1635 francois 380 }
1636 francois 410 if (entite=="XFEM_TRIANGLE3")
1637     {
1638     parse.decode(data.c_str(),"@,@,@,@,@,@",param+2);
1639     unsigned long idtet=cid(param[2].argument[0]);
1640     unsigned long idtopo=cid(param[3].argument[0]);
1641     unsigned long idn1=cid(param[4].argument[0]);
1642     unsigned long idn2=cid(param[5].argument[0]);
1643     unsigned long idn3=cid(param[6].argument[0]);
1644     int etat=atoi(param[7].argument[0].c_str());
1645     FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element3id(idtet);
1646     MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_volumeid(idtopo);
1647     FEM_NOEUD* tab[3];
1648     tab[0]=femmai->get_fem_noeudid(idn1);
1649     tab[1]=femmai->get_fem_noeudid(idn2);
1650     tab[2]=femmai->get_fem_noeudid(idn3);
1651     XFEM_TRIANGLE3* xtri=new XFEM_TRIANGLE3(id,mai,topo,tab);
1652     femmai->ajouter_xfem_element2(xtri);
1653     xtri->change_etat(etat);
1654     }
1655 francois 380 if (entite=="XFEM_TETRA4")
1656     {
1657 francois 399 parse.decode(data.c_str(),"@,@,@,@,@,@,@",param+2);
1658 francois 339 unsigned long idtet=cid(param[2].argument[0]);
1659 francois 399 unsigned long idtopo=cid(param[3].argument[0]);
1660     unsigned long idn1=cid(param[4].argument[0]);
1661     unsigned long idn2=cid(param[5].argument[0]);
1662     unsigned long idn3=cid(param[6].argument[0]);
1663     unsigned long idn4=cid(param[7].argument[0]);
1664     int etat=atoi(param[8].argument[0].c_str());
1665 francois 408 FEM_ELEMENT_MAILLAGE* mai=femmai->get_fem_element3id(idtet);
1666 francois 399 MG_ELEMENT_TOPOLOGIQUE* topo=mggeo->get_mg_volumeid(idtopo);
1667     FEM_NOEUD* tab[4];
1668 francois 378 tab[0]=femmai->get_fem_noeudid(idn1);
1669     tab[1]=femmai->get_fem_noeudid(idn2);
1670     tab[2]=femmai->get_fem_noeudid(idn3);
1671     tab[3]=femmai->get_fem_noeudid(idn4);
1672 francois 399 XFEM_TETRA4* xtet=new XFEM_TETRA4(id,mai,topo,tab);
1673 francois 339 femmai->ajouter_xfem_element3(xtet);
1674 francois 383 xtet->change_etat(etat);
1675 francois 339 }
1676 francois 283 if (entite=="FEM_TETRA10")
1677     {
1678     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@,@,@",param+2);
1679 francois 378 long idtopo=cid(param[2].argument[0]);
1680     long idmai=cid(param[3].argument[0]);
1681 francois 283 long idn1=cid(param[4].argument[0]);
1682     long idn2=cid(param[5].argument[0]);
1683     long idn3=cid(param[6].argument[0]);
1684     long idn4=cid(param[7].argument[0]);
1685     long idn5=cid(param[8].argument[0]);
1686     long idn6=cid(param[9].argument[0]);
1687     long idn7=cid(param[10].argument[0]);
1688     long idn8=cid(param[11].argument[0]);
1689     long idn9=cid(param[12].argument[0]);
1690     long idn10=cid(param[13].argument[0]);
1691     FEM_NOEUD* tab[10];
1692     tab[0]=femmai->get_fem_noeudid(idn1);
1693     tab[1]=femmai->get_fem_noeudid(idn2);
1694     tab[2]=femmai->get_fem_noeudid(idn3);
1695     tab[3]=femmai->get_fem_noeudid(idn4);
1696     tab[4]=femmai->get_fem_noeudid(idn5);
1697     tab[5]=femmai->get_fem_noeudid(idn6);
1698     tab[6]=femmai->get_fem_noeudid(idn7);
1699     tab[7]=femmai->get_fem_noeudid(idn8);
1700     tab[8]=femmai->get_fem_noeudid(idn9);
1701     tab[9]=femmai->get_fem_noeudid(idn10);
1702     MG_ELEMENT_MAILLAGE* elmai;
1703     if (idmai>-1)
1704     elmai=mgmai->get_mg_tetraid(idmai);
1705     else elmai=NULL;
1706 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1707     if (idtopo>-1)
1708 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1709 francois 378 FEM_TETRA10* tet=new FEM_TETRA10(id,topo,elmai,tab);
1710 francois 309 femmai->ajouter_fem_element3(tet);
1711 francois 283 }
1712 francois 310 if (entite=="FEM_HEXA8")
1713     {
1714     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@",param+2);
1715 francois 378 long idtopo=cid(param[2].argument[0]);
1716     long idmai=cid(param[3].argument[0]);
1717 francois 310 long idn1=cid(param[4].argument[0]);
1718     long idn2=cid(param[5].argument[0]);
1719     long idn3=cid(param[6].argument[0]);
1720     long idn4=cid(param[7].argument[0]);
1721     long idn5=cid(param[8].argument[0]);
1722     long idn6=cid(param[9].argument[0]);
1723     long idn7=cid(param[10].argument[0]);
1724     long idn8=cid(param[11].argument[0]);
1725     FEM_NOEUD* tab[8];
1726     tab[0]=femmai->get_fem_noeudid(idn1);
1727     tab[1]=femmai->get_fem_noeudid(idn2);
1728     tab[2]=femmai->get_fem_noeudid(idn3);
1729     tab[3]=femmai->get_fem_noeudid(idn4);
1730     tab[4]=femmai->get_fem_noeudid(idn5);
1731     tab[5]=femmai->get_fem_noeudid(idn6);
1732     tab[6]=femmai->get_fem_noeudid(idn7);
1733     tab[7]=femmai->get_fem_noeudid(idn8);
1734     MG_ELEMENT_MAILLAGE* elmai;
1735     if (idmai>-1)
1736     elmai=mgmai->get_mg_hexaid(idmai);
1737     else elmai=NULL;
1738 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1739     if (idtopo>-1)
1740 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1741 francois 378 FEM_HEXA8* hex=new FEM_HEXA8(id,topo,elmai,tab);
1742 francois 310 femmai->ajouter_fem_element3(hex);
1743     }
1744     if (entite=="FEM_HEXA20")
1745     {
1746     parse.decode(data.c_str(),"@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@,@",param+2);
1747 francois 378 long idtopo=cid(param[2].argument[0]);
1748     long idmai=cid(param[3].argument[0]);
1749 francois 310 long idn1=cid(param[4].argument[0]);
1750     long idn2=cid(param[5].argument[0]);
1751     long idn3=cid(param[6].argument[0]);
1752     long idn4=cid(param[7].argument[0]);
1753     long idn5=cid(param[8].argument[0]);
1754     long idn6=cid(param[9].argument[0]);
1755     long idn7=cid(param[10].argument[0]);
1756     long idn8=cid(param[11].argument[0]);
1757     long idn9=cid(param[12].argument[0]);
1758     long idn10=cid(param[13].argument[0]);
1759     long idn11=cid(param[14].argument[0]);
1760     long idn12=cid(param[15].argument[0]);
1761     long idn13=cid(param[16].argument[0]);
1762     long idn14=cid(param[17].argument[0]);
1763     long idn15=cid(param[18].argument[0]);
1764     long idn16=cid(param[19].argument[0]);
1765     long idn17=cid(param[20].argument[0]);
1766     long idn18=cid(param[21].argument[0]);
1767     long idn19=cid(param[22].argument[0]);
1768     long idn20=cid(param[23].argument[0]);
1769     FEM_NOEUD* tab[20];
1770     tab[0]=femmai->get_fem_noeudid(idn1);
1771     tab[1]=femmai->get_fem_noeudid(idn2);
1772     tab[2]=femmai->get_fem_noeudid(idn3);
1773     tab[3]=femmai->get_fem_noeudid(idn4);
1774     tab[4]=femmai->get_fem_noeudid(idn5);
1775     tab[5]=femmai->get_fem_noeudid(idn6);
1776     tab[6]=femmai->get_fem_noeudid(idn7);
1777     tab[7]=femmai->get_fem_noeudid(idn8);
1778     tab[8]=femmai->get_fem_noeudid(idn9);
1779     tab[9]=femmai->get_fem_noeudid(idn10);
1780     tab[10]=femmai->get_fem_noeudid(idn11);
1781     tab[11]=femmai->get_fem_noeudid(idn12);
1782     tab[12]=femmai->get_fem_noeudid(idn13);
1783     tab[13]=femmai->get_fem_noeudid(idn14);
1784     tab[14]=femmai->get_fem_noeudid(idn15);
1785     tab[15]=femmai->get_fem_noeudid(idn16);
1786     tab[16]=femmai->get_fem_noeudid(idn17);
1787     tab[17]=femmai->get_fem_noeudid(idn18);
1788     tab[18]=femmai->get_fem_noeudid(idn19);
1789     tab[19]=femmai->get_fem_noeudid(idn20);
1790     MG_ELEMENT_MAILLAGE* elmai;
1791     if (idmai>-1)
1792     elmai=mgmai->get_mg_hexaid(idmai);
1793     else elmai=NULL;
1794 francois 378 MG_ELEMENT_TOPOLOGIQUE* topo=NULL;
1795     if (idtopo>-1)
1796 francois 393 topo=mggeo->get_mg_volumeid(idtopo);
1797 francois 378 FEM_HEXA20* hex=new FEM_HEXA20(id,topo,elmai,tab);
1798 francois 310 femmai->ajouter_fem_element3(hex);
1799     }
1800 francois 283 if (entite=="SOLUTION")
1801     {
1802 francois 377 parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
1803 francois 283 int typeentite=atoi(param[2].argument[0].c_str());
1804 francois 377 int typesolution=atoi(param[3].argument[0].c_str());
1805     std::string nomsol=param[4].argument[0];
1806     long idmai=cid(param[5].argument[0]);
1807     int nb=atoi(param[6].argument[0].c_str());
1808     std::string chemin=param[7].argument[0];
1809 francois 283 MG_MAILLAGE* mai=get_mg_maillageid(idmai);
1810 francois 377 MG_SOLUTION* sol=new MG_SOLUTION(id,mai,nb,(char*)chemin.c_str(),SOL_EXISTANTE,nomsol,typeentite,typesolution);
1811 francois 283 ajouter_mg_solution(sol);
1812     for (int i=0;i<nb;i++)
1813 francois 377 sol->change_legende(i,param[8].argument[i]);
1814 francois 283 }
1815     if (entite=="FEM_SOLUTION")
1816     {
1817 francois 375 parse.decode(data.c_str(),"@,@,@,@,@,@,(&)",param+2);
1818 francois 283 int typeentite=atoi(param[2].argument[0].c_str());
1819 francois 375 int typesolution=atoi(param[3].argument[0].c_str());
1820     std::string nomsol=param[4].argument[0];
1821     long idmai=cid(param[5].argument[0]);
1822     int nb=atoi(param[6].argument[0].c_str());
1823     std::string chemin=param[7].argument[0];
1824 francois 283 FEM_MAILLAGE* mai=get_fem_maillageid(idmai);
1825 francois 375 FEM_SOLUTION* sol=new FEM_SOLUTION(id,mai,nb,(char*)chemin.c_str(),SOL_EXISTANTE,nomsol,typeentite,typesolution);
1826 francois 283 ajouter_fem_solution(sol);
1827     for (int i=0;i<nb;i++)
1828 francois 375 sol->change_legende(i,param[8].argument[i]);
1829 francois 283 }
1830     #ifdef WINDOWS_VERSION
1831     if (entite=="CAD4FE_MCSEGMENT")
1832     {
1833     parse.decode(data.c_str(),"@,@,@",param+2);
1834     long idtopo=cid(param[2].argument[0]);
1835     long idn1=cid(param[3].argument[0]);
1836     long idn2=cid(param[4].argument[0]);
1837     CAD4FE::MCNode* noeud1=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn1);
1838     CAD4FE::MCNode* noeud2=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn2);
1839     MG_ELEMENT_TOPOLOGIQUE* topo;
1840     if (idtopo>-1)
1841     {
1842     topo=mggeo->get_mg_areteid(idtopo);
1843     if (topo==NULL) topo=mggeo->get_mg_faceid(idtopo);
1844     if (topo==NULL) topo=mggeo->get_mg_volumeid(idtopo);
1845     }
1846     else topo=NULL;
1847     CAD4FE::MCSegment * seg = new CAD4FE::MCSegment(id,topo,noeud1,noeud2);
1848     mgmai->ajouter_mg_segment(seg);
1849     }
1850     if (entite=="CAD4FE_MCNODE")
1851     {
1852     parse.decode(data.c_str(),"@,@,@,@,@",param+2);
1853     long idRefTopo=cid(param[2].argument[0]);
1854     long idMCTopo=cid(param[3].argument[0]);
1855     double x=atof(param[4].argument[0].c_str());
1856     double y=atof(param[5].argument[0].c_str());
1857     double z=atof(param[6].argument[0].c_str());
1858     MG_ELEMENT_TOPOLOGIQUE* refTopo=NULL;
1859     if (refTopo==NULL) refTopo=mggeo->get_mg_sommetid(idRefTopo);
1860     if (refTopo==NULL) refTopo=mggeo->get_mg_areteid(idRefTopo);
1861     if (refTopo==NULL) refTopo=mggeo->get_mg_faceid(idRefTopo);
1862     if (refTopo==NULL) refTopo=mggeo->get_mg_volumeid(idRefTopo);
1863     MG_ELEMENT_TOPOLOGIQUE* mcTopo=NULL;
1864     if (mcTopo==NULL) mcTopo=mggeo->get_mg_sommetid(idMCTopo);
1865     if (mcTopo==NULL) mcTopo=mggeo->get_mg_areteid(idMCTopo);
1866     if (mcTopo==NULL) mcTopo=mggeo->get_mg_faceid(idMCTopo);
1867     if (mcTopo==NULL) mcTopo=mggeo->get_mg_volumeid(idMCTopo);
1868    
1869     if (mcTopo->get_dimension()==0)
1870     {
1871     if (updatedMergedRefVertices == false)
1872     {
1873     for (std::multimap<CAD4FE::MCVertex * , unsigned long>::iterator itMergedRefVertices = mapMergedRefVertices.begin();
1874     itMergedRefVertices != mapMergedRefVertices.end();
1875     itMergedRefVertices++)
1876     {
1877     CAD4FE::MCVertex * v = itMergedRefVertices->first;
1878     MG_SOMMET * refV = NULL;
1879     unsigned long id = itMergedRefVertices->second;
1880     refV = (MG_SOMMET *) mggeo->get_mg_sommetid(id);
1881     v->MergeRefVertex(refV);
1882     }
1883    
1884     updatedMergedRefVertices = true;
1885     }
1886     }
1887    
1888     CAD4FE::MCNode* noeud=new CAD4FE::MCNode(id,mcTopo,refTopo,x,y,z);
1889     mgmai->ajouter_mg_noeud(noeud);
1890     }
1891     if (entite=="CAD4FE_MCTRIANGLE")
1892     {
1893     parse.decode(data.c_str(),"@,@,@,@",param+2);
1894     long idtopo=cid(param[2].argument[0]);
1895     long idn1=cid(param[3].argument[0]);
1896     long idn2=cid(param[4].argument[0]);
1897     long idn3=cid(param[5].argument[0]);
1898     CAD4FE::MCNode* noeud1=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn1);
1899     CAD4FE::MCNode* noeud2=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn2);
1900     CAD4FE::MCNode* noeud3=(CAD4FE::MCNode*)mgmai->get_mg_noeudid(idn3);
1901     CAD4FE::MCSegment* mgsegment[3];
1902     CAD4FE::MCNode *mgnoeud[3]={noeud1,noeud2,noeud3};
1903     // la topo. d'un MCTriangle est obligatoirement une MCFace
1904     CAD4FE::MCFace* mcFace=(CAD4FE::MCFace*)mggeo->get_mg_faceid(idtopo);
1905     for (int i=0;i<3;i++)
1906     {
1907     mgsegment[i]=(CAD4FE::MCSegment*)mgmai->get_mg_segment(mgnoeud[i]->get_id(),mgnoeud[(i+1)%3]->get_id());
1908     if (mgsegment[i]==NULL)
1909     {
1910     mgsegment[i]=new CAD4FE::MCSegment(mcFace,mgnoeud[i],mgnoeud[(i+1)%3]);
1911     mgmai->ajouter_mg_segment(mgsegment[i]);
1912     }
1913     }
1914     CAD4FE::M3D_MCTriangle *triangle = new CAD4FE::M3D_MCTriangle(id,mcFace,noeud1,noeud2,noeud3,mgsegment[0],mgsegment[1],mgsegment[2]);
1915     mgmai->ajouter_mg_triangle(triangle);
1916     }
1917     #endif
1918     }
1919     }
1920     while (param[0].argument[0]!="FIN");
1921 francois 741 LISTE_MG_ARBRE::iterator itarbre;
1922     for (MG_ARBRE* arb=get_premier_arbre(itarbre);arb!=NULL;arb=get_suivant_arbre(itarbre))
1923     {
1924     LISTE_MG_ASSEMBLAGE::iterator itass;
1925     for (MG_ASSEMBLAGE *ass=arb->get_premier_assemblage(itass);ass!=NULL;ass=arb->get_suivant_assemblage(itass))
1926     ass->ini_donne(arb);
1927     }
1928 francois 526 LISTE_MG_GEOMETRIE::iterator itgeo;
1929     for (MG_GEOMETRIE* geo=get_premier_geometrie(itgeo);geo;geo=get_suivant_geometrie(itgeo))
1930     {
1931     LISTE_MG_SOMMET::iterator itsom;
1932     for (MG_SOMMET* som=geo->get_premier_sommet(itsom);som;som=geo->get_suivant_sommet(itsom))
1933     if (som->est_un_sommet_noeud())
1934     {
1935     MG_SOMMET_NOEUD* somno=(MG_SOMMET_NOEUD*)som;
1936     unsigned long idnoeud=somno->get_id_mg_noeud();
1937     MG_NOEUD* noeud;
1938     LISTE_MG_MAILLAGE::iterator itmai;
1939     for (MG_MAILLAGE* mai=get_premier_mg_maillage(itmai);mai;mai=get_suivant_mg_maillage(itmai))
1940     if (mai->get_mg_noeudid(idnoeud)!=NULL) noeud=mai->get_mg_noeudid(idnoeud);
1941     somno->change_mg_noeud(noeud);
1942     }
1943 francois 685 LISTE_MG_COQUE::iterator itcoq;
1944     for (MG_COQUE* coq=geo->get_premier_coque(itcoq);coq;coq=geo->get_suivant_coque(itcoq))
1945     if (coq->est_une_coque_element())
1946     {
1947     MG_COQUE_ELEMENT* coque=(MG_COQUE_ELEMENT*)coq;
1948     int nbele=coque->get_nb_liste_id();
1949     MG_MAILLAGE* mgmai=NULL;
1950     for (int i=0;i<nbele;i++)
1951     {
1952     unsigned long eleid=coque->get_liste_id(i);
1953     if (i==0)
1954     {
1955     LISTE_MG_MAILLAGE::iterator itmai;
1956     for (MG_MAILLAGE* mai=get_premier_mg_maillage(itmai);mai;mai=get_suivant_mg_maillage(itmai))
1957     {
1958     if (mai->get_mg_triangleid(eleid)!=NULL) mgmai=mai;
1959     if (mai->get_mg_quadrangleid(eleid)!=NULL) mgmai=mai;
1960     }
1961     }
1962     MG_ELEMENT_MAILLAGE* ele=NULL;
1963     if (ele==NULL) ele=mgmai->get_mg_triangleid(eleid);
1964     if (ele==NULL) ele=mgmai->get_mg_quadrangleid(eleid);
1965     coque->ajouter_element(ele);
1966     }
1967    
1968     }
1969 francois 753 LISTE_MG_POUTRE::iterator itpou;
1970     for (MG_POUTRE* pou=geo->get_premier_poutre(itpou);pou;pou=geo->get_suivant_poutre(itpou))
1971     if (pou->est_une_poutre_element())
1972     {
1973     MG_POUTRE_ELEMENT* poutre=(MG_POUTRE_ELEMENT*)pou;
1974     int nbele=poutre->get_nb_liste_id();
1975     MG_MAILLAGE* mgmai=NULL;
1976     for (int i=0;i<nbele;i++)
1977     {
1978     unsigned long eleid=poutre->get_liste_id(i);
1979     if (i==0)
1980     {
1981     LISTE_MG_MAILLAGE::iterator itmai;
1982     for (MG_MAILLAGE* mai=get_premier_mg_maillage(itmai);mai;mai=get_suivant_mg_maillage(itmai))
1983     {
1984     if (mai->get_mg_segmentid(eleid)!=NULL) mgmai=mai;
1985     }
1986     }
1987     MG_ELEMENT_MAILLAGE* ele=NULL;
1988     if (ele==NULL) ele=mgmai->get_mg_segmentid(eleid);
1989     poutre->ajouter_element(ele);
1990     }
1991    
1992     }
1993 francois 526 }
1994 francois 283 #ifdef WINDOWS_VERSION
1995     if (updatedMergedRefVertices == false)
1996     {
1997     for (std::multimap<CAD4FE::MCVertex * , unsigned long>::iterator itMergedRefVertices = mapMergedRefVertices.begin();
1998     itMergedRefVertices != mapMergedRefVertices.end();
1999     itMergedRefVertices++)
2000     {
2001     CAD4FE::MCVertex * v = itMergedRefVertices->first;
2002     MG_SOMMET * refV = NULL;
2003     unsigned long id = itMergedRefVertices->second;
2004     refV = (MG_SOMMET *) mggeo->get_mg_sommetid(id);
2005     v->MergeRefVertex(refV);
2006     }
2007    
2008     updatedMergedRefVertices = true;
2009     }
2010    
2011     #endif
2012     fclose(in);
2013     return 1;
2014     }
2015    
2016    
2017    
2018