FINISH
/CLEAR,START
/PREP7

ET,1,189

mp,ex,1,2.1E11
mp,prxy,1,0.3
mp,dens,1,7700


K,100,0,0,0,

!LINE1
K,101,21/1000,0,0
LSTR,100,101

!LINE2
K,102,47/1000,0,0
LSTR,101,102

!LINE3
K,103,79/1000,0,0
LSTR,102,103

!LINE4
K,104,248/1000,0,0
LSTR,103,104

!LINE5
K,105,271/1000,0,0
LSTR,104,105

!LINE6
K,106,288/1000,0,0
LSTR,105,106

!LINE7
K,107,308/1000,0,0
LSTR,106,107

!LINE8
K,108,476/1000,0,0
LSTR,107,108

!LINE9
K,109,499/1000,0,0
LSTR,108,109

!LINE10
K,110,526/1000,0,0
LSTR,109,110


SECTYPE,1,BEAM,CSOLID,SHAFT_THICK,      !dicker Querschnitt der Welle
SECDATA,10/1000,18,4

SECTYPE,2,BEAM,CSOLID,SHAFT_THIN,	!dünner Querschnitt der Welle
SECDATA,5/1000,18,4

SECTYPE,3,BEAM,CSOLID,DISK,		!Scheibe
SECDATA,71.27/1000,36,5

SECTYPE,4,BEAM,CSOLID,SCHRAUBE,		!Schraube rechts neben der Scheibe
SECDATA,18/1000,6,2


!ORIENTATIONKP
K,200,500000/1000,0,800/1000


!MESHING DER EINZELNEN LINIEN
!LINE1-3
CSYS,0
LSEL,S,LINE,,1,3,1
LATT,1,,1,,200,,1
LESIZE,ALL,,,1
LMESH,ALL
ALLS

!LINE4
CSYS,0
LSEL,S,LINE,,4
LATT,1,,1,,200,,2
LESIZE,4,,,5
LMESH,4
ALLS

!LINE5
CSYS,0
LSEL,S,LINE,,5
LATT,1,,1,,200,,1
LESIZE,5,,,1
LMESH,5
ALLS

!LINE6			
CSYS,0
LSEL,S,LINE,,6
LATT,1,,1,,200,,3
LESIZE,6,,,1
LMESH,6
ALLS

!LINE7			
CSYS,0
LSEL,S,LINE,,7
LATT,1,,1,,200,,4
LESIZE,7,,,1
LMESH,7
ALLS

!LINE8
CSYS,0
LSEL,S,LINE,,8
LATT,1,,1,,200,,2
LESIZE,8,,,5
LMESH,8
ALLS

!LINE9,10
CSYS,0
LSEL,S,LINE,,9,10,1
LATT,1,,1,,200,,1
LESIZE,ALL,,,1
LMESH,ALL
ALLS

/ESHAPE,1
EPLOT


!!!NICHTLINEARE STEIFIGKEITEN DER WÄLZLAGER MIT COMBIN-214

ET,2,214
KEYOPT,2,2,1

*DIM,KYY,TABLE,6,1,1,ECCENT
KYY(1,0)=0,0.0033/1000,0.005405/1000,0.00706/1000,0.0086/1000,0.00995/1000
KYY(1,1)=30000000,60000000,74000000,85000000,93000000,100500000
*DIM,KZZ,TABLE,6,1,1,ECCENT
KZZ(1,0)=0,0.0033/1000,0.005405/1000,0.00706/1000,0.0086/1000,0.00995/1000
KZZ(1,1)=30000000,60000000,74000000,85000000,93000000,100500000

R,1,%KYY%,%KZZ%,,,5000,5000
TYPE,2
!R,1,20000000,20000000


! FESTLAGER

N,100000,47/1000,-50/1000,0
d,100000,all,0

NFL1=Node(47/1000,0,0)
D,NFL1,UX,0
D,NFL1,ROTY,0
D,NFL1,ROTZ,0
E,NFL1,100000


! LOSLAGER

N,200000,499/1000,-50/1000,0
d,200000,ux,0
NLL1=Node(499/1000,0,0)
D,NLL1,ROTY,0
D,NLL1,ROTZ,0
E,NLL1,200000


! KUPPLUNG

R,2,327000,327000
REAL,2

N,250000,0.00,-0.05,0
d,250000,all
N,250001,0.021,-0.05,0
d,250001,all

NCP1=NODE(0.00,0,0)
E,NCP1,250000
D,NCP1,UX,0
NCP2=NODE(0.021,0,0)
E,NCP2,250001
D,NCP2,UX,0
ALLS


!! Kupplung längs         (KEINEN EINFLUSS AUF MODALPARAMETER)
 
!ET,3,214
!KEYOPT,3,2,0
!TYPE,3

!*DIM,KXX,TABLE,5,1,1,ECCENT
!KXX(1,0)=-0.1,-0.001,0,0.001,0.1
!KXX(1,1)=774000,774000,0,0,0

!R,3,%KXX%
!REAL,3

!N,250002,-0.05,0,0
!d,250002,all
!NCP3=NODE(0,0,0)
!E,NCP3,250002
!ALLS


! Unwucht durch MASS21-Element	    (KEIN ENTSPRECHENDER KNOTEN VORHANDEN)

!ET,4,21
!KEYOPT,4,3,2
!R,4,0.01
!TYPE,4
!REAL,4
!NUNBAL=NODE(279.50/1000,64/1000,0)
!E,NUNBAL

/ESHAPE,1
EPLOT

FINISH