0027463: Checkprops can not be used with several properties
[occt.git] / tests / pipe / specific / Q6
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_rectangle.brep] e1 
12 wire s2 e1
13
14 puts "###############################################################################"
15 puts "# (case /-/-T/-S/)"
16 puts "###############################################################################"
17
18 checkshape s1
19 checkshape s2
20
21 mksweep s1
22
23 addsweep s2 -T
24 if [catch { buildsweep result -S} res] {
25   puts "Faulty OCC1477: buildsweep is wrong"
26 }
27
28 checkprops result -s 28696.8 -v 72386.2
29
30 checknbshapes result -vertex 12 -edge 20 -wire 10 -face 10 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 54