projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
0024122: Hang-up during a topological operation.
[occt.git]
/
tests
/
bugs
/
modalg_2
/
bug297_1
1
2
puts "========"
3
puts "OCC297"
4
puts "========"
5
6
vertex v1 250 250 0
7
vertex v2 -250 250 0
8
vertex v3 -250 -250 0
9
vertex v4 250 -250 0
10
11
edge e1 v1 v2
12
edge e2 v2 v3
13
edge e3 v3 v4
14
edge e4 v4 v1
15
16
wire w1 e1 e2 e3 e4
17
18
mkplane f w1
19
20
set x 0
21
set y 0
22
23
set Zpoint -100
24
set Zbox -30
25
26
halfspace hs f $x $y $Zpoint
27
28
box b 0 0 $Zbox 150 200 200
29
30
bcut result b hs
31
32
set square 179000
33
set 2dviewer 0
34