puts "========" puts "OCC29311" puts "========" puts "" ################################################# # Implementation of the Oriented Bounding Boxes (OBB) functionality ################################################# # Interferences of OBB box b1 100 150 200 copy b1 b2 trotate b1 -150 -150 -150 1 2 3 -40 trotate b2 -150 -150 -150 1 5 2 60 if { ![regexp {NOT interfered by OBB} [ isbbinterf b1 b2 -o ] ] } { puts "Error : Wrong check of OBBs interferences" } else { puts "OK : check of OBBs interferences" } if { ![regexp {NOT interfered by OBB} [ isbbinterf b2 b1 -o ] ] } { puts "Error : Wrong check of OBBs interferences" } else { puts "OK : check of OBBs interferences" }