0033661: Data Exchange, Step Import - Tessellated GDTs are not imported
[occt.git] / tests / bugs / moddata_1 / bug22296
CommitLineData
3bea4c16 1puts "============"
2puts "OCC22296"
3puts "============"
4puts ""
5#######################################################################
6# The algorithm BRepSweep_MakeRevol produce non-licit toroidal based face.
7# Appendix to the SALOME bug: IPAL22181
8#######################################################################
9
10set BugNumber OCC22296
11
12restore [locate_data_file bug22296_ring.brep] b1
13revol r b1 0.6 3 0 0 0 1 -90
14
15set E_Length [explode r f]
16
17if { ${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