puts "TODO OCC11111 ALL: Error : The square of result shape is"
puts "TODO OCC11111 ALL: Error :  is WRONG because number of"

puts "================"
puts "OCC22641"
puts "================"
puts ""
#######################################################################################
# Meshing problem on the attached model
######################################################################################

set BugNumber OCC22641

catch { pload XDE }

testreadstep [locate_data_file OCC22641-RailBosch.stp] result

set square 160133

checknbshapes result -vertex 7608 -edge 12032 -wire 4750 -face 4444 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 28836
vinit
tclean result
vsetdispmode 1
vdisplay result
vfit

set 3dviewer 1