puts "TODO ?OCC11111 ALL: An exception was caught"
puts "TODO ?OCC11111 ALL: \\*\\* Exception"
puts "TODO ?OCC11111 ALL: Faulty OCC1477"
puts "TODO ?OCC11111 ALL: Tcl Exception"
puts "TODO ?OCC11111 ALL: TEST INCOMPLETE"

puts "============"
puts "OCC1477"
puts "============"
puts ""
######################################################
# Problems in MakePipeShell
# (case 11)
######################################################

restore [locate_data_file OCC1477-1.brep] s1 
restore [locate_data_file OCC1477-2.brep] s2 

checkshape s1
checkshape s2

mksweep s1

addsweep s2 0 1 1 2 2 .5

if { [catch {buildsweep result -R} catch_result] } {
    puts "Faulty OCC1477"
}

set square 1.81647e+006
set 3dviewer 1