L1 = Sequence(Sequence[Segment[(i, j), (i, j) + 0.2 * (1, i - j) / sqrt(1 + (i - j)^(2))], i, -5, 10, 0.2], j, -6, 6, 0.2)
A = (-4.381634571204983, 4.114256935752888)
luogo1 = SolveODE(x - y, x(A), y(A), x(A) + 10, 0.1)