4753a6fc |
1 | puts "==========" |
2 | puts "OCC26197" |
3 | puts "==========" |
4 | puts "" |
5 | ############################################################ |
6 | # Incomplete intersection curve |
7 | ############################################################ |
8 | |
9 | restore [locate_data_file bug26197_profile_1093.brep] b1 |
10 | restore [locate_data_file bug26197_endcut1_1093.brep] b2 |
11 | |
12 | explode b1 f |
13 | copy b1_107 f1 |
14 | |
15 | explode b2 f |
16 | copy b2_2 f2 |
17 | |
18 | bsection result f1 f2 |
19 | |
20 | explode result e |
21 | mk2dcurve c2d2 result_1 f2 |
22 | |
23 | bounds c2d2 u1 u2 |
24 | puts [dval u1] |
25 | puts [dval u2] |
26 | |
27 | 2dcvalue c2d2 u1 x y1 |
28 | 2dcvalue c2d2 u2 x y2 |
29 | |
30 | set y1_ [dval y1] |
31 | set y2_ [dval y2] |
32 | |
33 | set tol_abs 1.e-7 |
34 | set tol_rel 1.e-7 |
35 | |
36 | #V-last of the surface of f2 face |
37 | set expected_y 1.1883793591414735 |
38 | |
39 | checkreal "extension the section line to the surface boundary?" ${y2_} ${expected_y} ${tol_abs} ${tol_rel} |
40 | |
41 | smallview |
42 | donly result f1 f2 |
43 | fit |
5747059b |
44 | checkview -screenshot -2d -path ${imagedir}/${test_image}.png |