Integration part of tests of grid chl
[occt.git] / tests / bugs / moddata / bug175
1
2 puts "========"
3 puts "OCC175"
4 puts "========"
5 puts ""
6 ###########################################
7 ## ABug of a symmetry on this specific attached BREP shape.
8 ###########################################
9
10 restore [locate_data_file OCC175.brep] result 
11 puts [checkshape result]
12
13 regexp {SHAPE +: +([-0-9.+eE]+)} [nbshapes result] full col1
14
15 tmirror result 0 0 0 0 1 0
16
17 regexp {SHAPE +: +([-0-9.+eE]+)} [nbshapes result] full col2
18 if { $col1 != $col2} {
19    puts  "Error : Command mirror does NOT work properly. "
20 }
21
22 set check_square 1
23 set square 13091.3
24 set 2dviewer 0