1 puts "TODO OCC25478 ALL: Error: Fillets can not touch"
7 ########################
8 # Fillets can not touch
9 ########################
13 ttranslate Box002 5 5 -1
14 bcut Cut Box001 Box002
17 catch { blend Fillet002 Cut 2.5 Cut_13 2.5 Cut_17 2.5 Cut_18 } msg
19 if { [info exist Fillet002] == 0 } {
20 puts "Error: Fillets can not touch"
22 puts "OK: Fillets can touch"
25 checkview -display Fillet002 -2d -path ${imagedir}/${test_image}.png