1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
occt/tests/bugs/modalg_1/buc60801
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

21 lines
380 B
Plaintext
Executable File

puts "========================"
puts "BUC60801"
puts "========================"
box b -10 -10 -10 30 40 40
box a1 -20 0 -20 20 20 100
box a2 0 20 -20 50 20 100
box c -20 -20 20 100 100 100
bcut r1 b a1
bcut r2 r1 a2
bcut r3 r2 c
checkshape r3
renamevar r3 result
checkprops result -s 6400
checkshape result
checkview -display result -2d -path ${imagedir}/${test_image}.png