tests/bugs/moddata_3/bug23471

   1 puts "============"
   2 puts "CR23471"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Intersection algorithm produces overlapping intersection curves
   7 #######################################################################
   8
   9 restore [locate_data_file OCC22790-cx.brep] b
  10
  11 explode b
  12 mksurface s1 b_1
  13 mksurface s2 b_3
  14 intersect res s1 s2
  15
  16 if ![info exists res] {
  17  puts "Error : there are more then 1 curve"
  18 }