tests/bugs/modalg/bug86

   1
   2 puts "========================"
   3 puts " BUC60957 "
   4 puts " OCC86 "
   5 puts "========================"
   6
   7 puts "Restoring the wires :"
   8 restore [locate_data_file OCC86a.brep] w1
   9 puts [checkshape w1]
  10 restore [locate_data_file OCC86b.brep] w2
  11 puts [checkshape w2]
  12
  13 puts "Do Thrusection by following command: thrusections res 0 0 w1 w2 "
  14
  15 thrusections result 0 0 w1 w2
  16
  17 set length 102.832
  18 set 2dviewer 0
  19