!/filename, vem_10
!/title, vem_10

!Axisymmetric 

!Data
	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

!Element type (KEYOPT(3)=1)
	ET,1,PLANE182,,,1
	
!Material data
	MPTEMP,1,0 
	MPDATA,EX,1,,young
	MPDATA,PRXY,1,,nu
	
!Geometry
	!Keypoints
	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
	
	!Lines
	L,1,2
	L,4,5
	L,5,7
	L,7,6
	L,6,4
	
	!Arcs
	LARC,2,4,3,ri
	LARC,1,5,3,ro
	
	!Areas
	AL,1,6,2,7
	AL,2,3,4,5
	
!Meshing (free mesh)
	!Attributes
	ASEL,All
	AATT,1,1
	AESIZE,ALL,m1
	AMESH,ALL
	
!Delete mesh
	ACLEAR,ALL

!Meshing (Mapped mesh)
	!Attributes
	ASEL,All
	AATT,1,1
	AESIZE,ALL,m1
	MSHKEY,1
	AMESH,ALL
	
!Loads
	!Displacement
	DL,4,,UY,0
	
	!Pressure
	SFL,5,PRES,p0
	SFL,6,PRES,p0
		
/SOLU
Solve