0026607: Wrong value of area.
[occt.git] / tests / pipe / specific / K6
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_circle.brep] e1 
12 wire s2 e1
13
14 puts "###############################################################################"
15 puts "# (case /-/-T/-R/)"
16 puts "###############################################################################"
17
18 set setsweepOptions ""
19 set addsweepOptions "-T"
20 set buildsweepOptions "-R"
21
22 set square 33467.5
23
24 set nb_v_good 3
25 set nb_e_good 8
26 set nb_w_good 3
27 set nb_f_good 3
28 set nb_sh_good 1
29 set nb_sol_good 0
30 set nb_compsol_good 0
31 set nb_compound_good 0
32 set nb_shape_good 18
33
34 set 2dviewer 0