/prep7
/pnum,line,1
/pnum,kp,1
/pnum,area,1
/pnum,volu,1
cylind,0.625,2.25,0.56
wprota,30
wpoffs,1.44
cylind,0,0.28,0.6
wpcsys,1,0
wprota,150
wpoffs,1044
wpcsys,1,0
wprota,150
wpoffs,1.44
cylind,0,0.28,0.6
wpcsys,1,0
wpoffs,0,-1.44
cylind,0,0.28,0.6
vsbs,1,2
vsbv,1,2
vsbv,5,3
vsbv,1,4
wpcsys,1,0
*afun,deg
th=acos((1.5*1.5+1.44*1.44-0.69*0.69)/2/1.5/1.44)
th1=th+30
th2=150-th
cylind,1.5,2,0.56,1.75,th1,th2
csys,1
vgen,3,1,,,0,120
vplot
vadd,all
vplot |