Adding of testing cases from subgroups 937 940 and 941 of CHL group
[occt.git] / tests / bugs / modalg_1 / bug1456
1 puts "============"
2 puts "OCC1456"
3 puts "============"
4 puts ""
5 ######################################################
6 # Impossible to build mixed type fillets
7 ######################################################
8
9 restore [locate_data_file OCC1456.brep] a 
10
11 checkshape a
12
13 ##############################################
14 explode a w
15 explode a_4 e
16 mkevol result a
17 updatevol a_4_1 0 5 0.5 20 1 5
18 updatevol a_4_2 0 5
19 updatevol a_4_3 0 5
20 updatevol a_4_4 0 5 0.5 20 1 5
21 updatevol a_4_5 0 5 0.5 20 1 5
22 updatevol a_4_6 0 5
23 updatevol a_4_7 0 5 0.5 20 1 5
24 updatevol a_4_8 0 5
25
26 if { [catch { buildevol } catch_result] } {
27     puts "Faulty OCC1456 (case 2)"
28 }
29
30 vinit
31 vdisplay result
32 vsetdispmode 0
33 vfit
34
35 set square 3.21455e+06
36 set only_screen 1