1 puts "================"
3 puts "================"
5 ##############################################################################
6 # BRepOffsetAPI_MakePipeShell works wrong
7 ##############################################################################
16 puts "------------- Radius $radius"
18 vertex v1 [expr $radius / 2] 0 0
21 revol rq e 0 0 0 0 0 1 45
23 # make rq scaled and translated
25 ttranslate rq2 0 0 $radius
43 # BUG: a pipe is invalid
44 checkshape result -short
46 checkprops result -s 14572.5
47 checkview -display result -3d -path ${imagedir}/${test_image}.png