puts "=========="
puts "OCC29523"
puts "=========="

polyline p 0 0 0 0 10 0 20 10 0 20 0 0 13 0 0 13 5 0 6 5 0 6 0 0 0 0 0
polyline t -2 2 0 0 2 5 0 2 10 1 2 10 1 2 0 -2 2 0
evolved result -s p -p t -a -solid -v

checkprops result -s 1649.58 -v 1023.79
checkshape result

checknbshapes result -solid 1 -shell 1

if {[regexp "Faulties" [bopargcheck result]]} {
  puts "Error: bopargcheck has found some faulties in res2"
}

checkmaxtol result -ref 1.5e-7

smallview
don result sw tw
fit

checkview -screenshot -2d -path ${imagedir}/${test_image}.png