**
** HBaa, 11.04.2009
**
** aba692 job=1elm_Bsp user=Code_Bsp.f inter
**
**
*HEADING
 1 Element (3D) unter Schub: harmon. Schubanregung
**
**
********************************************************************
**  Knotendefinition
********************************************************************
*NODE, NSET=NALL
**
**
********************************************************************
**    Elementdefinition
********************************************************************
*ELEMENT, TYPE=C3D8H, ELSET=ELMT1
**
**
********************************************************************
**    Gruppendefinition
********************************************************************
**
*NSET, NSET=n_oben
**
*NSET, NSET=n_unten
**
********************************************************************
**    Material festlegen
********************************************************************
*SOLID SECTION,ELSET=ELMT1,MATERIAL=mat
**
*MATERIAL,NAME=mat
**
*Hyperelastic, neo hooke, moduli=LONG TERM
 0.5, 0.001
**
**
**
** *USER MATERIAL, CONSTANTS=2
**  0.5, 0.001
** **
** *DEPVAR
**  6
**
**
*DENSITY
 1.5e-9
**
********************************************************************
**
*INITIAL CONDITION, TYPE=TEMPERATURE
 NALL, 0.0
**
**
*AMPLITUDE, NAME=ampl, DEFINITION=PERIODIC
** N, omega, t0, A0
 1, 6.2832, 0.0, 0.0
** A1, B1, A2, B2, ...
 0.0, 2.0
**
**
********************************************************************
**    1. Step
********************************************************************
*STEP, NLGEOM, INC=999, EXTRAPOLATION=NO
 Schub, harmonisch
**
** *VISCO, CETOL=0.1
*STATIC
** *DYNAMIC, HAFTOL=1000.
**
 0.01, 3.0, 1.0e-9, 0.01
**
**
**
*BOUNDARY, AMPLITUDE=ampl, OP=NEW
**
 n_unten, 1,6, 0.0
 n_oben, 1,1, 1.0
 n_oben, 2,2, 0.0
**
********************************************************************
**
*OUTPUT,FIELD,FREQUENCY=1
**
*NODE OUTPUT,VARIABLE=PRESELECT
 U,RF
**
*ELEMENT OUTPUT,VARIABLE=PRESELECT
 S,E,SDV,SENER,CENER
**
**
*OUTPUT,HISTORY, FREQ=1
**
*ELEMENT OUTPUT,VARIABLE=PRESELECT,ELSET=elmt1
 S12,S22,NE22,LE22,SDV1
**
*NODE OUTPUT,VARIABLE=PRESELECT, NSET=N_OBEN
U,RF
**
**
*END STEP
**