3 puts "Bug regression in BRepOffsetAPI_MakeOffset class (offsetting in OY direction)"
6 restore [locate_data_file offset_wire_019.brep] a
13 if [catch {mkoffset res1 f 1 1 } result] {
14 puts "Faulty OCC165 (case 1) : function MKOFFSET works wrongly"
17 puts "OCC165 OK (case 1): function MKOFFSET works properly"
23 if [catch {mkoffset res2 f 1 -1 } result] {
24 puts "Faulty OCC165 (case 2) : function MKOFFSET works wrongly"
27 puts "OCC165 OK (case 2): function MKOFFSET works properly"
34 compound a res1_1 res2_1 res
36 regexp {Mass +: +([-0-9.+eE]+)} [lprops res1_1] full len
40 set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.]
42 puts "good_len = ${good_len}"
43 puts "length = ${len}"
44 puts "percent = ${percent}"
46 if {${percent} > ${percent_max}} {
47 puts "Faulty OCC165 (case 3) : function MKOFFSET works wrongly"
51 regexp {Mass +: +([-0-9.+eE]+)} [lprops res2_1] full len
55 set percent [expr abs(${len} - ${good_len}) / double(${good_len}) * 100.]
57 puts "good_len = ${good_len}"
58 puts "length = ${len}"
59 puts "percent = ${percent}"
61 if {${percent} > ${percent_max}} {
62 puts "Faulty OCC165 (case 4) : function MKOFFSET works wrongly"