34dd4990 |
1 | set chamf_shape 8_J1.draw |
40093367 |
2 | set chamf_edge_face [list " 3 2" " 9 2"] |
3 | set chamf_dist_angle [list "0.1 60" "0.06 60"] |
4 | set chamf_dist_dist [list "0.1 0.08" "0.12 0.08"] |
5 | set chamf_equal_dist [list "0.1 " "0.2 "] |
6 | if { [string compare $command chamf] == 0 } { |
7 | if {[string compare $group dist_angle] == 0 || [string compare $group equal_dist] == 0} { |
8 | puts "TODO OCC22909 All:chamfer is not done. compute of chamfer failed" |
9 | } |
10 | } else { |
11 | set os "ALL" |
12 | if {[array get env os_type] != ""} { |
13 | set os $env(os_type) |
14 | } |
15 | if {[string compare $group dist_angle] == 0} { |
b58dfc5e |
16 | puts "TODO ?OCC22909 ALL:Faulty shapes in variables faulty_1 to faulty_" |
40093367 |
17 | } |
18 | if {[string compare $group equal_dist] == 0} { |
b58dfc5e |
19 | puts "TODO ?OCC22909 ALL:Faulty shapes in variables faulty_1 to faulty_" |
40093367 |
20 | } |
21 | } |