/COLOR,PBAK,OFF /prep7 et,1,1 r,1,2.54 mp,ex,1,205000 mp,prxy,1,0.3 *afun,deg k,1,0,0,0 k,2,100*cos(0) , 100*sin(0) ,0 k,3,100*cos(30), 100*sin(30) ,0 k,4,100*cos(60), 100*sin(60) ,0 k,5,100*cos(90), 100*sin(90) ,0 k,6,100*cos(120),100*sin(120),0 k,7,100*cos(150),100*sin(150),0 k,8,100*cos(180),100*sin(180),0 l,1,2 l,1,3 l,1,4 l,1,5 l,1,6 l,1,7 l,1,8 l,2,3 l,3,4 l,4,5 l,5,6 l,6,7 l,7,8 lesize,all, , ,1 lmesh,all nsel,s,loc,x,100 d,all,all nsel,s,loc,x,-100 d,all,uy allsel f,1,fy,-100 finish /solu antype,static solve finish save /post1 etable,,ls,1