0026742: Update test cases for using checknbshapes procedure instead of global variables
[occt.git] / tests / bugs / modalg_2 / bug21448
CommitLineData
3bea4c16 1puts "============"
2puts "OCC21448"
3puts "============"
4puts ""
5#######################################################################
6# Invalid result of BRepOffsetAPI_MakePipeShell
7#######################################################################
8
9set BugNumber OCC21448
10
11puts "Load first shape ..."
12restore [locate_data_file bug21448_base_1.brep] base1
13
14puts "Load second shape ..."
15restore [locate_data_file bug21448_Invert_2.brep] Invert_2
16
17puts "Load third shape ..."
18restore [locate_data_file bug21448_chemin.brep] chemin
19
20puts "Prepare shapes ..."
21wire w1 chemin
22explode base1 W
23explode Invert_2 W
24explode chemin V
25
26puts "Start Make pipe ..."
27mksweep w1
28addsweep base1_1 chemin_1 -R
29addsweep Invert_2_1 chemin_2 -R
30buildsweep result
31puts "Finish Make pipe ..."
32
33set square 1040.94
34
a4eba920 35checknbshapes result -vertex 4 -edge 6 -wire 2 -face 2 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 15
3bea4c16 36vinit
37vsetdispmode 0
38vdisplay result
39vfit
40
41set only_screen 0