title bracket by mike burger
sd 1 plan -.375 0 0 1 0 0
sd 2 plan .375 0 0 1 0 0 
sd 3 plan 2.875 0 0 1 0 0
sd 4 plan 3.625 0 0 1 0 0
sd 5 cy 3.25 0 4. 0 1 0 1.375
sd 6 cy 0 7.25 4. 1 0 0 1.375
sd 7 plan 0 0 0 0 0 1
sd 8 plan 0 0 1 0 0 1
sd 9 plan 0 0 4 0 0 1
sd 10 cy 0 0 0 0 0 1 1.375
para theta [7*180/27]
     dy    [cos(%theta)]
     dz    [sin(%theta)]
     xi    [asin(.375/1.375)]
     phi   [%xi+(90-%xi)/8]
     x1    [3.25+1.375*cos(-90-%phi)]
     z1    [4+1.375*sin(-90-%phi)]
     x2    [3.25+1.375*cos(-90+%phi)]
     z2    [4+1.375*sin(-90+%phi)] ;
c ***** part 1 mat 1 ***** cyl1
cylinder 1 4;1 11 19 23 31 41;1 3 26 30 32;
.75 1.375 90 180 250 290 360 450 0 .25 3.5 4.25 4.5
sfi -2;-3; ;sd 1
sfi -2;-4; ;sd 2
sfi -2;;;sd 10
mate 1
lct 1 rz 180 rx -90 mx 3.25 mz 4;lrep 1;
caption cap part 1 mat 1 cyl-1
endpart
c ******* part 2 mat 2 ***** cyl2
cylinder 1 4;1 28 55;1 2 6 11;
.75 1.375 90 270 450 6.125 6.375 7.125 7.875
lct 1 ry 90 my 7.25 mz 4;lrep 1;
mate 2
caption cap part 2 mat 1 cyl-2
endpart
c ******* part 3 mat 3 ******** wall
block
1 3 7 10 18 19 23 24 29 36 37 41 46;
1 3 7 13 17 24 28 29 36 40 53 56;
1 7 15 22;
0. .3 .9 1.375 2.625 2.875 3.625 3.875 5.225 6.125 6.375 7.125 7.875
.25 .4 1. 2. 2.6 3.5 4.25 4.5 5.5 6.5 8. 8.675
0. 1. 2.6 4.
dei 2 3 0 11 12; 2 3 0 4 5; ;
dei 1 11 ; 7 12; ;
dei 1 4; ; 2 4;
dei 12 13; ; 2 4;
dei 1 6 0 7 13; 1 6; 2 4;
pb 11 10 3 12 10 3 yz [7.25-%dy] [4-%dz]
pb 11 11 3 12 11 3 yz [7.25+%dy] [4-%dz]
pb 5 1 3 5 12 3 xz %x1 %z1
pb 8 1 3 8 12 3 xz %x2 %z2
mb 9 6 3 9 7 3 x -.3
sfi -2 -3; -2 -3;  ; cy .625  .75  0 0 0 1 .375
sfi -2 -3; -4 -5;  ; cy .625 2.25  0 0 0 1 .375
sfi -11 -12; -2 -3; ; cy 6.625 .75  0 0 0 1 .375
sfi -11 -12; -4 -5; ; cy 6.625 2.25 0 0 0 1 .375
c wall
sfi 9 -11 ; -7 9; ; cy 4.625 6. 0 0 0 1 1.75
sfi 9 -12; -6 9; ; cy 4.625 6. 0 0 0 1 2.5
c journal insert
dei 5 8; ; 3 4;
dei ;10 11; 3 4;
sfi -6;1 7;2 3;sd 3
sfi -7;1 7;2 3;sd 4
sfi -5 -8; ; -3 4; sd 5
sfi ;-10 -11; -3 4; sd 6
sfi ; ;-1;sd 7 
sfi ; ;-2;sd 8 
sfi ; ;-4;sd 9 
res 8 6 4 11 7 4 i 1
res 8 6 1 11 7 2 i 1
res 8 1 1 11 5 2 i 1
res 11 12 2 12 12 4 k 1
res 11 7 1 12 9 4 j 1
res 13 1 1 13 9 2 j 1
res 11 9 1 13 12 2 j 1
res 4 6 2 6 6 2 i 1
res 1 1 1 6 1 2 i 1
res 7 1 1 13 1 2 i 1
res 1 1 1 1 6 2 j 1
res 7 1 1 7 6 3 j 1
res 6 1 1 6 6 3 j 1
tfi 8 9;-6; ;
tfi 12 13;1 9;-2;
relaxi 1 6;1 6;-2;5 0.001 1
relaxi 7 13;1 6;-2;5 0.001 1
relaxi 12 13; ;-2;5 0.001 1
relaxi ;;-1;5 0.001 1
mate 3
endpart
merge
rx -40 ry -40 zf 1.5 tvv
