Restoring test cases removed by last commit.
[occt.git] / tests / bugs / moddata / bug252_1
1
2 puts "================"
3 puts "OCC252"
4 puts "================"
5 puts ""
6
7 pload QAcommands
8
9 restore [locate_data_file OCC252.brep] a 
10
11 puts [checkshape a]
12
13 explode a w
14
15 OCC252 result a_466 a 0
16
17 regexp {Mass +: +([-0-9.+eE]+)} [lprops result] full len
18
19 if { ${len} <= 0 } {
20    puts "Error : OCC252"
21 }
22
23 set 2dviewer 0