1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
puts "============"
puts "OCC10702"
puts "============"
puts ""
#######################################################################
# MeshVS_NodalColorPrsBuilder does not take into account visibility of mesh elements
#######################################################################
set BugNumber OCC10702
pload XDE
vinit
meshfromstl m [locate_data_file OMF6391_box.stl]
set x_coord 180
set y_coord 260
vsetdispmode m 2
puts "\nMesh displayed in shading mode"
checkcolor $x_coord $y_coord 0 0 0.36
vselmode m 8 1
puts "\nSelection of elements is activated"
vselect $x_coord $y_coord 1
###vselect $x_coord $y_coord 1
meshhidesel m
puts "\nSelected elemement is hidden"
checkcolor $x_coord $y_coord 0 0 0.36
meshcolors m nodal 0
puts "\nDisplay nodal color presentation"
#checkcolor $x_coord $y_coord 0.46 0.12 0.37
checkcolor $x_coord $y_coord 0.72 0.72 0.70
set only_screen 1
|
