[occt.git] / tests / bugs / moddata / bug143

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"
}
Commit	Line	Data
	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_ch 4.0000000000000001e+100
	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	if { ${len} != ${len_ch} } {
	19	puts "Error : Length is invalid"
	20	}