5 ###################################################
6 # BRepFeat_MakePrism returns inconsistent results
7 ###################################################
9 circle aCircle -10 -10 0 0 0 1 1 0 0 10
12 mkplane aCircle aWire 0
14 plane aFromPlane 0 0 -10 0 0 1 1 0 0
15 mkface aFromPlane aFromPlane
16 plane aToPlane 0 0 10 0 0 1 1 0 0
17 mkface aToPlane aToPlane
19 featprism aCircle aCircle aCircle 0 0 1 2 1
20 featperform prism aResult aFromPlane aToPlane
26 vsetdispmode aResult 1
29 set bug_info [vreadpixel 300 340 name]
30 if {$bug_info == "BLACK 0"} {
31 puts "ERROR: OCC26305 is reproduced. Prism is incorrect."
34 checkview -screenshot -3d -path ${imagedir}/${test_image}.png