a963a658aca3ee91c1295c580ff0c3402a534459
[occt.git] / tests / bugs / vis / bug24374
1 puts "============"
2 puts "CR24374"
3 puts "============"
4 puts ""
5 #######################################################################
6 #  Flipping affects highlight presentation of dimension
7 #######################################################################
8 box b 100 100 100
9 explode b e
10 vdisplay b
11 vdisplay b_9
12 vdimension length name=dim1 b_9 text=3d plane=zox
13 vdisplay dim1
14 vselmode b 2 1
15 vselmode dim1 2 1
16 vfit
17 vmoveto 140 370
18
19 set x_coord 140
20 set y_coord 370
21 checkcolor $x_coord $y_coord 0 1 1
22
23 if { $stat != 1 } {
24   puts "Error : Highlighting of dimension with flipping in local context failed."
25 }
26
27 set only_screen 1