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

27 lines
453 B
Plaintext
Executable File

puts "================"
puts "OCC137"
puts "================"
#
# The patch "patch-MITUTOYO-USA-05112001.zip" has to be converted to Open Cascade 4.0
#
puts "IT IS NECESSARY TO CHECK SELECTED FACE SHADING"
puts ""
pload XDE
igesbrep [locate_data_file OCC137-ANC101-Solid.igs] a *
tpcompound a
vinit
vdisplay a
vfit
vsetdispmode 1
# FACE ON
vselmode 4 1
set x 170
set y 80
vselect $x $y
checkview -screenshot -3d -path ${imagedir}/${test_image}.png