29d778bf |
1 | puts "================" |
2 | puts "OCC24896" |
3 | puts "================" |
4 | puts "" |
5 | ####################################################################### |
6 | # BRepExtrema is giving wrong intersection point between curve and planar face |
7 | ####################################################################### |
8 | |
9 | restore [locate_data_file bug24896_face_8.brep] f8 |
10 | restore [locate_data_file bug24896_compound_line_8.brep] c8 |
11 | |
12 | distmini d f8 c8 |
13 | |
14 | # 1 |
15 | regexp {([-0-9.+eE]+)$} [dump d_val] full dist |
16 | regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} [ maxtolerance d ] full toler |
17 | set good_dist 0 |
18 | if { [expr abs( ${dist} - ${good_dist} )] > ${toler} } { |
19 | puts "Faulty : the distanse is ${dist}. It is bad value" |
20 | } |
21 | |
22 | # 2 |
23 | # Point 3D : 66.6, -11.8556887483839, 0.3 |
24 | |
25 | regexp { +Point 3D : +([-0-9.+eE]+), +([-0-9.+eE]+), +([-0-9.+eE]+)} [ dump d ] full x1 y1 z1 |
26 | set good_x1 66.6 |
27 | set good_y1 -11.8556887483839 |
28 | set good_z1 0.3 |
29 | if { [expr abs( ${x1} - ${good_x1} )] > ${toler} } { |
30 | puts "Faulty : the x coordinate of the point is ${x1}. It is bad value" |
31 | } |
32 | if { [expr abs( ${y1} - ${good_y1} )] > ${toler} } { |
33 | puts "Faulty : the y coordinate of the point is ${y1}. It is bad value" |
34 | } |
35 | if { [expr abs( ${z1} - ${good_z1} )] > ${toler} } { |
36 | puts "Faulty : the z coordinate of the point is ${z1}. It is bad value" |
37 | } |
38 | |
39 | # 3 |
40 | # Point 3D : 66.6, 11.8556887323157, 0.3 |
41 | |
42 | regexp { +Point 3D : +([-0-9.+eE]+), +([-0-9.+eE]+), +([-0-9.+eE]+)} [ dump d2 ] full x2 y2 z2 |
43 | set good_x2 66.6 |
44 | set good_y2 11.8556887323157 |
45 | set good_z2 0.3 |
46 | if { [expr abs( ${x2} - ${good_x2} )] > ${toler} } { |
47 | puts "Faulty : the x coordinate of the point is ${x2}. It is bad value" |
48 | } |
49 | if { [expr abs( ${y2} - ${good_y2} )] > ${toler} } { |
50 | puts "Faulty : the y coordinate of the point is ${y2}. It is bad value" |
51 | } |
52 | if { [expr abs( ${z2} - ${good_z2} )] > ${toler} } { |
53 | puts "Faulty : the z coordinate of the point is ${z2}. It is bad value" |
54 | } |
55 | |
56 | smallview |
57 | fit |
58 | set only_screen_axo 1 |