0030760: Modeling Algorithms - Intersection fails in Occt 7.3.0
[occt.git] / tests / bugs / modalg_7 / bug30647
CommitLineData
833034f3 1puts "========"
2puts "0030647: Geom2dGcc_Circ2d2TanRad not giving all the solutions"
3puts "========"
4puts ""
5
6restore [locate_data_file bug30647_curve1_720.brep] c1
7restore [locate_data_file bug30647_curve2_720.brep] c2
8
9explode c1 e
10mk2dcurve q1 c1_1
11explode c2 e
12mk2dcurve q2 c2_1
13
14cirtang r -c q1 -c q2 -r 0.4
15
16smallview -2D-
17
182dclear q1
192dfit
20display q1
21
22xwd ${imagedir}/${test_image}.png
23
24set NbCurv [llength [directory r_*]]
25
26if { $NbCurv == 8 } {
27 puts "OK: Number of circles is good"
28} else {
29 puts "Error: Not all solutions"
30}