0027463: Checkprops can not be used with several properties
[occt.git] / tests / pipe / specific / P9
1 puts "============"
2 puts "OCC1477"
3 puts "============"
4 puts ""
5 ######################################################
6 # Problems in MakePipeShell
7 # (case 13)
8 ######################################################
9
10 restore [locate_data_file OCC1477_bsplinewire_c0.brep] s1 
11 restore [locate_data_file OCC1477_profile1_polygon.brep] e1 
12 wire s2 e1
13
14 puts "###############################################################################"
15 puts "# (case /-CF/-R/-S/)"
16 puts "###############################################################################"
17
18 checkshape s1
19 checkshape s2
20
21 mksweep s1
22
23 setsweep -CF
24 addsweep s2 -R
25 if [catch { buildsweep result -S} res] {
26   puts "Faulty OCC1477: buildsweep is wrong"
27 }
28
29 checkprops result -s 28233.3 -v 76901
30
31 checknbshapes result -vertex 15 -edge 25 -wire 12 -face 12 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 66