Adding test cases from chl grid
[occt.git] / tests / bugs / iges / bug23622_1
1 puts "============"
2 puts "OCC23622"
3 puts "============"
4 puts ""
5 #######################################################################
6 # IGES import produces invalid shape with parameter read.iges.bspline.continuity=0
7 #######################################################################
8
9 igesbrep [locate_data_file bug23622_seatmotor2.igs] s1 397
10
11 renamevar s1_1 result
12
13 nbshapes result
14
15 set nb_v_good 4
16 set nb_e_good 5
17 set nb_w_good 1
18 set nb_f_good 1
19 set nb_sh_good 0
20 set nb_sol_good 0
21 set nb_compsol_good 0
22 set nb_compound_good 0
23 set nb_shape_good 11
24
25 set tol [tolerance result ]
26 regexp { *Tolerance +MAX=([-0-9.+eE]+)} ${tol} full max_tol
27 puts "max_tol=${max_tol}"
28 if {${max_tol} > 0.02} {
29   puts "Error : Bad tolerance"
30 }
31
32 set 3dviewer 1