puts "TODO OCC11111 ALL: An exception was caught"
puts "TODO OCC11111 ALL: \\*\\* Exception"
puts "TODO OCC11111 ALL: Faulty OCC22910"

puts "================"
puts "OCC22910"
puts "================"
puts ""
#######################################################################################
# Failure to compute iso-line for NURBS surface
######################################################################################

set BugNumber OCC22910

catch { pload MODELING }

restore [locate_data_file s.rle] res
set exception_status [ catch { uiso u res 0.5 } ]

if { ${exception_status} == 0 } {
   puts "OK ${BugNumber}"
} else {
   puts "Faulty ${BugNumber}"
}

set sqaure 0
set 3dviewer 0