1puts "========"
2puts "OCC28776"
3puts "========"
4puts ""
5####################################################################
6# Extend the field BOPAlgo_Builder::myOrigins so that the shape could have multiple origins
7####################################################################
8
9box b1 10 10 10
10box b2 10 10 10
11box b3 10 10 10
12
13bclearobjects
14bcleartools
15baddobjects b1 b2 b3
16bfillds
17bbuild r
18
19explode r v
20boporigin r_1
21checknbshapes r_1_or -vertex 3
22
23explode r e
24boporigin r_1
25checknbshapes r_1_or -edge 3
26
27explode r f
28boporigin r_1
29checknbshapes r_1_or -face 3
30
31explode r so
32boporigin r_1
33checknbshapes r_1_or -solid 3
34
35