Function line_perpendicular_at_point