mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-26 23:07:01 +08:00
19 lines
304 B
Plaintext
19 lines
304 B
Plaintext
# Original bug : pro13278
|
|
# Date : 25 Nov 98
|
|
|
|
restore pro13278_base.brep base
|
|
restore pro13278_face.brep cont
|
|
|
|
explode base face
|
|
copy base_6 funtil
|
|
|
|
mksurface p6 base_6
|
|
mkface f6 p6
|
|
|
|
featprism base cont cont 0 0 -1 1 1
|
|
featperform prism result f6
|
|
|
|
# indiquer option support face Until
|
|
|
|
set square 603600
|