Mostrar traza

Comprobar

Colorear

Comprobar

ALDEANUEVA

BELLAVISTA

CAMPOLLANO

α = 0.017453292519943295 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
C = (10.040000000000001, -3)
B = (0.56, -4.16)
A = (1.28, 4.98)
polígono1, c, a, b = Polygon(A, B, C)
e = LineBisector(b)
d = LineBisector(c)
D = Intersect(d, e)
d4 = Distance(A, D)
P = (7.460695652173912, -1.547552795031055)
T: P
d1 = Distance(P, D)
d2 = Distance(P, B)
d3 = Distance(P, C)
rojo: 1 - abs(Distance[P, B] - Distance[P, A]) / d4
azul: 1 - abs(Distance[P, A] - Distance[P, C]) / d4
verde: 1 - abs(Distance[P, C] - Distance[P, B]) / d4
f = false
E = (-4.3, -5.96)
g = false
β: α / 2
S = (6.4, 1.16)
xgoma = -1.4 (slider from -1.6 to -1.4, step 0.1)
ygoma = 5.15 (slider from 5 to 5.15, step 0.1)
Goma: (xgoma, ygoma)