Files
OCCT/tests/bugs/moddata/bug143
2012-12-07 16:29:17 +04:00

21 lines
567 B
Plaintext
Executable File

puts "================"
puts "BUC60654"
puts "OCC143"
puts "================"
puts ""
######################################################################
## Raises exception "Standard_NotImplemented3" in GCPnts_AbscissaPoint on a Geom2d_OffsetCurve
######################################################################
set len_ch 4.0000000000000001e+100
line line_2d 0 0 1 1
offset result line_2d 10 1 0
set info [length $result]
regexp {The length result is +([-0-9.+eE]+)} $info full len
if { ${len} != ${len_ch} } {
puts "Error : Length is invalid"
}