tests/bugs/moddata_3/bug23995

   1 puts "================"
   2 puts "OCC23995"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # GeomAPI_ExtremaCurveCurve class calculates wrong values
   7 #######################################################################
   8
   9 set BugNumber CR23995
  10
  11 pload XDE
  12
  13 ReadStep D [locate_data_file bug23995_AirfoilRhomb_CheckIntersct3d_myRhombicAirfoilIntersect_root.stp]
  14
  15 XCheckProps D
  16
  17 XGetShape intCrv D 0:1:1:1
  18 explode intCrv
  19 mkcurve intCrv intCrv_1
  20 plane pl
  21
  22 extrema intCrv pl
  23
  24 if { [isdraw ext_1] } {
  25    mkedge result ext_1
  26    set length 136.705
  27 } else {
  28    puts "${BugNumber}: invalid result for ext_1"
  29 }
  30
  31 smallview
  32 front
  33 fit
  34 set only_screen_axo 1