Increment OCCT version up to 7.4.0
[occt.git] / tests / chamfer / data / complex / B9
CommitLineData
34dd4990 1set chamf_shape 4_L1(hlacg03).draw
40093367 2set chamf_edge_face [list " 6 1" " 5 1" " 9 2"]
3set chamf_dist_angle [list "1.2 30" " 1 30" " 1 30"]
4set chamf_dist_dist [list "1.1 1" " 1 1.2" " 1 1.4"]
5set chamf_equal_dist [list "1 " "1.1 " "1.2 "]
6dset SCALE 100
7if { [string compare $command chamf_sequence] == 0 } {
8 puts "TODO #22909 ALL: Error: The tests should be reviewed"
9 puts "Error: The tests should be reviewed."
4dabfbf2 10
37d6975c 11 set nf 0
863f782a 12 if { ![checkplatform -windows] } {
37d6975c 13 if { [string compare $group dist_dist] == 0 } {
14 set nf 2
15 } elseif { [string compare $group equal_dist] == 0 } {
16 set nf 4
40093367 17 }
4dabfbf2 18 }
19
863f782a 20 if { [checkplatform -windows] } {
4dabfbf2 21 if {[string compare $group dist_dist] == 0 || [string compare $group equal_dist] == 0 } {
22 set nf 2
40093367 23 }
24 }
bcfb87eb 25
863f782a 26 if { [checkplatform -osx] } {
bcfb87eb 27 if { [string compare $group dist_dist] == 0 } {
3cdfdc9a 28 puts "TODO OCC24156 MacOS: chamfer is not done. compute of chamfer failed"
bcfb87eb 29 set nf 8
30 }
31 if { [string compare $group equal_dist] == 0 } {
3cdfdc9a 32 puts "TODO OCC24156 MacOS: chamfer is not done. compute of chamfer failed"
bcfb87eb 33 set nf 2
34 }
3cdfdc9a 35 if { [string compare $group dist_angle] == 0 } {
36 puts "TODO OCC24156 MacOS: chamfer is not done. compute of chamfer failed"
37 }
bcfb87eb 38 }
39
4dabfbf2 40 if { $nf != 0 } {
863f782a 41 #puts "TODO OCC22909 [checkplatform]:Faulty shapes in variables faulty_1 to faulty_$nf"
9aa684ed 42 puts "TODO OCC22909 ALL:Faulty shapes in variables faulty_1 to faulty_"
4dabfbf2 43 }
40093367 44}