Salome HOME
projects
/
modules
/
eficas.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
merge from V3_2_0_maintenance 17mar08
[modules/eficas.git]
/
src
/
TestsEltsVisu
/
Poutres
/
pcercleconstcreuse.comm
1
2
3
DEBUT();
4
5
maillage=LIRE_MAILLAGE();
6
7
modele=AFFE_MODELE(MAILLAGE=maillage,
8
AFFE=_F(TOUT='OUI',
9
PHENOMENE='MECANIQUE',
10
MODELISATION='POU_D_E',),);
11
P1 = 3;
12
13
14
Affe=AFFE_CARA_ELEM(MODELE=modele,
15
POUTRE=_F(GROUP_MA='element1D',
16
SECTION='CERCLE',
17
CARA=('R','EP',),
18
VALE=(2.0,1.0,),),);
19
20
FIN();