tests/bugs/modalg_5/bug23958

   1 puts "========="
   2 puts "OCC23958"
   3 puts "========="
   4 puts ""
   5 #################################################################################
   6 # Section of shell by plane is incomplete
   7 #################################################################################
   8
   9 pload DATAEXCHANGEKERNEL
  10
  11 # shell
  12 restore [locate_data_file bug23958_bug948-shape.brep] a
  13
  14 # plane
  15 plane p 10.62752 0 0 1 0 0
  16 mkface f p
  17
  18 # check that everything is Ok
  19 checkshape a
  20 tolerance a
  21 bopargcheck a f -S #F
  22
  23 # build section
  24 bsection result a f
  25
  26 # check total length of result
  27 set length 1.21473
  28
  29 set 2dviewer 1