0025987: Integration part of modified unstable test cases
[occt.git] / tests / bugs / modalg_2 / bug472_3
CommitLineData
9aa684ed 1if { [regexp {Debug mode} [dversion]] } {
2 puts "TODO OCC25917 ALL: TEST INCOMPLETE"
3 puts "TODO OCC25917 ALL: Tcl Exception"
4}
a87752f3 5
6puts "========================"
7puts " OCC472 "
8puts "(case 3)"
9puts "========================"
10puts ""
11#####################################################
12## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634)
13#####################################################
14
15restore [locate_data_file OCC472a.brep] b1
352ffd73 16checkshape b1
a87752f3 17
18restore [locate_data_file OCC472b.brep] b2
352ffd73 19checkshape b2
a87752f3 20
21bfuse result b1 b2
22
393598eb 23set nb_v_good 66
24set nb_e_edge 107
25set square 31657.5
a87752f3 26set 2dviewer 0
27