0028677: Avoid change of wire orientation in BRepLib_MakeFace if the wire is open
[occt.git] / tests / bugs / modalg_6 / bug6768
1 puts "============"
2 puts "OCC6768"
3 puts "============"
4 puts ""
5 #######################################################
6 # Problems making offset wires
7 #######################################################
8
9 restore [locate_data_file bug6768.brep] co
10 explode co
11 foreach s {co_1 co_2 co_3 co_4} {
12
13 puts "\n*** make offset of wire r$s\n"
14 mkoffset r${s} ${s} 1 -1
15
16 regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection r${s}_1] full nbv
17
18 if { $nbv != 0 } { 
19   puts "Error : Section is incorrect" 
20 } else {
21   puts "Section is correct" 
22 }
23
24 if { ${s} eq "co_1" } {
25   checkprops r${s}_1 -l 577.397
26   checknbshapes r${s}_1 -vertex  99
27 } elseif { ${s} eq "co_2" } {
28   checkprops r${s}_1 -l 591.334
29   checknbshapes r${s}_1 -vertex  80
30 } elseif { ${s} eq "co_3" } {
31   checkprops r${s}_1 -l 550.648
32   checknbshapes r${s}_1 -vertex 111
33 } else {
34   checkprops r${s}_1 -l 545.219
35   checknbshapes r${s}_1 -vertex 290
36
37
38 }
39
40 smallview
41 fit
42
43 checkview -screenshot -2d -path ${imagedir}/${test_image}.png