0024224: Suspicious logics in changing clipping planes at OpenGl_Structure
[occt.git] / tests / bugs / vis / bug10702
1 puts "TODO OCC12345 ALL: An exception was caught"
2 puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*"
3 puts "TODO OCC12345 ALL: TEST INCOMPLETE"
4
5 puts "============"
6 puts "OCC10702"
7 puts "============"
8 puts ""
9 #######################################################################
10 # MeshVS_NodalColorPrsBuilder does not take into account visibility of mesh elements
11 #######################################################################
12
13 set BugNumber OCC10702
14
15 pload XDE
16
17 meshfromstl m [locate_data_file OMF6391_box.stl]
18
19 set x_coord 180
20 set y_coord 260
21
22 meshdispmode m 2
23 puts "\nMesh displayed in shading mode"
24
25 checkcolor $x_coord $y_coord 0 0 0.36
26
27 meshselmode m 8
28 puts "\nSelection of elements is activated"
29
30 vselect $x_coord $y_coord 1
31 ###vselect $x_coord $y_coord 1
32
33 meshhidesel m
34 puts "\nSelected elemement is hidden"
35
36 checkcolor $x_coord $y_coord 0 0 0.36
37
38 nodalcolor_id m
39 puts "\nDisplay nodal color presentation"
40
41 checkcolor $x_coord $y_coord 0.46 0.12 0.37
42
43 set only_screen 1
44