[occt.git] / tests / bugs / modalg / bug23606

puts "============"
puts "OCC23606"
puts "============"
puts ""
#######################################################################
# Invalid result of pipe operation
#######################################################################

restore [locate_data_file bug23606_base.brep] sh
restore [locate_data_file bug23606_path.brep] w
pipe result w sh
set n [llength [explode result f]]
if { ${n} != 10 } {
  puts "Error : bad number of faces"
}

# Service parameters
set mass -0.1
set m -0.1
Commit	Line	Data
46e68e02	1	puts "============"
	2	puts "OCC23606"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Invalid result of pipe operation
	7	#######################################################################
	8
	9	restore [locate_data_file bug23606_base.brep] sh
	10	restore [locate_data_file bug23606_path.brep] w
	11	pipe result w sh
	12	set n [llength [explode result f]]
	13	if { ${n} != 10 } {
	14	puts "Error : bad number of faces"
	15	}
	16
	17	# Service parameters
	18	set mass -0.1
	19	set m -0.1