puts "============" puts "OCC25084" puts "============" puts "" ####################################################################### # Incorrect PCurve construction ####################################################################### restore [locate_data_file bug25084_c.draw] c restore [locate_data_file bug25084_s10.draw] s project cx c s regexp {The length cx is +([0-9.+eE]+)} [length cx] full cx_length set good_length 4.6201952691345385 checkreal "length of cp1" ${cx_length} ${good_length} 0.01 0.01 #v2d2 view 1 -2D- 728 20 400 400 2dfit set only_screen_axo 1