5 #########################################################################
6 # Modeling Algorithms - class Extrema_ExtCC2d does not find extremum between two intersecting lines
7 # Analytical solver can not work on 2 lines.
8 #########################################################################
15 set info [2dextrema l1 l2]
17 # Number of solutions check.
18 # There should be only one solution - intersection point.
19 if {[llength $info] != 4} {
20 ERROR: Incorrect number of solutions.
24 regexp "dist 1: +(\[-0-9.+eE\]+)" $info full aDist
28 checkreal "Distance value check" $aDist $aDist_Exp $absTol $relTol