1 puts "=================================================================================="
2 puts "0030630: Visualization - wrong visualization of shape with mirrored transformation"
3 puts "Check that solid with mirrored transformation is displayed as turned out"
4 puts "=================================================================================="
6 pload MODELING VISUALIZATION
15 vdisplay -dispMode 1 b
16 vaspects b -setBackFaceColor RED
18 vdump $imagedir/${casename}_simple.png
21 # Box with mirror transformation
24 vdisplay -dispMode 1 a
25 vaspects a -setBackFaceColor RED
27 box aa -0.5 0.5 0.5 0.1 0.1 0.1
28 vdisplay -dispMode 1 aa
30 vdump $imagedir/${casename}_mirror.png
31 if { [vreadpixel 195 220 rgb name] != "BLUE2" } { puts "Error: mirrored box should look inside out" }
34 # Box with mirror transformation and reversed face
38 vdisplay -dispMode 1 c
39 vaspects c -setBackFaceColor RED
41 vdump $imagedir/${casename}_mirrev.png
42 if { [vreadpixel 195 220 rgb name] == "BLUE2" } { puts "Error: revered mirrored box should NOT look inside out" }