mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
100 lines
1.7 KiB
Plaintext
100 lines
1.7 KiB
Plaintext
puts "============"
|
|
puts "OCC23187"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# Cut with a compound
|
|
######################################################
|
|
|
|
# Création cylindre tronqué ouvert avec 4 zones
|
|
|
|
# Démarche
|
|
# - Création de quatre faces planes connexes (profil représentant les
|
|
# 3 couches et l'interieur
|
|
# - Génération des portions de cylindres connexes par révolution
|
|
# des faces précédentes
|
|
# - Creation du plan et troncature (cut) de l'objet précedent
|
|
|
|
# => temps moyen : 62source ms
|
|
|
|
vertex v0 0 0 0
|
|
vertex v1 1 0 0
|
|
vertex v2 2 0 0
|
|
vertex v3 3 0 0
|
|
vertex v4 4 0 0
|
|
vertex v5 5 0 0
|
|
|
|
vertex v01 0 0 5
|
|
vertex v11 1 0 5
|
|
vertex v21 2 0 5
|
|
vertex v31 3 0 5
|
|
vertex v41 4 0 5
|
|
|
|
edge e1 v0 v1
|
|
edge ee2 v1 v11
|
|
edge e3 v11 v01
|
|
edge e4 v01 v0
|
|
|
|
wire w1 e1 ee2 e3 e4
|
|
mkplane f1 w1
|
|
|
|
orientation ee2 R
|
|
|
|
edge e1 v1 v2
|
|
edge eee2 v2 v21
|
|
edge e3 v21 v11
|
|
|
|
wire w1 e1 eee2 e3 ee2
|
|
mkplane f2 w1
|
|
|
|
orientation eee2 R
|
|
|
|
edge e1 v2 v3
|
|
edge eeee2 v3 v31
|
|
edge e3 v31 v21
|
|
|
|
wire w1 e1 eeee2 e3 eee2
|
|
mkplane f3 w1
|
|
|
|
orientation eeee2 R
|
|
edge e1 v3 v4
|
|
edge eeeee2 v4 v41
|
|
edge e3 v41 v31
|
|
|
|
wire w1 e1 eeeee2 e3 eeee2
|
|
mkplane f4 w1
|
|
shape sp Sh
|
|
add f1 sp
|
|
add f2 sp
|
|
add f3 sp
|
|
add f4 sp
|
|
|
|
revol r sp 0 0 0 0 0 1 270
|
|
|
|
plane p
|
|
mkface fp p -6 6 -6 6
|
|
|
|
trotate fp 0 0 0 0 1 0 20
|
|
ttranslate fp 0 0 3
|
|
|
|
shape s Sh
|
|
add fp s
|
|
|
|
shape so So
|
|
add s so
|
|
|
|
explode r
|
|
compound r_1 r_2 r_3 r_4 cr
|
|
bcut result cr so
|
|
|
|
checkshape result
|
|
set area_result 231.511
|
|
checkprops result -s ${area_result}
|
|
checkview -display result -2d -path ${imagedir}/${test_image}_1.png
|
|
|
|
compound r_2 r_1 r_4 r_3 cr
|
|
bcut result2 cr so
|
|
checkshape result2
|
|
checkprops result2 -s ${area_result}
|
|
checkview -display result2 -2d -path ${imagedir}/${test_image}_2.png
|