0031673: Draw Harness, ViewerTest - command vlocation applies transformation in oppos...
[occt.git] / tests / bugs / vis / bug31673
1 puts "============"
2 puts "0031673: Draw Harness, ViewerTest - vlocation -rotate is applied in opposite order"
3 puts "============"
4 puts ""
5
6 pload MODELING VISUALIZATION
7 box b -1 -1 -1 2 2 2
8 explode b F
9 vclear
10 vinit View1
11 vdisplay -dispMode 0 b_1 b_3 b_4 b_6
12 vdisplay -dispMode 1 b_2 b_5
13 vfit
14 vzoom 0.4
15 vlocation b_2 -reset
16 vlocation b_5 -reset
17 vlocation b_2 -rotate  1 -1 -1 0 1 0 90
18 vlocation b_2 -rotate -1 -1 -1 0 1 0 90
19 vlocation b_5 -rotate -1 -1 -1 0 1 0 90
20 if { [vreadpixel 170 380 -rgb -name] == "BLACK" } { puts "Error: wrong rotation" }
21
22 vdump ${imagedir}/${casename}.png