! /INPUT, C:/Users/Willi/Documents/projects/gfk-plate/script/00_Modell.inp
 
!**********************************
!	Geometry
!**********************************
CSYS,1  
CYL4,0,0,r_in,0,R_out,180
CYL4,0,0,r_in,180,R_out,360

NSEL,S,LOC,Y,0
NUMMRG,ALL

NSEL,S,LOC,Y,180
NUMMRG,ALL

LSEL,S,,,1,7,2
LESIZE,ALL,,,20

LSEL,S,,,2,4,2
LESIZE,ALL,,,20

LSEL,ALL
APLOT,All

MSHAPE,0,2D !quadratic 2D Shapes
Mshkey,1	!0-free meshing
AMESH,ALL

EPLOT,ALL
!**********************************
!	Load
!**********************************
/SOLU
OMEGA,,,omega_z
NSEL,S,LOC,X,r_in
D,ALL,UX,0
D,ALL,UY,0
D,ALL,UZ,0
D,ALL,ROTX,0
D,ALL,ROTY,0
D,ALL,ROTZ,0
ALLS

!Nichtliniearitäten
!NLGEOM,ON
	!NSUBST,20
	!AUTOTS,ON
outres,ALL,ALL
!time,1
solve

finish

