!/filename, vem_09
!/title, vem_09

! Forgásszimmetrikus feladat

! Adatok
	ri=100
	ro=200
	th=ro-ri
	h=100
	a=300
	
	young=200E3
	nu=0.3
	p0=30
	
	m1=10
	pathsol=30
	pathdiv=20
	
/PNUM,KP,1  	
/PNUM,LINE,1
/PNUM,AREA,1

/PREP7

! Elemtípus (KEYOPT(3)=1)
	ET,1,PLANE182,,,1
	
! Anyagtulajdonságok
	MPTEMP,1,0 
	MPDATA,EX,1,,young
	MPDATA,PRXY,1,,nu
	
! Geometria
	! Keypoint-ok
	K,1,0,a+ro
	K,2,0,a+ri
	K,3,0,a
	K,4,ri,a
	K,5,ro,a
	K,6,ri,0
	K,7,ro,0
	
	! Vonalak
	L,1,2
	L,4,5
	L,5,7
	L,7,6
	L,6,4
	
	! Körívek
	LARC,2,4,3,ri
	LARC,1,5,3,ro
	
	! Felület elemek
	AL,1,6,2,7
	AL,2,3,4,5
	
! Hálózás (free mesh)
	! Attribútumok
	ASEL,All
	AATT,1,1
	AESIZE,ALL,m1
	AMESH,ALL
	
! Háló törlése
	ACLEAR,ALL

! Hálózás (mapped)
	! Attribútumok
	ASEL,All
	AATT,1,1
	AESIZE,ALL,m1
	MSHKEY,1
	AMESH,ALL
	
! Terhelések / kényszerek 
	! Elmozdulás
	DL,4,,UY,0
	
	! Megoszló terhelés
	SFL,5,PRES,p0
	SFL,6,PRES,p0
		
! Megoldás
/SOLU
Solve