Salome HOME
projects
/
modules
/
eficas.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
pour la langue
[modules/eficas.git]
/
src
/
TestsEltsVisu
/
Barres
/
barrerectanglecreuse.comm
1
2
DEBUT();
3
4
maillage=LIRE_MAILLAGE();
5
6
modele=AFFE_MODELE(MAILLAGE=maillage,
7
AFFE=_F(TOUT='OUI',
8
PHENOMENE='MECANIQUE',
9
MODELISATION='BARRE',),);
10
P1 = 3;
11
12
13
Affe=AFFE_CARA_ELEM(MODELE=modele,
14
BARRE=_F(GROUP_MA='element1D',
15
SECTION='RECTANGLE',
16
CARA=('HZ','HY','EPY','EPZ',),
17
VALE=(3.0,4.0,1.0,0.5,),),);
18
19
FIN();