[occt.git] / tests / bugs / moddata / buc60825

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."
}
Commit	Line	Data
0e94a94e	1	puts "========================"
	2	puts "BUC60825"
	3	puts "========================"
	4
	5	pload QAcommands
	6
	7	line aLine 0 0 0 0 0 1
	8	mkedge aEdge1 aLine
	9	restore [locate_data_file buc60825.brep] aEdge2
	10	puts [checkshape aEdge2]
	11
	12	distmini d aEdge1 aEdge2
	13	regexp {NB RESULTS +: +([-0-9.+eE]+)} [BUC60825 aEdge1 aEdge2] full ext
	14	if { $ext != 0 } {
	15	puts "Error : The extrema has not been calculated."
	16	}
	17
	18
	19
	20