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
/
simple
/
T9
1
#box b -15 -15 -15 15 30 30
2
#beziercurve w 4 0 0 0 10 0 0 10 10 0 20 10 0
3
#mkedge w w
4
#wire w w
5
#circle profile 0 0 0 1 0 0 10
6
#mkedge profile profile
7
#wire profile profile
8
#mkplane profile profile
9
#pipe p w profile
10
#explode b F
11
#explode p F
12
#glue s p b p_2 b_2
13
14
restore 6_G1234.draw s
15
tscale s 0 0 0 SCALE2
16
explode s E
17
blend result s 10*SCALE2 s_10
18
19
set square 4893.19