0026742: Update test cases for using checknbshapes procedure instead of global variables
[occt.git] / tests / bugs / modalg_2 / bug21261_15
1 puts "TODO OCC25916 ALL: ERROR. C0 continuity of input data."
2 puts "TODO OCC26556 ALL: Tcl Exception: Error : command \\\"nbshapes result\\\" gives an empty result"
3 puts "TODO OCC25916 ALL: TEST INCOMPLETE"
4 puts "========"
5 puts "OCC21261"
6 puts "========"
7 puts ""
8 ######################################################
9 # Implementation of thickening of shell functionality
10 ######################################################
11
12 set BugNumber OCC21261
13
14 restore [locate_data_file OCC21261-2137_bss1_crash_C0.brep] s 
15
16 thickshell result s -5
17
18 set square 27432.4
19
20 checknbshapes result -vertex 4 -edge 6 -wire 6 -face 4 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 22
21 vinit
22 vdisplay result
23 vsetdispmode 0
24 vfit
25 set only_screen 1