finish
/clear

/config,nres,5000

/prep7


ET,1,COMBIN14
ET,2,MASS21



!!!Federkonst,daempf.konst
R,1,2500,0.0

!!!Masse
R,2,1


!!!Knoten1=Federfusspunkt !! Knoten2=Punktmasse !!!

N,1,0,0,0
N,2,1,0,0


!Definieren der Feder zwischen Kn1 und Kn2

Type,1
REAL,1

E,1,2


!Definieren einer Punktmasse für Kn2

TYPE,2
REAL,2

E,2



!!!Auswahl Kraftangriffspunkt!!!

NSEL,S,,,2
CM,ZIEL,NODE
ALLS


!!!Festhalten von Knoten1!!!

D,1,ALL

ALLS



!!!Lösungsabschnitt!!!

/SOLU

ANTYPE,TRANS
TRNOPT,FULL


TIME,1
DELTIM,1
TIMINT,OFF

!Aufbringen einer Last auf Zielknoten in X-Richtung 

F,ZIEL,FX,25

ALLS

SOLVE

TIMINT,ON
TIME,15
AUTOTS,ON

DELTIM,0.005,0.001,0.1

OUTRES,ALL,ALL

!Entfernen der Last

FDELE,ALL,ALL

SOLVE





/POST26

NSOL,2,2,U,X,UX





/GRID,1
/AXLAB,Y,DISP
PLVAR,2,3


/gropts,view,1
/GTHK,CURVE,1