n = 100
t = 0 (slider from 0 to 1000, step 0.1)
B1 = (-1.1800000000000024, 2.0000000000000013)
B2 = (5.1599999999999975, -3.919999999999999)
inc: (y(B2) - y(B1)) / n
lista1 = Sequence((x(B1) + (t - 100.0 * floor(t / 100.0)) * (x(B2) - x(B1)) / 100.0, y(B1) - floor(t / 100.0) / 100.0 + inc * s), s, 0.0, n - 1.0)
P1 = Element(lista1, 1.0)
P2 = Element(lista1, 2.0)
P3 = Element(lista1, 3.0)
P4 = Element(lista1, 4.0)
P5 = Element(lista1, 5.0)
P6 = Element(lista1, 6.0)
P7 = Element(lista1, 7.0)
P8 = Element(lista1, 8.0)
P9 = Element(lista1, 9.0)
P10 = Element(lista1, 10.0)
P11 = Element(lista1, 11.0)
P12 = Element(lista1, 12.0)
P13 = Element(lista1, 13.0)
P14 = Element(lista1, 14.0)
P15 = Element(lista1, 15.0)
P16 = Element(lista1, 16.0)
P17 = Element(lista1, 17.0)
P18 = Element(lista1, 18.0)
P20 = Element(lista1, 20.0)
P19 = Element(lista1, 19.0)
P21 = Element(lista1, 21.0)
P22 = Element(lista1, 22.0)
P23 = Element(lista1, 23.0)
P24 = Element(lista1, 24.0)
P25 = Element(lista1, 25.0)
P26 = Element(lista1, 26.0)
P27 = Element(lista1, 27.0)
P28 = Element(lista1, 28.0)
P29 = Element(lista1, 29.0)
P30 = Element(lista1, 30.0)
A = (1.6259061443786196, -0.5532064990162311)
B = (2.6079043499758563, -1.3753435501721585)
dA = Sequence(Distance[Object["P" + (i)], A], i, 1.0, n)
dB = Sequence(Distance[Object["P" + (i)], B], i, 1.0, n)
cond = Sequence(cos(Element[dA, s]) + sin(Element[dB, s]), s, 1.0, n)
rojo: cond
verde: (1.0 + cond^(2.0)) / 2.0
azul: (1.0 + cond) / 2.0
P31 = Element(lista1, 31.0)
P32 = Element(lista1, 32.0)
P33 = Element(lista1, 33.0)
P34 = Element(lista1, 34.0)
P35 = Element(lista1, 35.0)
P36 = Element(lista1, 36.0)
P37 = Element(lista1, 37.0)
P38 = Element(lista1, 38.0)
P39 = Element(lista1, 39.0)
P40 = Element(lista1, 40.0)
P41 = Element(lista1, 41.0)
P42 = Element(lista1, 42.0)
P43 = Element(lista1, 43.0)
P44 = Element(lista1, 44.0)
P45 = Element(lista1, 45.0)
P46 = Element(lista1, 46.0)
P47 = Element(lista1, 47.0)
P48 = Element(lista1, 48.0)
P49 = Element(lista1, 49.0)
P50 = Element(lista1, 50.0)
P51 = Element(lista1, 51.0)
P52 = Element(lista1, 52.0)
P53 = Element(lista1, 53.0)
P54 = Element(lista1, 54.0)
P55 = Element(lista1, 55.0)
P56 = Element(lista1, 56.0)
P57 = Element(lista1, 57.0)
P58 = Element(lista1, 58.0)
P59 = Element(lista1, 59.0)
P60 = Element(lista1, 60.0)
P61 = Element(lista1, 61.0)
P62 = Element(lista1, 62.0)
P63 = Element(lista1, 63.0)
P64 = Element(lista1, 64.0)
P65 = Element(lista1, 65.0)
P66 = Element(lista1, 66.0)
P67 = Element(lista1, 67.0)
P68 = Element(lista1, 68.0)
P69 = Element(lista1, 69.0)
P70 = Element(lista1, 70.0)
P71 = Element(lista1, 71.0)
P72 = Element(lista1, 72.0)
P73 = Element(lista1, 73.0)
P74 = Element(lista1, 74.0)
P75 = Element(lista1, 75.0)
P76 = Element(lista1, 76.0)
P77 = Element(lista1, 77.0)
P78 = Element(lista1, 78.0)
P79 = Element(lista1, 79.0)
P80 = Element(lista1, 80.0)
P81 = Element(lista1, 81.0)
P82 = Element(lista1, 82.0)
P83 = Element(lista1, 83.0)
P84 = Element(lista1, 84.0)
P85 = Element(lista1, 85.0)
P86 = Element(lista1, 86.0)
P87 = Element(lista1, 87.0)
P88 = Element(lista1, 88.0)
P89 = Element(lista1, 89.0)
P90 = Element(lista1, 90.0)
P91 = Element(lista1, 91.0)
P92 = Element(lista1, 92.0)
P93 = Element(lista1, 93.0)
P94 = Element(lista1, 94.0)
P95 = Element(lista1, 95.0)
P96 = Element(lista1, 96.0)
P97 = Element(lista1, 97.0)
P98 = Element(lista1, 98.0)
P99 = Element(lista1, 99.0)