0026855: Draw commands to debug Boolean Operations Algorithm

[occt.git] / tests / bugs / xde / bug25357

puts "=========="
puts "OCC25357"
puts "=========="
puts ""
#######################################################################################
# STL writer does not check the given shape for existing triangulation and remeshes 
# shape using BRepMesh in force mode
#######################################################################################

set aFile ${imagedir}/${test_image}.stl
file delete -force ${aFile}

set anASCIImode 0

ptorus res 10 8
incmesh res 0.5

set LogBefore [trinfo res]

writestl res ${aFile} ${anASCIImode}

set LogAfter [trinfo res]

set status 1
if { ![file exists ${aFile}] } {
  set status 0
}

# Check file size
set filesize [ file size ${aFile} ]
if { ${filesize} == 0 } {
  set status 0
}

if { $LogBefore != $LogAfter } {
  set status 0
}

if {$status == 1} {
  puts "OK: STL writer check given shape"
} else {
  puts "Error: STL writer does not check given shape"
}