projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
0023087: Upgrade of the OCCT test system
[occt.git]
/
tests
/
blend
/
tolblend_simple
/
B3
1
#box b 0 0 0 20 20 20
2
#box b2 0 0 20 20 20 20
3
#box b3 20 0 0 20 20 20
4
#box b4 0 -20 0 20 20 20
5
#explode b f
6
#explode b2 f
7
#explode b3 f
8
#explode b4 f
9
#glue r b2 b b2_5 b_6
10
#explode r f
11
#glue r b4 r b4_4 r_2
12
#explode r f
13
#glue s b3 r b3_1 r_4
14
#save s 5_J12.draw
15
16
restore 5_J12.draw s
17
tscale s 0 0 0 SCALE1
18
explode s E
19
blend result s 2*SCALE1 s_26 2*SCALE1 s_19 2*SCALE1 s_15 2*SCALE1 s_16 2*SCALE1 s_27 2*SCALE1 s_25
20
explode result So
21
tcopy result_1 result
22
23
set square 177551