restore [locate_data_file bug24200_c2] c2
set info_1 [extrema c1 c2]
-if { [regexp "ext_15" $info_1] != 1 } {
- puts "Error : Extrema is wrong"
-} else {
- puts "OK : Extrema is correct"
-}
-
trim c1t c1 677.8 678.8
trim c2t c2 2477 2479
extrema c1t c2t
} else {
puts "OK: Distance is correct"
}
-