tests/bugs/moddata/bug143

   1 puts "================"
   2 puts "BUC60654"
   3 puts "OCC143"
   4 puts "================"
   5 puts ""
   6 ######################################################################
   7 ## Raises exception "Standard_NotImplemented3" in GCPnts_AbscissaPoint on a Geom2d_OffsetCurve
   8 ######################################################################
   9
  10 set len_expected 4.e100
  11 line line_2d 0 0 1 1
  12
  13 offset result line_2d 10 1 0
  14
  15 set info [length $result]
  16 regexp {The length result is +([-0-9.+eE]+)} $info full len
  17
  18 checkreal "Length" $len $len_expected 0. 1e-10