为什么没有求解结果啊

galaxy612

大家帮忙看一下以下程序为什么没有求解结果，谢谢了

Fini
/cle
/UNITS,SI
/filename, lip

*set,r1,0.020
*set,r2,0.010
*set,h1,0.00025
*set,h2,0.0001
*set,h3,0.001
*set,w1,0.0015
*set,w2,0.001

/prep7      
et,1,solid95
mp,ex,1,1.3e10
mp,nuxy,1,0.3
mp,ex,2,1.38e11
mp,nuxy,2,0.317

cyl4,0,0,r1,,r2,90,h1
cyl4,0,0,r2+w1,,r2,90,h1-h2
vsbv,1,2
numcmp,all
wpoff,,,h2
cyl4,0,0,r2+0.0004,,,90,-h3

wpcsys,-1,0
csys,1
vsel,u,loc,x,0,0.006
cylind,0.01,0.0115,0.15e-3,0.25e-3,0,90
vovlap,all
wpoffs, , ,0.15e-3
vsbw,all
allsel
csys,0
Vsymm,x,all
Vsymm,y,all
allsel
vglue,all

csys,1
vsel,s,loc,x, -0.009, 0.009
vatt,1
vsel,s,loc,x,-0.009, 0.009
asel,inve,all
vatt,2
allsel

esize,0.0008
vmesh,all

/solu
antype,0
csys,1
asel,s,loc,x,r1-0.001,r1
asel,r,loc,z,h2-h3,h2
csys,0
da,all,all
csys,1
nsel, s,loc,x,0 , r1-0.001
nsel,r,loc,z,h2,h1
csys,0
sf,all,pres,1e5  
allsel
solve
finish

/POST1
plnsol,s,eqv

lindhaga

/post1
set,last
plnsol,s,eqv