我有一个别人写的ansys命令流，是关于 瓦楞纸板建模的！！其中在划分网格时出现错误，不知哪里出了问题，求您给我看一下程序，感激不尽！！！
/filname,corrugated board
/title,corrugated board
*afun,rad
/prep7
ET,1,SHELL63
R,1,0.01,,,,,,
ET,2,SHELL63
R,2,0.05,0,0,0,0,0,
mp,ex,1,4e10
mp,ex,2,5elO
mp,prxy,1,0.3
*do,i,0,31,1
*set,x,0.1*i
*set,y,cos(0.1*i)
k,i+l,x,y,0
*enddo
k,32,3.1,-1.0
kwpave,32
csys,4
kgen,5,1,32,1,6.2
*do,i,1,129,32
ksel,s,kp,,i,i+31
bsplin,all
allsel,all
*enddo
*do,i,0,128,32
kwpave,i+32
csys,4
ksel,s,kp,,i+2,i+31
ksymm,x,all
allsel,all
csys,0
*enddo
*do,i,161,251,30
ksel,s,kp,,i,i+29
ksel,a,kp,,i-129+2*(i-161)/30,i-128+2*(i-161)/30
bsplin,all
*enddo
ksel,s,kp,,281,320
ksel,a,kp,,160
bsplin,all
allsel,all
*do,i,1,128,32
lstr,i,i+32
lstr,i+31,i+63
*enddo
k,311,31,1
k,312,0,-1
k,313,31,-1
k,314,0,1,31
bsplin,281,311
lstr,129,311
lstr,312,32
lstr,160,313
lstr,1,314
*do,i,1,22,1
adrag,i,,,,,,23
*enddo
NUMMRG,KP,0.0001,0.0001,,LOW
Numcmp,all
asel,s,loc,y,1
asel,a,loc,y,-1
TYPE, 2
MAT, 2
REAL, 2
ESYS, 0
SECNUM,
amesh,all
allsel,all
asel,s,loc,y,-0.99,0.99
TYPE, 1
MAT, 1
REAL, 1
ESYS, 0
SECNUM,
amesh,all
allsel,all
FINISH
/SOL
asel,s,loc,y,1
sfa,all,1,pres,10000
allsel,all
asel,s,loc,y,-1
da,all,all
allsel,all
solve
希望您能在百忙之中抽出时间看一下，，感激不尽！！！