0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug597_1
CommitLineData
352ffd73 1puts "=================================="
2puts "BUC60569"
3puts "OCC597"
4puts "=================================="
5puts "It takes visual check for this BUG"
6puts "=================================="
7
8restore [locate_data_file buc60569a.rle] result
9tclean result
10vinit
11
12checkshape result
13
14BUC60569 result
15vfit
4754e164 16vselect 250 190
352ffd73 17
18set x_coord 335
19set y_coord 331
20
21checkcolor $x_coord $y_coord 0.8 0.8 0.8
22
23if {$stat != 1} {
24 puts "Error : The right face is NOT Selected by Select command."
25}
26
4754e164 27vselect 180 350 1
352ffd73 28
29set x_coord 101
30set y_coord 347
31
32checkcolor $x_coord $y_coord 0.8 0.8 0.8
33
34if {$stat != 1} {
35 puts "Error : The left face is NOT Selected by Shift Select command."
36}
37
5747059b 38checkview -screenshot -3d -path ${imagedir}/${test_image}.png
352ffd73 39
40