3bea4c16 |
1 | puts "============" |
2 | puts "OCC22296" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # The algorithm BRepSweep_MakeRevol produce non-licit toroidal based face. |
7 | # Appendix to the SALOME bug: IPAL22181 |
8 | ####################################################################### |
9 | |
10 | set BugNumber OCC22296 |
11 | |
12 | restore [locate_data_file bug22296_ring.brep] b1 |
13 | revol r b1 0.6 3 0 0 0 1 -90 |
14 | |
15 | set E_Length [explode r f] |
16 | |
17 | if { ${E_Length} < 6} { |
18 | puts "Bad format of explode draw-command" |
19 | puts "Faulty ${BugNumber}" |
20 | } else { |
21 | |
22 | copy r_2 f |
23 | |
24 | set good_umin 0 |
25 | set good_umax 6.28319 |
259b9303 |
26 | set good_vmin 3.14159 |
27 | set good_vmax 9.42478 |
3bea4c16 |
28 | |
29 | set xlist [xbounds f] |
30 | set umin [lindex $xlist 0] |
31 | set umax [lindex $xlist 1] |
32 | set vmin [lindex $xlist 2] |
33 | set vmax [lindex $xlist 3] |
34 | |
35 | set bad_bound 0 |
36 | if {${umin} < ${good_umin}} { |
37 | puts "umin: ${umin} is wrong" |
38 | set bad_bound[expr ${bad_bound} + 1] |
39 | } |
40 | if {${umax} > ${good_umax}} { |
41 | puts "umax: ${umax} is wrong" |
42 | set bad_bound [expr ${bad_bound} + 10] |
43 | } |
44 | if {${vmin} < ${good_vmin}} { |
45 | puts "vmin: ${vmin} is wrong" |
46 | set bad_bound [expr ${bad_bound} + 100] |
47 | } |
48 | if {${vmax} > ${good_vmax}} { |
49 | puts "vmax: ${vmax} is wrong" |
50 | set bad_bound [expr ${bad_bound} + 1000] |
51 | } |
52 | |
53 | if {${bad_bound} > 0 } { |
54 | puts "${BugNumber}: Faulty" |
55 | } else { |
56 | puts "OK ${BugNumber}" |
57 | } |
58 | |
59 | } |
60 | |