Télécharger mec2.notice

Retour à la liste

Afficher cette notice en

Numérotation des lignes :
   1 : $$$$ MEC2     NOTICE  CHAT      11/09/12    21:17:13     7124           
   2 :                                              DATE     11/09/12
   3 :   Voir aussi :
   4 : *--------------------------------------------------------------------*
   5 : *                                                                    *
   6 : *           Exemple simple de calcul mecanique elastique             *
   7 : * fonctionnant avec les anciennes structures AFFECT,MODELE,CHAMELEM  *
   8 : *                                                                    *
   9 : *--------------------------------------------------------------------*
  10 : * Definition des options
  11 : *
  12 :            OPTI DIME 3 ELEM CU20 MODEL TRIDIM ; DENS 10 ;
  13 : *
  14 : * Maillage d'une barre de 5 elements CU20
  15 : *
  16 :   P1 = 0 0 0 ; P2 = 10 0 0 ; LI= P1 D 1 P2 ; SUB=LI TRAN (0 10 0) ;
  17 :    TOTAL = SUB VOLU TRAN (0 0 50) COUL JAUN ; SUH = TOTAL FACE 2 ;
  18 :      LIH = SUH COTE 2 ; TRAC TOTAL CACH (1000 -2000 1000) QUAL ;
  19 : *
  20 : * Formulation, materiau defini a l'aide de
  21 : * la procedure ACIER (voir operateur MATE)
  22 : *
  23 :             OBJMOD = MODELE TOTAL MECANIQUE ELASTIQUE  CU20 ;
  24 :                      CARM = ACIER A316L OBJMOD ;
  25 : *
  26 : * Conditions de blocages
  27 : *
  28 :                         ENC1 = BLOQ UZ SUB ;
  29 :                ENC2 = BLOQ UY LI ; ENC3 = BLOQ UX P1 ;
  30 : *
  31 : * Blocage pour deplacements imposes
  32 : *
  33 :                         ENC4 = BLOQ UZ SUH ;
  34 :                     ENC = ENC1 ET ENC2 ET ENC3 ;
  35 : *
  36 : * Raideur totale
  37 : *
  38 :                  RIG = (RIGI CARM OBJMOD) ET ENC ET ENC4 ;
  39 : *
  40 : * Valeur des deplacements imposes
  41 : *
  42 :                       FEXT = DEPI ENC4 1E-9  ;
  43 : *
  44 : * Force ponctuelle et force totale
  45 : *
  46 :          FNOD = FORCE LIH (0 1000 0) ; FTOT = FEXT ET FNOD ;
  47 : *
  48 : * Resolution  pour obtenir les deplacements
  49 : *
  50 :                         DEP = RESOU RIG FTOT ;
  51 : *
  52 : * Vecteur force et reaction
  53 : *
  54 :                VEF = VECTEUR FTOT 0.03 FX FY FZ ROUG ;
  55 :                    REA = REAC (ENC4 ET ENC) DEP ;
  56 :                VER = VECTEUR REA 0.01 FX FY FZ BLEU ;
  57 : *
  58 : * Contraintes et vonmises
  59 : *
  60 :                SSI = SIGMA DEP CARM OBJMOD; VM = VMIS SSI ;
  61 : *
  62 : * Deformee et trace
  63 : *
  64 :              DEF = DEFO TOTAL DEP 50 (VEF ET VER) VERT ;
  65 :                    TRAC DEF VM (1000 -2000 1000) ;
  66 :                                 FIN ;
  67 : 

© Cast3M 2003 - Tous droits réservés.
Mentions légales