Procedimiento que calcula Interseccion :D