puts "====================================================================="
puts "OCC31485: Export STEP in nonmanifold mode looses all faces except one"
puts "====================================================================="
puts ""

brestore [locate_data_file bug31485.brep] a

param write.step.nonmanifold 1

set aTmpFile "$imagedir/${casename}.step"
testwritestep "$aTmpFile" a
testreadstep  "$aTmpFile" result
file delete   "$aTmpFile"

checkshape result
checknbshapes result -face 3