mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-04 13:13:25 +03:00
21 lines
395 B
Plaintext
Executable File
21 lines
395 B
Plaintext
Executable File
puts "========================"
|
|
puts "BUC60825"
|
|
puts "========================"
|
|
|
|
pload QAcommands
|
|
|
|
line aLine 0 0 0 0 0 1
|
|
mkedge aEdge1 aLine
|
|
restore [locate_data_file buc60825.brep] aEdge2
|
|
puts [checkshape aEdge2]
|
|
|
|
distmini d aEdge1 aEdge2
|
|
regexp {NB RESULTS +: +([-0-9.+eE]+)} [BUC60825 aEdge1 aEdge2] full ext
|
|
if { $ext != 0 } {
|
|
puts "Error : The extrema has not been calculated."
|
|
}
|
|
|
|
|
|
|
|
|