1 |
francois |
1158 |
//####//------------------------------------------------------------ |
2 |
|
|
//####//------------------------------------------------------------ |
3 |
|
|
//####// MAGiC |
4 |
|
|
//####// Jean Christophe Cuilliere et Vincent FRANCOIS |
5 |
|
|
//####// Departement de Genie Mecanique - UQTR |
6 |
|
|
//####//------------------------------------------------------------ |
7 |
|
|
//####// MAGIC est un projet de recherche de l equipe ERICCA |
8 |
|
|
//####// du departement de genie mecanique de l Universite du Quebec a Trois Rivieres |
9 |
|
|
//####// http://www.uqtr.ca/ericca |
10 |
|
|
//####// http://www.uqtr.ca/ |
11 |
|
|
//####//------------------------------------------------------------ |
12 |
|
|
//####//------------------------------------------------------------ |
13 |
|
|
//####// |
14 |
|
|
//####// sl_solve.cpp |
15 |
|
|
//####// |
16 |
|
|
//####//------------------------------------------------------------ |
17 |
|
|
//####//------------------------------------------------------------ |
18 |
|
|
//####// COPYRIGHT 2000-2024 |
19 |
|
|
//####// jeu 13 jun 2024 11:58:57 EDT |
20 |
|
|
//####//------------------------------------------------------------ |
21 |
|
|
//####//------------------------------------------------------------ |
22 |
|
5 |
#include "gestionversion.h"
|
23 |
|
|
|
24 |
|
|
#pragma hdrstop
|
25 |
|
|
|
26 |
|
|
#include "sl_solve.h"
|
27 |
|
|
|
28 |
|
|
#include "sl_element.h"
|
29 |
|
|
#pragma package(smart_init)
|
30 |
|
|
|
31 |
|
|
SL_SOLVE::SL_SOLVE(int ele_type,char* file_name,unsigned long mai_id, long nbincr):type(ele_type)
|
32 |
|
|
{
|
33 |
|
|
strcpy(nom_fichier,file_name);
|
34 |
|
|
gest=new MG_FILE(nom_fichier);
|
35 |
|
|
maillage=gest->get_fem_maillageid(mai_id);
|
36 |
|
|
MG_GEOMETRIE* mggeo=maillage->get_mg_geometrie();
|
37 |
|
|
unite=mggeo->get_valeur_unite();
|
38 |
|
|
|
39 |
|
|
nb_incr= nbincr;
|
40 |
|
|
}
|
41 |
|
|
|
42 |
|
|
|
43 |
|
|
|
44 |
|
|
SL_SOLVE::~SL_SOLVE()
|
45 |
|
|
{
|
46 |
|
|
delete gest;
|
47 |
|
|
}
|
48 |
|
|
|
49 |
|
|
|
50 |
|
|
|