* ################################################# * * ENSMP 2002 * Dynamique des Constructions * L. CHAMPANEY * * Mines-Vibr1D.dgibi * Exemple de demonstration en RdM Dynamique : poutre * * * /| * /|----------------------------- * /| E1,D1,L1 * * ################################################# * OPTIon DIME 2 ELEM SEG2 trac OPEN; * DENS 0.01; * * Caracteriques LONG1 = 1.; DIAM1 = 0.05; YOUN1 = 2.E11; MVOL1 = 7800.; * * Geometrie P1 = 0. 0. ; P2 = LONG1 0. ; * LIGN1 = DROIte P1 P2; * * Modele de calcul MODE1 = MODEle LIGN1 MECANIQUE ELASTIQUE POUT; * * Loi de comportement SECT1 = PI * (DIAM1 ** 2); INRZ1 = PI * (DIAM1 ** 4) / 64; * MATE1 = MATR MODE1 'YOUN' YOUN1 'NU' 0. 'RHO' MVOL1 'SECT' SECT1 'INRZ' INRZ1; * * Conditions aux limites CLIM1 = BLOQ DEPL ROTA P1; * * * Matrice de Rigidite MRIG1 = (RIGI MODE1 MATE1) ET CLIM1; * * Matrice de Masse MMAS1 = MASS MODE1 MATE1; * * Deplacement BMOD1 = VIBR INTERVALLE 0. 10000. 'BASSE' 10 MRIG1 MMAS1 ; * * =============== * Post-Traitement * =============== NBMODE1 = DIME BMOD1; * REPE BOUC1 NBMODE1; * DEPL1 = TIRE BMOD1 DEPL RANG &BOUC1 ; DEFO1 = DEFO DEPL1 LIGN1 ; DEFO0 = DEFO DEPL1 LIGN1 0. ROUG; TRAC (DEFO1 ET DEFO0) ; * FIN BOUC1; fin;