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
/
U4
1
#box b -15 -20 -15 25 35 30
2
#polyline w 0 0 0 20 -10 0
3
#circle p 0 0 0 1 0 0 12
4
#mkedge p p
5
#wire p p
6
#mkplane p p
7
#pipe s1 w p
8
#fuse f1 s1 b
9
#pcylinder c 8 30
10
#trotate c 0 0 0 1 0 0 90
11
#donly f1 c
12
#fuse s f1 c
13
#donly s
14
#save s 6_H56.draw
15
16
restore 6_H56.draw s
17
tscale s 0 0 0 SCALE2
18
explode s E
19
blend result s 5*SCALE2 s_2
20
21
set square 6583.29