mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-02 17:46:22 +03:00
26 lines
511 B
Plaintext
26 lines
511 B
Plaintext
puts "==========="
|
|
puts "OCC23709"
|
|
puts "==========="
|
|
puts ""
|
|
##################################
|
|
# Redesign of hlrtest command
|
|
##################################
|
|
|
|
set x_coord 183
|
|
set y_coord 267
|
|
|
|
restore [locate_data_file bug23709_surfcone.brep] result
|
|
vinit
|
|
vdisplay result
|
|
vrotate 35 0 0
|
|
vfit
|
|
vhlr on
|
|
vhlrtype algo result
|
|
|
|
vaspects -setwidth 5
|
|
if { "[vreadpixel $x_coord $y_coord rgb name]" != "YELLOW" } {
|
|
puts "Error : color is not yellow"
|
|
}
|
|
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|