projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
0026607: Wrong value of area.
[occt.git]
/
tests
/
bugs
/
modalg_1
/
buc60801
1
2
puts "========================"
3
puts "BUC60801"
4
puts "========================"
5
6
box b -10 -10 -10 30 40 40
7
box a1 -20 0 -20 20 20 100
8
box a2 0 20 -20 50 20 100
9
box c -20 -20 20 100 100 100
10
bcut r1 b a1
11
bcut r2 r1 a2
12
bcut r3 r2 c
13
checkshape r3
14
15
renamevar r3 result
16
17
set square 6400
18
set 2dviewer 0
19