puts "================"
puts "0031587: Modeling Data - Remove internal sub-shapes from the shape"
puts "================"
puts ""

restore [locate_data_file bug31587_wall12.brep] s
removeinternals s

checkshape s
checknbshapes s -vertex 16 -edge 16 -wire 3 -face 3