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

31 lines
828 B
Plaintext
Executable File

puts "========"
puts "BUC60814"
puts "========"
puts ""
vinit
BUC60814
vfit
set x_coord 131
set y_coord 352
checkcolor $x_coord $y_coord 0 0 1
#AKI.111002.Against **Exception..-it's on lin.Changed coord of trihedron.
if {$stat != 1} {
puts "Error : Circle has NOT blue color."
}
set x_coord 170
set y_coord 319
checkcolor $x_coord $y_coord 0 0 1
if {$stat != 1} {
puts "Error : Trihedron has NOT blue color."
}
checkview -screenshot -3d -path ${imagedir}/${test_image}.png