puts "============"
puts "OCC22588"
puts "============"
puts ""
#######################################################################
# Revolution with negative volume in some cases
#######################################################################

set BugNumber OCC22588

vertex v1 0 0 0
vertex v12 0 0 160
vertex v13 25 0 25
edge e7 v1 v12
edge e8 v12 v13
edge e9 v13 v1
wire w2 e7 e8 e9
plane pln1 25 0 25 0 1 0 -25 0 -25
mkface face2 pln1 w2
revol result face2 0 0 0 0 0 1 45

checkprops result -s 5694.99 
checkshape result

checknbshapes result -vertex 3 -edge 8 -wire 4 -face 4 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 21
vinit
vdisplay result
vfit

checkview -screenshot -3d -path ${imagedir}/${test_image}.png