puts "TODO OCC30286 Linux: Error : The length of result shape is 302.183, expected 302.238"

puts "==========================================="
puts "OCC25813: regression in Hidden Line Removal"
puts "==========================================="
puts ""

set viewname ""
set length 302.238

ptorus a 30 10

COMPUTE_HLR $viewname $algotype