mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
23 lines
722 B
Plaintext
23 lines
722 B
Plaintext
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
|
|
|