1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
puts "============"
puts "CR24800"
puts "==========="
puts ""
###############################################################################
# Point of intersection was not found for 2d offset curve.
###############################################################################
restore [locate_data_file bug24800_curve2.draw] c2
set inter1 [2dintersect c2]
set int1 [regexp {Intersection point 1} ${inter1}]
if { ${int1} == 0 } {
puts "Error : Intersection is not found"
}
av2d
2dfit
xwd ${imagedir}/${test_image}.png
|
