/com	ANSYS 11.0

/prep7
et,1,121	!2d 8-node  estat solid
keyopt,1,3,1	!axi symmetric
mp,perx,1,1
/com	LESIZE, NL1, SIZE, ANGSIZ, NDIV, SPACE, KFORC, LAYER1, LAYER2, KYNDIV
LESIZE,all,.01



RECTNG,0.1,1,0,.1
al,1,2,3,4
/com	DL, LINE, AREA, Lab, Value1, Value2


dl,1,1,symm
dl,3,1,symm
dl,2,1,volt,1
dl,4,1,volt,0
esiz,.01
amesh,1
fini
/solu
anty,stat
solve



/post1
set,last
PLNSOL, VOLT,, 0
/eof
! ETABLE, Lab, Item, Comp
/PSF,PRES,NORM,2,0,1
/PBF,DEFA, ,1 
/PBC,ALL,,1   


! PLNSOL,S,X,0,1.0
! /titl, NEXT100 press vess 15 bar
/CONT,1,9,-0.11e10, ,.037e9	!use to check quartz limits
! /CONT,1,9,AUTO  
! /titl, 0.371 mm 6H-SiCl stress
PLNSOL,S,X,0,1.0