mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-06-25 12:04:07 +03:00
21 lines
568 B
Plaintext
Executable File
21 lines
568 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC17194"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Incorrect section of a face got by extrusion of an arc of circle
|
|
#######################################################################
|
|
|
|
set BugNumber OCC17194
|
|
|
|
circle f 0 0 0 0 0 1 1 0 0 20
|
|
mkedge f f -pi/2 pi/2
|
|
prism f f 50 0 30
|
|
plane pl 10 0 0 1 0 4
|
|
mkface pl pl
|
|
bsection result f pl
|
|
|
|
checknbshapes result -vertex 4 -edge 2 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 7
|
|
set length 15.8064
|
|
set 2dviewer 0
|