[occt.git] / tests / bugs / modalg_7 / bug29162

puts "========"
puts "OCC29162"
puts "========"
puts ""
##################################################
# Geom2dInt_GInter algorithm does not find 
# intersection of ellipse and line
##################################################

ellipse e -610.348096534595 -710.720096056787 0.999999902285153 0.000442074298181498 15.0066332711999 0.291884102212871
trim e e 3.09462291909258 9.37780822627216

line l -625.34430362036 -680.713463264921 -0.000252749178714602 -0.999999968058926
trim l l 0 30.0132665523925

set cx 0
set cy 0

regexp {Intersection point 1 : ([-0-9.+eE]+) ([-0-9.+eE]+)} [2dintersect e l ] full cx cy
checkreal n1 $cx -625.35188801291508 1.e-7 1.e-7
checkreal n2 $cy -710.72104765746838 1.e-7 1.e-7
Commit	Line	Data
69f87d09	1	puts "========"
	2	puts "OCC29162"
	3	puts "========"
	4	puts ""
	5	##################################################
	6	# Geom2dInt_GInter algorithm does not find
	7	# intersection of ellipse and line
	8	##################################################
	9
	10	ellipse e -610.348096534595 -710.720096056787 0.999999902285153 0.000442074298181498 15.0066332711999 0.291884102212871
	11	trim e e 3.09462291909258 9.37780822627216
	12
	13	line l -625.34430362036 -680.713463264921 -0.000252749178714602 -0.999999968058926
	14	trim l l 0 30.0132665523925
	15
	16	set cx 0
	17	set cy 0
	18
	19	regexp {Intersection point 1 : ([-0-9.+eE]+) ([-0-9.+eE]+)} [2dintersect e l ] full cx cy
	20	checkreal n1 $cx -625.35188801291508 1.e-7 1.e-7
	21	checkreal n2 $cy -710.72104765746838 1.e-7 1.e-7
	22