mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-22 12:48:37 +08:00
17 lines
303 B
Plaintext
17 lines
303 B
Plaintext
|
|
puts "========================"
|
|
puts "BUC60968"
|
|
puts "========================"
|
|
|
|
restore [locate_data_file buc60968-c.draw] c
|
|
restore [locate_data_file buc60968-s1.draw] s1
|
|
|
|
set che [extrema c s1]
|
|
set err [llength $che]
|
|
if { $err == 0} {
|
|
puts "Error : command extrema does NOT work properly"
|
|
}
|
|
|
|
|
|
|