mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-31 11:15:31 +03:00
24 lines
603 B
Plaintext
Executable File
24 lines
603 B
Plaintext
Executable File
puts "========================"
|
|
puts " OCC303 "
|
|
puts "(case 1)"
|
|
puts "========================"
|
|
puts ""
|
|
#################################################################
|
|
## Exception while segment operation.
|
|
#################################################################
|
|
|
|
restore [locate_data_file OCC303a.brep] sh1
|
|
|
|
explode sh1 e
|
|
|
|
mkcurve c5 sh1_5
|
|
trim result c5
|
|
|
|
if [catch {segment result 22.07126804854423 23.6320483505636} catch_result] {
|
|
puts "Faulty OCC303 (case 1): function SEGMENT works wrongly"
|
|
} else {
|
|
puts "OCC303 OK (case 1): function SEGMENT works properly"
|
|
}
|
|
|
|
set 2dviewer 0
|