src/TestsEltsVisu/Nicolas/pn.comm

   1
   2
   3 DEBUT(CODE=_F(NOM='VIDE',
   4               NIV_PUB_WEB='INTERNET',),);
   5 P1 = 3;
   6
   7 P2 = 4;
   8
   9 P3 = 2*P2;
  10
  11
  12 MA=LIRE_MAILLAGE();
  13
  14 MODE=AFFE_MODELE(MAILLAGE=MA,
  15                  AFFE=_F(TOUT='OUI',
  16                          PHENOMENE='ACOUSTIQUE',
  17                          MODELISATION='PLAN',),);
  18
  19 eeeeee=AFFE_CARA_ELEM(MODELE=MODE,
  20                       POUTRE=_F(GROUP_MA='eaae',
  21                                 SECTION='CERCLE',
  22                                 CARA='R',
  23                                 VALE=P3,),);
  24
  25 FIN();
  26 #