| a8b8f90d |
1 | puts "========" |
| 2 | puts "0024905: Boolean cut produced invalid result" |
| 3 | puts "========" |
| 4 | puts "" |
| 5 | |
| 6 | circle c1 0 0 0 0 -1 0 75 |
| 7 | circle c2 0 0 0 0 -1 0 65 |
| 8 | mkedge c1 c1 |
| 9 | mkedge c2 c2 |
| 10 | wire c1 c1 |
| 11 | wire c2 c2 |
| 12 | orientation c2 R |
| 13 | mkplane f1 c1 1 |
| 14 | add c2 f1 |
| 15 | prism p1 f1 0 1000 0 |
| 16 | trotate p1 0 0 0 0 0 1 180 |
| 17 | circle c3 50 500 -2000 0 0 1 50 |
| 18 | mkedge c3 c3 |
| 19 | wire c3 c3 |
| 20 | mkplane f2 c3 1 |
| 21 | prism p2 f2 0 0 4000 |
| 22 | trotate p2 0 500 0 1 0 0 -77 |
| 23 | trotate p2 0 0 0 0 0 1 180 |
| 24 | |
| 25 | bclearobjects |
| 26 | bcleartools |
| 27 | baddobjects p1 |
| 28 | baddtools p2 |
| 29 | |
| 30 | bfillds |
| 31 | |
| 32 | bbop r_0 0 |
| 33 | bbop r_1 1 |
| 34 | bbop r_2 2 |
| 35 | bbop r_3 3 |
| 36 | bbop r_4 4 |
| 37 | |
| 38 | for {set i 0} {$i <= 4} {incr i} { |
| 39 | checkshape r_$i |
| 40 | if {[regexp "Faulties" [ bopargcheck r_$i ]]} { |
| 41 | puts "Error: bopargcheck has found some faulties in r_$i" |
| 42 | } |
| 43 | } |
| 44 | |
| 45 | |
| 46 | checknbshapes r_0 -solid 1 -shell 1 -face 5 -wire 6 |
| 47 | checkprops r_0 -s 196255 -v 857818 |
| 48 | |
| 49 | checknbshapes r_1 -solid 1 -shell 1 -face 9 -wire 13 |
| 50 | checkprops r_1 -s 1.96453e+06 -v 3.49563e+07 |
| 51 | |
| 52 | checknbshapes r_2 -solid 1 -shell 1 -face 7 -wire 11 |
| 53 | checkprops r_2 -s 742474 -v 3.54041e+06 |
| 54 | |
| 55 | checknbshapes r_3 -solid 2 -shell 2 -face 7 -wire 8 |
| 56 | checkprops r_3 -s 1.41831e+06 -v 3.05581e+07 |
| 57 | |
| 58 | checknbshapes r_4 -vertex 8 -edge 8 |
| 59 | checkprops r_4 -l 3965.07 |
| 60 | |
| 61 | checksection r_4 -r 0 |
| 62 | |
| 63 | # CUT |
| 64 | copy r_2 result |
| 65 | checkmaxtol result -min_tol 1.0e-4 |
| 66 | checkview -display result -2d -path ${imagedir}/${test_image}.png |
| 67 | |
projects / occt.git / blame