mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-21 10:13:43 +03:00
24 lines
559 B
Plaintext
Executable File
24 lines
559 B
Plaintext
Executable File
puts "========================"
|
|
puts " OCC601 "
|
|
puts "SAM1542"
|
|
puts "========================"
|
|
puts ""
|
|
#############################################
|
|
## No possibility to make a fillet 13 at the inner edge of the shape
|
|
#############################################
|
|
|
|
restore [locate_data_file OCC601.brep] a
|
|
checkshape a
|
|
|
|
explode a e
|
|
|
|
if [catch {blend result a 13 a_41 } res] {
|
|
puts "Faulty OCC601: function BLEND works wrongly"
|
|
} else {
|
|
puts "OCC601 OK: function BLEND works good"
|
|
checkshape result
|
|
|
|
set square 32486.0
|
|
set 2dviewer 0
|
|
}
|