[occt.git] / tests / bugs / iges / CR23377

# Original bug : 23377
# Date : 12 Aug 2012

igesbrep [locate_data_file OCC23377-Input.igs] result *
regexp {Number of Rational BSpline surfaces +([-0-9.+eE]+)} [expshape result 1 1] full nb
puts "Number of Rational BSpline surfaces is $nb"
set 2dviewer 1
Commit	Line	Data
	1	# Original bug : 23377
	2	# Date : 12 Aug 2012
	3
	4	igesbrep [locate_data_file OCC23377-Input.igs] result *
	5	regexp {Number of Rational BSpline surfaces +([-0-9.+eE]+)} [expshape result 1 1] full nb
	6	puts "Number of Rational BSpline surfaces is $nb"
	7	set 2dviewer 1
	8
	9
	10
	11
	12
	13
	14
	15
	16
	17