mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
29 lines
684 B
Plaintext
29 lines
684 B
Plaintext
puts "============"
|
|
puts "OCC25232"
|
|
puts "============"
|
|
puts ""
|
|
#########################################################################
|
|
# Functionality to create solids from set of shapes
|
|
#########################################################################
|
|
|
|
cylinder cyl 10
|
|
trimv cyl cyl -20 20
|
|
mkface fcyl cyl
|
|
cone con 45 0
|
|
trimv con1 con 0 15
|
|
trimv con2 con -15 0
|
|
mkface fcon1 con1
|
|
mkface fcon2 con2
|
|
plane pl 0 0 15 0 0 1
|
|
mkface fp pl -15 15 -15 15
|
|
sphere sph 0 0 0 12
|
|
mkface fsph sph
|
|
|
|
mkvolume result fcyl fsph
|
|
# 2 solids created
|
|
|
|
set square 3476.67
|
|
|
|
checknbshapes result -vertex 4 -edge 8 -wire 4 -face 4 -shell 2 -solid 2 -compsolid 0 -compound 1 -shape 25
|
|
set 2dviewer 1
|