bcommon result sol2 sol1
set square 667287
+if { [regexp {Windows} [dversion]] } {
+ if { [regexp {64} [dversion]] } {
+ #set square 804392
+ puts "TODO OCC1111 Windows: Error : The area of the resulting shape is"
+ }
+}
bcut result sol2 sol1
set square 1.06741e+06
+if { [regexp {Windows} [dversion]] } {
+ if { [regexp {64} [dversion]] } {
+ #set square 650662
+ puts "TODO OCC1111 Windows: Error : The area of the resulting shape is"
+ }
+}
0.20619280354776386
0.21983563611646603
}
+ if { [regexp {64} [dversion]] } {
+ set check_values { 1.5
+ 5.2
+ 5.7
+ 5.7
+ 1.7
+ 1.3
+ 1.6
+ 0.4
+ 0.4
+ }
+ }
}
set index 0
foreach key $keys {