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 |