collisionExists obj1 obj2 = let
                                    (colType,_,_,_,_) = detectCollision  obj1  obj2
                            in
                                    colType /= NoCollision
collisionExists obj1 obj2 = let
                                    (colType,_,_,_,_) = detectCollision  obj1  obj2
                            in
                                    colType /= NoCollision
collisionExists obj1 obj2 = let
                                    (colType,_,_,_,_) = detectCollision  obj1  obj2
                            in
                                    colType /= NoCollision