calculs/src/main.cpp

//------------------------------------------------------------
//------------------------------------------------------------
//  MAGiC
//  Jean Christophe Cuilli�re et Vincent FRANCOIS
//  D�partement de G�nie M�canique - UQTR
//------------------------------------------------------------
//  Le projet MAGIC est un projet de recherche du d�partement
//  de g�nie m�canique de l'Universit� du Qu�bec �
//  Trois Rivi�res
//  Les librairies ne peuvent �tre utilis�es 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

#include "mg_gestionnaire.h"
#include "mg_calcule_proprietes.h"
#include <fct_generateur_calibrage.h>
#include "magic_application.h"
#include <string.h>
#include "mg_file.h"
//---------------------------------------------------------------------------


int main(int argc,char **argv)
{
std::vector<MAGIC_PARAMETRE_APPLICATION> lst;
MAGIC_PARAMETRE_APPLICATION p1(3,(char*)"-masse",MAGIC_PARAMETRE_APPLICATION::ACTION,(char*)"Calcul la masse d'eau absorbée");
MAGIC_PARAMETRE_APPLICATION p2(4,(char*)"-Tf",MAGIC_PARAMETRE_APPLICATION::DOUBLE,(char*)"Le temps final de l'immersion");
MAGIC_PARAMETRE_APPLICATION p3(5,(char*)"-Pas",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char*)"Le nombre de pas de calcul");
MAGIC_PARAMETRE_APPLICATION p4(6,(char*)"-m0",MAGIC_PARAMETRE_APPLICATION::DOUBLE,(char*)"La masse initiale de l'échantillon");
p1.ajouter_dependance(1);p1.ajouter_dependance(2);p1.ajouter_dependance(4);p1.ajouter_dependance(5);p1.ajouter_dependance(6);
lst.push_back(p1);
lst.push_back(p2);
lst.push_back(p3);
lst.push_back(p4);
MAGIC_APPLICATION app((char*)"Calculs",argc,argv,lst,true,true);
if (app.get_erreur()==true) return 0;  
if (app.get_action()==3)
    { 

        char fichiermagic[500];
        char fichiersol[500];
        double resu,m0,Tf;
        int Pas;
        char nomsol[500];
        app.recupere_parametre_string(1,fichiermagic,(char*)"Fichier MAGIC entrant manquant");
        app.recupere_parametre_string(2,fichiersol,(char*)"Fichier MAGiC de sortie manquant");
        app.recupere_parametre_double(4,Tf,(char*)"Temps final manquant");
        app.recupere_parametre_int(5,Pas,(char*)"Nombre de pas manquant");
        app.recupere_parametre_double(6,m0,(char*)"Masse initiale de l'échantillon manquante");
        if (app.get_erreur()==true) return 0;  
        app.affiche((char*)"Calcul de la prise de masse finale");  
        app.affiche((char*)"Lecture");  
        MG_FILE gest(fichiermagic);
        app.affiche((char*)"Calcul");  
        MG_CALCULE_PROPRIETES calc;
        calc.active_affichage(app.affiche);
        sprintf(nomsol,"%s.sol",fichiersol);
        calc.calcul_masse_humidite(nomsol,gest,resu,Tf,Pas,m0);
        char message[500];
        sprintf(message,"La prise de masse calculée est de %lf Kg",resu);
        app.affiche(message);
        app.affiche((char*)"Enregistrement des résultats");  
        gest.enregistrer(fichiersol);
        app.affiche((char*)"Fin");
    }
        
    return 0;
}


#pragma package(smart_init)
Revision:	750
Committed:	Thu Oct 15 00:44:49 2015 UTC (9 years, 7 months ago) by mejri
File size:	3438 byte(s)
Log Message:	Calcul de prise de masse en humidité à chaque pas de temps (analogie avec le thermique). Ajout de vasy pour le maillage tétraedrique, hexaedrique et hexaedrique variable. Modification dans export.cpp pour réduire les solutions imprimés dans .magic. Ajout de trois fonction de discrétisation pour un maillage variable. Ajout d'un fichier .txt dans cas-test pour le maillage hexaedrique Modicication du casy du cas-test/calculs
#	User	Rev	Content
1	mejrim	540	//------------------------------------------------------------
2			//------------------------------------------------------------
3			// MAGiC
4			// Jean Christophe Cuilli�re et Vincent FRANCOIS
5			// D�partement de G�nie M�canique - UQTR
6			//------------------------------------------------------------
7			// Le projet MAGIC est un projet de recherche du d�partement
8			// de g�nie m�canique de l'Universit� du Qu�bec �
9			// Trois Rivi�res
10			// Les librairies ne peuvent �tre utilis�es sans l'accord
11			// des auteurs (contact : francois@uqtr.ca)
12			//------------------------------------------------------------
13			//------------------------------------------------------------
14			//
15			// main.cpp
16			//
17			//------------------------------------------------------------
18			//------------------------------------------------------------
19			// COPYRIGHT 2000
20			// Version du 02/03/2006 � 11H25
21			//------------------------------------------------------------
22			//------------------------------------------------------------
23
24
25
26
27			#include "gestionversion.h"
28			#ifdef WINDOWS_VERSION
29			#include "fenetre.h"
30			#endif
31
32			#include "mg_gestionnaire.h"
33			#include "mg_calcule_proprietes.h"
34	mejri	750	#include <fct_generateur_calibrage.h>
35	mejrim	540	#include "magic_application.h"
36			#include <string.h>
37	mejri	750	#include "mg_file.h"
38	mejrim	540	//---------------------------------------------------------------------------
39
40
41
42
43			int main(int argc,char **argv)
44			{
45			std::vector<MAGIC_PARAMETRE_APPLICATION> lst;
46	mejri	750	MAGIC_PARAMETRE_APPLICATION p1(3,(char)"-masse",MAGIC_PARAMETRE_APPLICATION::ACTION,(char)"Calcul la masse d'eau absorbée");
47			MAGIC_PARAMETRE_APPLICATION p2(4,(char)"-Tf",MAGIC_PARAMETRE_APPLICATION::DOUBLE,(char)"Le temps final de l'immersion");
48			MAGIC_PARAMETRE_APPLICATION p3(5,(char)"-Pas",MAGIC_PARAMETRE_APPLICATION::INTEGER,(char)"Le nombre de pas de calcul");
49			MAGIC_PARAMETRE_APPLICATION p4(6,(char)"-m0",MAGIC_PARAMETRE_APPLICATION::DOUBLE,(char)"La masse initiale de l'échantillon");
50			p1.ajouter_dependance(1);p1.ajouter_dependance(2);p1.ajouter_dependance(4);p1.ajouter_dependance(5);p1.ajouter_dependance(6);
51	mejrim	540	lst.push_back(p1);
52			lst.push_back(p2);
53	mejri	750	lst.push_back(p3);
54			lst.push_back(p4);
55	mejrim	540	MAGIC_APPLICATION app((char*)"Calculs",argc,argv,lst,true,true);
56	francois	607	if (app.get_erreur()==true) return 0;
57	mejri	750	if (app.get_action()==3)
58			{
59	mejrim	540
60	mejri	750	char fichiermagic[500];
61			char fichiersol[500];
62			double resu,m0,Tf;
63			int Pas;
64			char nomsol[500];
65			app.recupere_parametre_string(1,fichiermagic,(char*)"Fichier MAGIC entrant manquant");
66			app.recupere_parametre_string(2,fichiersol,(char*)"Fichier MAGiC de sortie manquant");
67			app.recupere_parametre_double(4,Tf,(char*)"Temps final manquant");
68			app.recupere_parametre_int(5,Pas,(char*)"Nombre de pas manquant");
69			app.recupere_parametre_double(6,m0,(char*)"Masse initiale de l'échantillon manquante");
70	francois	607	if (app.get_erreur()==true) return 0;
71	mejri	750	app.affiche((char*)"Calcul de la prise de masse finale");
72			app.affiche((char*)"Lecture");
73			MG_FILE gest(fichiermagic);
74			app.affiche((char*)"Calcul");
75	mejrim	540	MG_CALCULE_PROPRIETES calc;
76			calc.active_affichage(app.affiche);
77	mejri	750	sprintf(nomsol,"%s.sol",fichiersol);
78			calc.calcul_masse_humidite(nomsol,gest,resu,Tf,Pas,m0);
79	mejrim	540	char message[500];
80	mejri	750	sprintf(message,"La prise de masse calculée est de %lf Kg",resu);
81	mejrim	540	app.affiche(message);
82	francois	607	app.affiche((char*)"Enregistrement des résultats");
83	mejri	750	gest.enregistrer(fichiersol);
84	mejrim	540	app.affiche((char*)"Fin");
85	francois	607	}
86	mejri	750
87	mejrim	540	return 0;
88			}
89
90
91
92			#pragma package(smart_init)