puts "========================"
puts "OCC24390"
puts "========================" 
puts ""
#######################################################################
# Sewing produces the result with huge tolerance
#######################################################################

pload XSDRAW

restore [locate_data_file bug24390_face1.brep] f1
restore [locate_data_file bug24390_face2.brep] f2

sewing result f1 f2

checkshape result
checkmaxtol result 0.028334611098393123 {f1 f2} -min_tol 0 -multi_tol 5.
checknbshapes result -shell 1
checkfreebounds result 6

set 2dviewer 1