puts "Fuse"
puts ""
-puts "TODO #22911 ALL: Faulty shapes in variables faulty_1 to faulty_"
-puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO ?OCC22911 ALL: Faulty shapes in variables faulty_1 to faulty_"
+puts "TODO ?OCC22911 ALL: Error : The area of the resulting shape is"
restore [locate_data_file pro18457a.rle] f1
restore [locate_data_file pro18457b.rle] f2
bfuse result f1 f2
-set square 0
+set square 996.98
+
bop b_1 b_3
bopfuse result
-set square 4844.63
+set square 45605.9
set 2dviewer 1
-puts "TODO OCC12345 ALL: Faulty OCC956"
+puts "TODO ?OCC12345 ALL: Faulty OCC956"
puts "========="
puts " OCC956 "
-puts "TODO OCC12345 ALL: Faulty OCC956"
+puts "TODO ?OCC12345 ALL: Faulty OCC956"
puts "========="
puts " OCC956 "
set os $env(os_type)
}
if {[string compare $group dist_angle] == 0} {
- puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
+ puts "TODO ?OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
}
if {[string compare $group equal_dist] == 0} {
puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
set os $env(os_type)
}
if {[string compare $group dist_angle] == 0} {
- puts "TODO OCC22909 All:Faulty shapes in variables faulty_1 to faulty_"
+ puts "TODO ?OCC22909 All:Faulty shapes in variables faulty_1 to faulty_"
} else {
puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
}
if {[string compare $command "SplitAngle"] == 0 } {
- puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_2 "
+ puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_2 "
}
restore [locate_data_file FRA61952.rle] a
if {[string compare $command "SplitAngle"] == 0 } {
- puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_4 "
+ puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_4 "
}
restore [locate_data_file FRA61955.rle] a
if {[string compare $command "SplitAngle"] == 0 } {
- puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_10 "
+ puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_10 "
}
restore [locate_data_file FRA61958.rle] a
|| [string compare $os "Mandriva2008"] == 0
|| [string compare $os "Mandriva2010"] == 0
} {
- puts "TODO OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
+ puts "TODO ?OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
}
}
|| [string compare $os "Mandriva2008"] == 0
|| [string compare $os "Mandriva2010"] == 0
} {
- puts "TODO OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
+ puts "TODO ?OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
}
}