toIbrep/src/main.cpp

//------------------------------------------------------------
//------------------------------------------------------------
//  MAGiC
//  Jean Christophe Cuilli�e et Vincent FRANCOIS
//  D�artement de G�ie M�anique - UQTR
//------------------------------------------------------------
//  Le projet MAGIC est un projet de recherche du d�artement
//  de g�ie m�anique de l'Universit�du Qu�ec �
//  Trois Rivi�es
//  Les librairies ne peuvent �re utilis�s sans l'accord
//  des auteurs (contact : francois@uqtr.ca)
//------------------------------------------------------------
//------------------------------------------------------------
//
//       main.cpp
//
//------------------------------------------------------------
//------------------------------------------------------------
//  COPYRIGHT 2000
//  Version du 02/03/2006 �11H25
//------------------------------------------------------------
//------------------------------------------------------------
#include "gestionversion.h"
#ifdef WINDOWS_VERSION
#include "fenetre.h"
#endif

#pragma hdrstop

#include "mg_file.h"
#include "toibrep.h"
#include "ot_cpu.h"
#include "mg_export.h"
#include "mailleur3d.h"
#include <fstream>
#include <string.h>
#include "magic_application.h"
//---------------------------------------------------------------------------


int main(int argc,char **argv)
{
std::vector<MAGIC_PARAMETRE_APPLICATION> lst;
MAGIC_PARAMETRE_APPLICATION p1(3,(char*)"-numgeo",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char*)"Numero de géométrie a transformer en modèle X-FEM - Defaut la première");  
MAGIC_PARAMETRE_APPLICATION p2(4,(char*)"-nummai",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char*)"Numero de maillage FEM support au modèle X-FEM - Defaut 0 = maillage à créer");  
MAGIC_PARAMETRE_APPLICATION p3(5,(char*)"-carte",MAGIC_PARAMETRE_APPLICATION::STRING,(char*)"Fichier carte de taille");  
MAGIC_PARAMETRE_APPLICATION p4(6,(char*)"-coef",MAGIC_PARAMETRE_APPLICATION::DOUBLE,(char*)"Coefficient de raffinement pour le mailleur octal - Defaut 2.");  
MAGIC_PARAMETRE_APPLICATION p5(7,(char*)"-degre",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char*)"Degre du maillage crée - Defaut 1");  
MAGIC_PARAMETRE_APPLICATION p6(8,(char*)"-pas",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char*)"Echantillonnage des entités géométriques pour l'évaluation des propriétés - Defaut 50");  
lst.push_back(p1);   
lst.push_back(p2);   
lst.push_back(p3);   
lst.push_back(p4);   
lst.push_back(p5);   
lst.push_back(p6);   

MAGIC_APPLICATION app((char*)"Création d'un modèle X-FEM",argc,argv,lst,true,true); 
if (app.get_erreur()==true) return 0;

char nomfichier[500];
char fichiercarte[500];
char nomfichiersortie[500];
int numgeo;
int nummai;
double coef;
int degre;
int pas;
app.recupere_parametre_string(1,nomfichier,(char*)"Fichier entrant manquant");
app.recupere_parametre_string_avec_defaut(2,nomfichiersortie,nomfichier);
app.recupere_parametre_int_avec_defaut(3,numgeo,0);
app.recupere_parametre_int_avec_defaut(4,nummai,0);
if (nummai==0) 
  app.recupere_parametre_string(5,fichiercarte,(char*)"Fichier carte manquant");
else app.recupere_parametre_string_avec_defaut(5,fichiercarte,(char*)"");
app.recupere_parametre_double_avec_defaut(6,coef,2.); 
app.recupere_parametre_int_avec_defaut(7,degre,1); 
app.recupere_parametre_int_avec_defaut(7,pas,50); 


if (app.get_erreur()==true) return 0;

OT_CPU compteur;
app.affiche((char*)"Debut");
app.affiche((char*)"Lecture fichier magic");
MG_FILE gest(nomfichier);
MG_GEOMETRIE* geo;
if (numgeo==0) geo=gest.get_mg_geometrie(0); else geo=gest.get_mg_geometrieid(numgeo);
compteur.ajouter_etape((char*)"Lecture fichier");
FEM_MAILLAGE* mai;
if (nummai!=0) mai=gest.get_fem_maillageid(nummai); 
else 
      {
      app.affiche((char*)"Lecture carte de taille");
      FCT_GENERATEUR_3D<4> carte;
      carte.lire(fichiercarte);
      compteur.ajouter_etape("Lecture carte de taille");
      app.affiche((char*)"Mailleur octal");
      MG_MAILLAGE* mgmai=new MG_MAILLAGE(NULL);
      gest.ajouter_mg_maillage(mgmai);
      MAILLEUR3D mailleur(&carte,mgmai);
      mailleur.change_coef(coef);
      mailleur.maille();
      compteur.ajouter_etape("Mailleur octal");
      app.affiche((char*)"Maillage FEM");
      mai=new FEM_MAILLAGE(mgmai->get_mg_geometrie(),mgmai,degre);
      gest.ajouter_fem_maillage(mai);
      mai->construire(0); 
      compteur.ajouter_etape("Mailleur FEM");
      }

TOIBREP t(&gest,geo,mai,pas,&compteur);
t.active_affichage(app.affiche);
t.importer_et_decouper(NULL);
app.affiche((char*)"Enregistrement magic");
gest.enregistrer(nomfichiersortie);
MG_EXPORT exp;
exp.gmsh_avec_correspondance(mai,nomfichiersortie);
compteur.ajouter_etape((char*)"Enregistrement");
app.affiche((char*)"Fin");
return 0;

}


#pragma package(smart_init)
Revision:	485
Committed:	Mon Feb 10 17:23:58 2014 UTC (11 years, 6 months ago) by francois
File size:	4951 byte(s)
Log Message:	Mise en version 4 de toIBrep
#	User	Rev	Content
1	francois	249	//------------------------------------------------------------
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			// main.cpp
16			//
17			//------------------------------------------------------------
18			//------------------------------------------------------------
19			// COPYRIGHT 2000
20			// Version du 02/03/2006 �11H25
21			//------------------------------------------------------------
22			//------------------------------------------------------------
23			#include "gestionversion.h"
24			#ifdef WINDOWS_VERSION
25			#include "fenetre.h"
26			#endif
27
28			#pragma hdrstop
29
30			#include "mg_file.h"
31	francois	259	#include "toibrep.h"
32	francois	276	#include "ot_cpu.h"
33	francois	485	#include "mg_export.h"
34	francois	276	#include "mailleur3d.h"
35	francois	249	#include <fstream>
36			#include <string.h>
37	francois	485	#include "magic_application.h"
38	francois	249	//---------------------------------------------------------------------------
39
40
41
42	francois	485
43	francois	249	int main(int argc,char **argv)
44			{
45	francois	485	std::vector<MAGIC_PARAMETRE_APPLICATION> lst;
46			MAGIC_PARAMETRE_APPLICATION p1(3,(char)"-numgeo",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char)"Numero de géométrie a transformer en modèle X-FEM - Defaut la première");
47			MAGIC_PARAMETRE_APPLICATION p2(4,(char)"-nummai",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char)"Numero de maillage FEM support au modèle X-FEM - Defaut 0 = maillage à créer");
48			MAGIC_PARAMETRE_APPLICATION p3(5,(char)"-carte",MAGIC_PARAMETRE_APPLICATION::STRING,(char)"Fichier carte de taille");
49			MAGIC_PARAMETRE_APPLICATION p4(6,(char)"-coef",MAGIC_PARAMETRE_APPLICATION::DOUBLE,(char)"Coefficient de raffinement pour le mailleur octal - Defaut 2.");
50			MAGIC_PARAMETRE_APPLICATION p5(7,(char)"-degre",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char)"Degre du maillage crée - Defaut 1");
51			MAGIC_PARAMETRE_APPLICATION p6(8,(char)"-pas",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char)"Echantillonnage des entités géométriques pour l'évaluation des propriétés - Defaut 50");
52			lst.push_back(p1);
53			lst.push_back(p2);
54			lst.push_back(p3);
55			lst.push_back(p4);
56			lst.push_back(p5);
57			lst.push_back(p6);
58
59			MAGIC_APPLICATION app((char*)"Création d'un modèle X-FEM",argc,argv,lst,true,true);
60			if (app.get_erreur()==true) return 0;
61
62	francois	249	char nomfichier[500];
63	francois	276	char fichiercarte[500];
64	francois	249	char nomfichiersortie[500];
65	francois	485	int numgeo;
66			int nummai;
67			double coef;
68			int degre;
69			int pas;
70			app.recupere_parametre_string(1,nomfichier,(char*)"Fichier entrant manquant");
71			app.recupere_parametre_string_avec_defaut(2,nomfichiersortie,nomfichier);
72			app.recupere_parametre_int_avec_defaut(3,numgeo,0);
73			app.recupere_parametre_int_avec_defaut(4,nummai,0);
74			if (nummai==0)
75			app.recupere_parametre_string(5,fichiercarte,(char*)"Fichier carte manquant");
76			else app.recupere_parametre_string_avec_defaut(5,fichiercarte,(char*)"");
77			app.recupere_parametre_double_avec_defaut(6,coef,2.);
78			app.recupere_parametre_int_avec_defaut(7,degre,1);
79			app.recupere_parametre_int_avec_defaut(7,pas,50);
80
81
82			if (app.get_erreur()==true) return 0;
83
84	francois	276	OT_CPU compteur;
85	francois	485	app.affiche((char*)"Debut");
86			app.affiche((char*)"Lecture fichier magic");
87	francois	249	MG_FILE gest(nomfichier);
88	francois	485	MG_GEOMETRIE* geo;
89			if (numgeo==0) geo=gest.get_mg_geometrie(0); else geo=gest.get_mg_geometrieid(numgeo);
90			compteur.ajouter_etape((char*)"Lecture fichier");
91	francois	276	FEM_MAILLAGE* mai;
92			if (nummai!=0) mai=gest.get_fem_maillageid(nummai);
93			else
94			{
95	francois	485	app.affiche((char*)"Lecture carte de taille");
96	francois	276	FCT_GENERATEUR_3D<4> carte;
97			carte.lire(fichiercarte);
98			compteur.ajouter_etape("Lecture carte de taille");
99	francois	485	app.affiche((char*)"Mailleur octal");
100	francois	276	MG_MAILLAGE* mgmai=new MG_MAILLAGE(NULL);
101			gest.ajouter_mg_maillage(mgmai);
102			MAILLEUR3D mailleur(&carte,mgmai);
103			mailleur.change_coef(coef);
104			mailleur.maille();
105			compteur.ajouter_etape("Mailleur octal");
106	francois	485	app.affiche((char*)"Maillage FEM");
107	francois	276	mai=new FEM_MAILLAGE(mgmai->get_mg_geometrie(),mgmai,degre);
108			gest.ajouter_fem_maillage(mai);
109			mai->construire(0);
110			compteur.ajouter_etape("Mailleur FEM");
111			}
112	francois	485
113	francois	276	TOIBREP t(&gest,geo,mai,pas,&compteur);
114	francois	485	t.active_affichage(app.affiche);
115	francois	432	t.importer_et_decouper(NULL);
116	francois	485	app.affiche((char*)"Enregistrement magic");
117	francois	249	gest.enregistrer(nomfichiersortie);
118	francois	432	MG_EXPORT exp;
119	francois	485	exp.gmsh_avec_correspondance(mai,nomfichiersortie);
120			compteur.ajouter_etape((char*)"Enregistrement");
121			app.affiche((char*)"Fin");
122			return 0;
123	francois	249
124			}
125
126
127
128			#pragma package(smart_init)