32ca7a51 |
1 | puts "========" |
2 | puts "OCC23706" |
3 | puts "========" |
4 | puts "" |
5 | ############################### |
6 | ## Cannot project point 3.9999965207720098 5.0000000629157348 5.0002142991819367 on curve from attached file. |
7 | ############################### |
8 | |
9 | set BugNumber OCC23706 |
10 | |
11 | restore [locate_data_file bug23706_c.draw] c |
12 | proj c 3.9999965207720098 5.0000000629157348 5.0002142991819367 |
13 | |
14 | if {[isdraw ext_1] == 1} { |
15 | dump ext_1 |
16 | puts "${BugNumber} OK" |
17 | } else { |
18 | puts "Faulty ${BugNumber}" |
19 | } |
20 | |