# Original bug : pro13306
# Date : 4June98

vertex v1 0 0 0           
vertex v2 1 0 0 
vertex v3 1 3 0 
vertex v4 2 3 0 
vertex v5 2 0 0 
vertex v6 3 0 0 
vertex v7 3 5 0 
vertex v8 0 5 0 

edge e1 v1 v2 
edge e2 v2 v3  
edge e3 v3 v4  
edge e4 v4 v5  
edge e5 v5 v6  
edge e6 v6 v7 
edge e7 v7 v8  
edge e8 v8 v1 

wire w e1 e2 e3 e4 e5 e6 e7 e8 

mkplane p w 

prism sol p 0 0 2 

# five tangent faces 
#box b 0 2 1 3 1 1 
               
#one tangent face 
box b -1 2 1 5 1 3 

bcut result sol b 

set square 68