CPRISM_, FPRISM_, HPRISM_
CPRISM_
h=0.2
cprism_ mat, mat, mat,
5, h,
0, B, 15,
A, B, 15,
A, 0, 15,
0, 0, 15,
0, B, -1
r=0.5
h=0.2
cprism_ mat, mat, mat,
13, h,
-r, 0, 79,
0, 0, 900,
0, 90, 4001,
0, -r, 79,
0, 0, 900,
0, 90, 4001,
r, 0, 79,
0, 0, 900,
0, 90, 4001,
0, r, 79,
0, 0, 900,
0, 90, 4001,
-r, 0, -1
!==================================or...
prism_ 2, h,
0, 0, 913,
rad, 360, 4013
!==================================or...
revolve 2, 360, 1+2+16+32+128,
0, r, 0,
h, r, 0
!==================================or...
cylind h, r
rad=0.5
h=0.2
ths=0.1
cprism_ mat, mat, mat,
26, h,
-rad, 0, 79,
0, 0, 900,
0, 90, 4001,
0, -rad, 79,
0, 0, 900,
0, 90, 4001,
rad, 0, 79,
0, 0, 900,
0, 90, 4001,
0, rad, 79,
0, 0, 900,
0, 90, 4001,
-rad, 0, -1,
0, -1*(rad-ths), 79,
0, 0, 900,
0, -90, 4001,
-1*(rad-ths), 0, 79,
0, 0, 900,
0, -90, 4001,
0, 1*(rad-ths), 79,
0, 0, 900,
0, -90, 4001,
1*(rad-ths), 0, 79,
0, 0, 900,
0, -90, 4001,
0, -1*(rad-ths), -1
! =====================================or...
revolve 5, 360, 4+16+32,
h, rad, 2,
h, rad-ths, 2,
0, rad-ths,2,
0, rad, 2,
h, rad, -1
! =====================================or...
prism_ 4, h,
0, 0, 913,
rad, 360, 4013,
0, 0, 913,
rad-ths, 360, 4012
FPRISM_
h=0.2
hheight=0.03
fprism_ mat, mat, mat, mat,
5, h, 0, hheight,
0, B, 15,
A, B, 15,
A, 0, 15,
0, 0, 15,
0, B, -1
HPRISM_
h=0.2
hheight=0.03
hprism_ mat, mat, mat, mat,
5, h, 0, hheight, 1,
0, B, 15,
A, B, 15,
A, 0, 15,
0, 0, 15,
0, B, -1
HPRISM_
h=0.2
hheight=0.03
addz h/2
hprism_ mat, mat, mat, mat,
5, h/2, 0, hheight, 1,
0, B, 10,
A, B, 10,
A, 0, 10,
0, 0, 10,
0, B, -1
mulz -1
hprism_ mat, mat, mat, mat,
5, h/2, 0, hheight, 1,
0, B, 10,
A, B, 10,
A, 0, 10,
0, 0, 10,
0, B, -1
del 2