puts "============"
puts "OCC23622"
puts "============"
puts ""
#######################################################################
# IGES import produces invalid shape with parameter read.iges.bspline.continuity=0
#######################################################################

igesbrep [locate_data_file bug23622_seatmotor2.igs] s1 397

renamevar s1_1 result

nbshapes result

set nb_v_good 2
set nb_e_good 3
set nb_w_good 1
set nb_f_good 1
set nb_sh_good 0
set nb_sol_good 0
set nb_compsol_good 0
set nb_compound_good 0
set nb_shape_good 7

set tol [tolerance result ]
regexp { *Tolerance +MAX=([-0-9.+eE]+)} ${tol} full max_tol
puts "max_tol=${max_tol}"
if {${max_tol} > 0.02} {
  puts "Error : Bad tolerance"
}

set 3dviewer 1
