306f5893 |
1 | puts "============" |
2 | puts "CR26014" |
3 | puts "Check that the colored shading shape doesn't have a shading presentation" |
4 | puts "due to its triangulation isn't computed in case of disabled auto triangulation feature." |
5 | puts "But in this case the shape should have special wireframe presentation." |
6 | puts "============" |
7 | puts "" |
8 | |
9 | vinit View1 |
10 | vclear |
11 | vaxo |
12 | vsetdispmode 1 |
13 | vdefaults -autoTriang off |
14 | pcone c 0 5 10 |
15 | vdisplay c |
16 | vfit |
17 | |
18 | explode c F |
19 | vaspects c -subshapes c_2 -setcolor RED |
20 | |
21 | set aColorWireframe [vreadpixel 200 31 rgb name] |
22 | set aColorShaded [vreadpixel 180 60 rgb name] |
23 | |
24 | vdump $imagedir/${casename}_shape_pres.png |
25 | |
26 | if {"$aColorWireframe" != "RED" || "$aColorShaded" != "BLACK"} { |
27 | puts "Error: presentation of shape is incorrect" |
28 | } |