projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
0025132: Visualization - treat any TopoDS_Solid as closed volume
[occt.git]
/
tests
/
bugs
/
vis
/
bug270_2
1
puts "========"
2
puts "OCC270"
3
puts "========"
4
5
vinit
6
box box 10 10 10
7
vaxis axis 1 1 1 7 7 7
8
vdisplay box
9
vdisplay axis
10
vsetdispmode 0
11
12
set x1 172
13
set y1 223
14
15
checkcolor ${x1} ${y1} 1 0 0
16
17
vzclipping FRONT
18
set ZClippingMode [lindex [vzclipping] 2]
19
if {${ZClippingMode} != "FRONT"} {
20
puts "OCC270: Error (ZClippingMode != FRONT)"
21
}
22
23
checkcolor ${x1} ${y1} 1 0 0
24
vfit
25
26
set only_screen 1