1 puts "================"
3 puts "================"
5 #######################################################################
6 # Wrong result obtained by intersection algorithm.
7 #######################################################################
9 # Before fix intersection algorithm threw an exception.
11 restore [locate_data_file bug25898_x001_1.draw] s1
12 restore [locate_data_file bug25898_x001_2.draw] s2
14 set CurveNumb [intersect i s1 s2]
16 if { [llength ${CurveNumb}] != 2 } {
17 puts "Error : Wrong result obtained by intersection algorithm."
19 puts "OK : Good result obtained by intersection algorithm."