0024326: Get rid of confusing extension line
[occt.git] / tests / bugs / step / bug3397
1 puts "============"
2 puts "OCC3397"
3 puts "============"
4 puts ""
5 ######################################################
6 # Incorrect work of ShapeFix_ComposeShell
7 ######################################################
8
9 set BugNumber OCC3397
10
11 #mkv-04.09.06
12 param read.step.shape.relationship OFF
13
14 set filepath [locate_data_file trj12_b3-tu-203.stp]
15 if [catch { stepread $filepath a * } res] {
16     puts "Faulty ${BugNumber} : here is reading problem"
17 } else {
18     tpcompound result
19     
20     set square 1.48021e+06
21     set nb_v_good 1228
22     set nb_e_good 1938
23     set nb_w_good 762
24     set nb_f_good 696
25     set nb_sh_good 1
26     set nb_sol_good 1
27     set nb_compsol_good 0
28     set nb_compound_good 1
29     set nb_shape_good 4627
30 }
31
32 set 2dviewer 0