mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
29 lines
725 B
Plaintext
29 lines
725 B
Plaintext
puts "============"
|
|
puts "CR26014"
|
|
puts "Check that the colored shading shape doesn't have a shading presentation"
|
|
puts "due to its triangulation isn't computed in case of disabled auto triangulation feature."
|
|
puts "But in this case the shape should have special wireframe presentation."
|
|
puts "============"
|
|
puts ""
|
|
|
|
vinit View1
|
|
vclear
|
|
vaxo
|
|
vsetdispmode 1
|
|
vdefaults -autoTriang off
|
|
pcone c 0 5 10
|
|
vdisplay c
|
|
vfit
|
|
|
|
explode c F
|
|
vaspects c -subshapes c_2 -setcolor RED
|
|
|
|
set aColorWireframe [vreadpixel 200 31 rgb name]
|
|
set aColorShaded [vreadpixel 180 60 rgb name]
|
|
|
|
vdump $imagedir/${casename}_shape_pres.png
|
|
|
|
if {"$aColorWireframe" != "RED" || "$aColorShaded" != "BLACK"} {
|
|
puts "Error: presentation of shape is incorrect"
|
|
}
|