tests/bugs/moddata_3/bug23994

   1 puts "================"
   2 puts "OCC23994"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # GeomAPI_ExtremaCurveCurve class calculates wrong values
   7 #######################################################################
   8
   9 set BugNumber CR23994
  10
  11 pload XDE
  12
  13 ReadStep D [locate_data_file bug23994_AirfoilRhomb_CalcDist_17_OP_Bell_Mouth_Roughing_shroud.stp]
  14
  15 XCheckProps D
  16
  17 XGetShape airflIntersctCrv D 0:1:1:1
  18 XGetShape rhombIntersctCrv D 0:1:1:2
  19
  20 explode rhombIntersctCrv
  21 mkcurve rhomb rhombIntersctCrv_1
  22
  23 explode airflIntersctCrv
  24 mkcurve airfl airflIntersctCrv_1
  25
  26 extrema airfl rhomb
  27
  28 if { [isdraw ext_1] } {
  29    mkedge result ext_1
  30    set length 5.14563
  31 } else {
  32    puts "${BugNumber}: invalid result"
  33 }
  34
  35 set 2dviewer 1