tests/bugs/moddata_1/buc60924

   1
   2 puts "========"
   3 puts "BUC60924"
   4 puts "========"
   5 puts ""
   6
   7 ##################################################
   8 ## ShapeAnalysisStd_Curve::IsPlanar works incorrectly with a conic curve.
   9 ##################################################
  10
  11 pload QAcommands
  12
  13 ellipse el 0 0 1 20 10
  14
  15 set result1 [BUC60924 el 0 0 1]
  16
  17 if {${result1} != "The curve is planar !\n"} {
  18     puts "BUC60924: Error"
  19 } else {
  20     puts "BUC60924: OK"
  21 }
  22
  23 set 3dviewer 1
  24