ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/magic/lib/aster/src/mgaster.cpp
Revision: 888
Committed: Fri Jun 2 21:33:05 2017 UTC (7 years, 11 months ago) by mejri
File size: 4345 byte(s)
Log Message: 
Ajout de calcul elastique non lineaire en utilisant une courbe de traction definie dans un fichier texte

File Contents

# User Rev Content
1 francois 326 #include "gestionversion.h"
2     #include "mgaster.h"
3     #include "fem_maillage.h"
4     #include "mg_gestionnaire.h"
5     #include "mg_export.h"
6     #include "mg_import.h"
7 francois 773 #include "mglanceuraster.h"
8 francois 326
9    
10    
11    
12    
13    
14    
15    
16    
17    
18 francois 470 MGASTER::MGASTER():affichageactif(0)
19 francois 326 {
20 francois 725 ini_param();
21 francois 326
22     }
23    
24 francois 470 MGASTER::MGASTER(MGASTER &mdd):affichageactif(mdd.affichageactif)
25 francois 326 {
26 francois 725 ini_param();
27 francois 326 }
28    
29    
30     MGASTER::~MGASTER()
31     {
32     }
33    
34     void MGASTER::active_affichage(void (*fonc)(char*))
35     {
36     affiche=fonc;
37     affichageactif=1;
38     }
39    
40 francois 706 int MGASTER::calcule(char* nomfichierparam,FEM_MAILLAGE* fem,char *nometude,int typeetude,char *code,bool avecenreg)
41 francois 326 {
42 francois 786 bool recures=true;
43 gervaislavoie 382 if (affichageactif==1) affiche((char*)"");
44     if (affichageactif==1) affiche((char*)"*************************");
45     if (affichageactif==1) affiche((char*)" Calcul par code aster");
46     if (affichageactif==1) affiche((char*)"*************************");
47     if (affichageactif==1) affiche((char*)"");
48     if (affichageactif==1) affiche((char*)"");
49     if (affichageactif==1) affiche((char*)"");
50 francois 326 MG_EXPORT exp;
51 francois 706 if (nomfichierparam!=NULL) exp.lire_params_aster(nomfichierparam);
52 francois 581 double version;
53 francois 748 MG_GEOMETRIE* geo=fem->get_mg_maillage()->get_mg_geometrie();
54     char message[500];
55     if ((typeetude == MAGIC::CALCUL_ASTER::ELASTIQUE)) sprintf(message," Calcul elastique sur la geometrie %lu",geo->get_id());
56 francois 786 if ((typeetude == MAGIC::CALCUL_ASTER::RIGIDITE)) {sprintf(message," Calcul de la matrice de rigidite sur la geometrie %lu",geo->get_id());recures=false;}
57 francois 748 if ((typeetude == MAGIC::CALCUL_ASTER::THERMIQUE)) sprintf(message," Calcul thermique sur la geometrie %lu",geo->get_id());
58     if ((typeetude == MAGIC::CALCUL_ASTER::ELASTIQUE_GROT_GDEF)) sprintf(message," Calcul elastique grand deplacement sur la geometrie %lu",geo->get_id());
59     if ((typeetude == MAGIC::CALCUL_ASTER::PLASTIQUE)) sprintf(message," Calcul plastique sur la geometrie %lu",geo->get_id());
60     if ((typeetude == MAGIC::CALCUL_ASTER::CONTRAINTE_PLANE)) sprintf(message," Calcul de contrainte plane sur la geometrie %lu",geo->get_id());
61     if ((typeetude == MAGIC::CALCUL_ASTER::DEFORMATION_PLANE)) sprintf(message," Calcul de deformation plane sur la geometrie %lu",geo->get_id());
62 francois 786 if ((typeetude == MAGIC::CALCUL_ASTER::RIGIDITE_CONTRAINTE_PLANE)) {sprintf(message," Calcul de la matrice de rigidite en contrainte plane sur la geometrie %lu",geo->get_id());;recures=false;}
63     if ((typeetude == MAGIC::CALCUL_ASTER::RIGIDITE_DEFORMATION_PLANE)) {sprintf(message," Calcul de la matrice de rigidite en deformation plane sur la geometrie %lu",geo->get_id());;recures=false;}
64 mejri 888 if ((typeetude == MAGIC::CALCUL_ASTER::ELASTIQUE_NON_LINEAIRE_3D)) sprintf(message," Calcul elastique non lineaire sur la geometrie %lu",geo->get_id());
65 francois 748 if (affichageactif==1) affiche(message);
66     char resultat[10];
67     strcpy(resultat,"00011111");
68     if ((typeetude == MAGIC::CALCUL_ASTER::THERMIQUE)) strcpy(resultat,"");
69     if (code!=NULL) strcpy(resultat,code);
70     version=exp.aster(geo,fem,nometude,typeetude,resultat);
71 francois 757 int base=exp.get_base_aster();
72 francois 748
73 francois 581 if (affichageactif==1)
74     {
75     char messagever[255];
76 francois 691 sprintf(messagever," Calcul aster \033[1;32m%.1lf\033[1;33m ",version);
77 francois 581 affiche(messagever);
78     }
79 francois 773
80     MGLANCEURASTER aster;
81     int codesortie=aster.execute(param,nometude);
82 francois 326 if (codesortie!=0)
83     {
84 francois 773 sprintf(message," Code de sortie aster : %d",codesortie);
85     if (affichageactif==1) affiche(message);
86 gervaislavoie 382 return codesortie;
87 francois 326 }
88 francois 786 if (recures)
89 gervaislavoie 382 {
90 francois 786 if (affichageactif==1) affiche((char*)" Recuperation des resultats");
91     char nomfichiertmp[600];
92     MG_IMPORT imp;
93     sprintf(nomfichiertmp,"%s.resu",nometude);
94     std::string res=imp.aster(base,fem,nomfichiertmp,nometude);
95     if (affichageactif==1) printf("%s",(char*)("\033[1;31m"+res+"\033[1;33m").c_str());
96     if (avecenreg==true)
97     {
98 gervaislavoie 382 if (affichageactif==1) affiche((char*)" Enregistrement MAGIC");
99     sprintf(nomfichiertmp,"%s.magic",nometude);
100     fem->get_mg_maillage()->get_gestionnaire()->enregistrer(nomfichiertmp);
101     if (affichageactif==1) affiche((char*)" Enregistrement GMSH");
102     exp.gmsh(fem,nometude);
103     }
104 francois 786 }
105 mejrim 597 }
106    
107    
108 francois 725 void MGASTER::ini_param(void)
109     {
110     param.ajouter("Affiche_Code_Aster",0,OT_PARAMETRES::DOUBLE,"0. Affichage redirigé vers le fichier aster.log 1 affichage dans un terminal");
111     char fichier[500];
112     sprintf(fichier,"%s/.magic",getenv("HOME"));
113     param.lire(fichier);
114     param.enregistrer(fichier);
115    
116     }
117 mejrim 597