puts "TODO OCC12345 ALL: Error : The area of result shape is "
puts "TODO OCC12345 ALL: Error :  is WRONG because number of"
puts "============"
puts "OCC22145"
puts "============"
puts ""
#######################################################################
# Incorrect cutting BRepMesh_FastDiscretFace
#######################################################################

stepread [locate_data_file OCC22145.stp] a *

tpcompound result

checkprops result -s 653115 
checkshape result
checknbshapes result -vertex 684 -edge 1222 -wire 519 -face 512 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 2940
checkview -display result -2d -path ${imagedir}/${test_image}.png
