cba287d6 |
1 | puts "TODO OCC26604 ALL: Error: GeomFill_Pipe doesn't fit given bounds" |
2 | |
3 | puts "========" |
4 | puts "OCC26604" |
5 | puts "========" |
6 | puts "" |
7 | ####################################################### |
8 | # GeomFill_Pipe doesn't fit given bounds |
9 | ####################################################### |
10 | |
11 | pload QAcommands |
12 | |
13 | restore [locate_data_file bug26604_spine.brep] spine |
14 | restore [locate_data_file bug26604_bound1.brep] bound1 |
15 | restore [locate_data_file bug26604_bound2.brep] bound2 |
16 | |
17 | mkcurve s spine |
18 | mkcurve b1 bound1 |
19 | mkcurve b2 bound2 |
20 | |
21 | OCC9 result s b1 b2 10 |
22 | |
23 | smallview |
24 | top |
25 | clear |
26 | display bound1 |
27 | display bound2 |
28 | display result |
29 | fit |
30 | checkview -screenshot -2d -path ${imagedir}/${test_image}-2d.png |
31 | |
32 | mkface face result |
33 | |
34 | vinit |
35 | vtop |
36 | vclear |
37 | vdisplay bound1 |
38 | vdisplay bound2 |
39 | vdisplay face |
40 | vfit |
41 | checkview -screenshot -3d -path ${imagedir}/${test_image}-3d.png |
42 | |
43 | set x 155 |
44 | set y 185 |
45 | if { [checkcolor $x $y 0 1 0] == 1 } { |
46 | puts "Error: GeomFill_Pipe doesn't fit given bounds" |
47 | } |