Iniciar

Parar

Continuar

Reiniciar

Borrar

G1

G2

G3

G4

G5

P1: (-2, 0)
C: (0, 0.5)
f = Segment(C, C + (17, 0))
P = Point(f)
D: (0, 4)
B1: P1 + (20, 0)
A = (9, -4)
lista1 = Sequence(Segment[A + (2; s°), A + (1.9; s°)], s, 0, 360, 6)
lista2 = Sequence(Segment[A + (2; s°), A + (1.75; s°)], s, 0, 360, 30)
c = Circle(A, 2)
t1: {100, 4, 14, 21, 22, 5, 2016, "Mayo", "Domingo", 1}
t2: {100, 4, 14, 21, 22, 5, 2016, "Mayo", "Domingo", 1}
a: 1
s1: (((((((Element[t1, 5] * 24) + Element[t1, 4]) * 60) + Element[t1, 3]) * 60) + Element[t1, 2]) * 1000) + Element[t1, 1]
s2: (((((((Element[t2, 5] * 24) + Element[t2, 4]) * 60) + Element[t2, 3]) * 60) + Element[t2, 2]) * 1000) + Element[t2, 1]
t = 0 (slider from 0 to 1, step 0.001)
verboton: 1
tiempo = If((s2 - s1) / 1000 ≤ 20, (s2 - s1) / 1000, 20)
B = Rotate(A + (0, 1.9), ((-tiempo) * π / 30), A)
u = Vector(A, B)
Pinta: (tiempo, x(P))
maxi: 20
anima: false
c2 = Circle(A, 2.1)
texto1: " " + (floor(tiempo)) + " "
Pinta2: Pinta
derecha: true
xP: x(P)
ondas = Sequence(CircleArc[(i, 4), (i + 0.2, 3.5), (i + 0.2, 4.5)], i, 1, floor(x(P)) - 1)
Brocha = (12.596273291925463, 4.240677966101696)
lista3 = Sequence(Segment[(0, (2 * k)), (22, (2 * k))], k, 1, 11)
lista4 = Sequence(Segment[((2 * k), 0), ((2 * k), 22)], k, 1, 11)
g1: 0
g2: 0
g3: 0
g4: 0
g5: 0