puts "TODO OCC24156 MacOS: \\*\\* Exception \\*\\*.*"
puts "TODO OCC24156 MacOS: An exception was caught"
puts "TODO OCC24156 MacOS: TEST INCOMPLETE"

puts "==========="
puts "OCC22783"
puts "==========="
puts ""
#######################################################################
#  Improvement of BRepOffsetAPI_MakeFilling: keep old and new boundary edges with all pcurves
#######################################################################

catch {pload XDE}

set BugNumber OCC22783

restore [locate_data_file bug22783_cs.brep] a 
explode a
explode a_1 e
explode a_1_6
explode a_1_13
edge e1 a_1_6_1 a_1_13_1
edge e2 a_1_6_2 a_1_13_2
smallview
donly a_1_6 a_1_13 e1 e2
fit

filling result 4 0 0  a_1_6 0 a_1_13 0 e1 0 e2 0
tolerance result
checkshape result
dump result

set square 0.00456273
set 2dviewer 0
