/CWD,'D:\ansysprojects\vem15-2\labor10' 
/POST1
!Plot the deformed shape
	PLDISP,1
	/IMAGE,SAVE,deformed,bmp
	!Scale the displacement
	!/DSCALE,All,5
	
!Stresses
	!Tangential stress - Z-component of stress
		PLNSOL,S,Z
		/IMAGE,SAVE,strs_z,bmp
	!Y-component of stress - Meridian stress at the cylindrical part
		PLNSOL,S,Y
		/IMAGE,SAVE,strs_y,bmp
	!X-component of stress - Radial stress at the cylindrical part
		PLNSOL,S,X
		/IMAGE,SAVE,strs_y,bmp
	!Stress intensity (Mohr)
		PLNSOL,S,INT
		/IMAGE,SAVE,strs_int,bmp
	!Equivalent stress (HMH)
		PLNSOL,S,EQV
		/IMAGE,SAVE,strs_eqv,bmp
	
!Path operations
	!Radial, tangential and axial stresses at the cylindrical part
		PATH,cylwall,2,pathsol,pathdiv
		PPATH,1,,ri,0,0
		PPATH,2,,ro,0,0
		PDEF,strad,S,X
		PDEF,sttan,S,Z
		PDEF,stax,S,Y
		PLPATH,strad,sttan,stax		!On graph
		/IMAGE,SAVE,strs_rad_tang_ax,bmp
		!PLPAGM,srad				!On geometry
	
	!Principal stresses at the same place
		PATH,cylwall,
		PDEF,st1,S,1
		PDEF,st2,S,2
		PDEF,st3,S,3
		PLPATH,st1,st2,st3,strad,sttan,stax		!On graph
		/IMAGE,SAVE,strs_princ,bmp
	
	!Equivalent stresses at the same place
		PATH,cylwall,
		PDEF,stmohr,S,INT
		PDEF,sthmh,S,EQV
		PLPATH,stmohr,sthmh		!On graph
		/IMAGE,SAVE,strs_eqv_graph,bmp
		
	!Radial, tangential and axial stresses at the inner edge of cylinder
		PATH,cylined,2,pathsol,pathdiv
		PPATH,1,,ri,0,0
		PPATH,2,,ri,a,0
		PDEF,strad2,S,X
		PDEF,sttan2,S,Z
		PDEF,stax2,S,Y
		PLPATH,strad2,sttan2,stax2		!On graph
		
		PLPATH,strad2		!On graph
		
	!Meridian and tangential stresses at the spheric part
		PATH,sphere,2,pathsol,pathdiv
		PPATH,1,,0,a+ri,0
		PPATH,2,,0,a+ro,0
		PDEF,stmer3,S,X
		PDEF,sttan3,S,Z
		PLPATH,stmer3,sttan3		!On graph
		
	!Meridian and tangential stresses at the connection of the spheric and cylindirc part
		PATH,sphercyl,2,pathsol,pathdiv
		PPATH,1,,ri,a,0
		PPATH,2,,ro,a,0
		PDEF,stmer4,S,Y
		PDEF,sttan4,S,Z
		PLPATH,stmer4,sttan4		!On graph