0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug26641
CommitLineData
1d92133e 1puts "============"
2puts "CR26641"
3puts "============"
4puts ""
5
6##############################################################################################################
7# 0026641: Visualization, TKOpenGl - handle correctly transformation persistence within perspective projection
8##############################################################################################################
9
10vinit
11vclear
12
13box b0 30 0 0 10 10 10
14box b1 -30 -30 30 10 30 20
15vdisplay b0
16vdisplay b1
17vfit
18
19vdump ${imagedir}/${casename}_none_pers_ortho.png
20
21vdisplay b1 -trsfPers zoom -trsfPersPos -30 -30 30
22vfit
23
24vdump ${imagedir}/${casename}_zoom_pers_ortho.png
25
26vcamera -persp
27vfit
28
29vdump ${imagedir}/${casename}_zoom_pers_persp.png
30
31vselect 30 70
32
33if {[vnbselected] != 1} {
34 puts "ERROR: Transform persistence object is not selected!"
35}