Estremi voncolati: fascio di rette con vincolo circonferenza
Author: Paolo Urbani

z=\frac{a_1x+b_1y+c_1 }{a_2x+b_2y+c_2} 

s.a (x-x_C)²+(y-y_C)²=r²

Modificare negli oggetti liberi il valore dei vari parametri.
Muovere la z per osservare le curve di livello

a_1

b_1

c_1

a_2

b_2

c_2

x_C

y_C

r

a_1 = 1 (slider from -10 to 10, step 0.1)
b_1 = -1 (slider from -10 to 10, step 0.1)
c_1 = 1 (slider from -10 to 10, step 0.1)
a_2 = 0 (slider from -10 to 10, step 0.1)
b_2 = 2 (slider from -10 to 10, step 0.1)
c_2 = -8 (slider from -10 to 10, step 0.1)
num: a_1 * x + b_1 * y + c_1 = 0
den: a_2 * x + b_2 * y + c_2 = 0
P = Intersect(num, den)
x_C = 3
y_C = 0
r = 2 (slider from 0 to 5, step 0.1)
vincolo: (x - x_C)^(2) + (y - y_C)^(2) = r^(2)
z = -2 (slider from -5 to 5, step 0.1)
cdl: (a_2 * x + b_2 * y + c_2) * z - (a_1 * x + b_1 * y + c_1) = 0
d, e = Tangent(P, vincolo)
A = Intersect(vincolo, d)
B = Intersect(vincolo, e)
C: (x_C, y_C)
raggio = Segment(C, B)
α = Angle(P, B, C)
campo1 = Textfield(a_1)
campo2 = Textfield(b_1)
campo3 = Textfield(c_1)
campo4 = Textfield(a_2)
campo5 = Textfield(b_2)
campo6 = Textfield(c_2)
campo7 = Textfield(x_C)
campo8 = Textfield(y_C)
campo9 = Textfield(r)
testo1 = LaTeX(vincolo, true, true)
testo2: "z=\frac{" + (LaTeX[a_1]) + "x+" + (LaTeX[b_1]) + "y+" + (LaTeX[c_1]) + "}{" + (LaTeX[a_2]) + "x+" + (LaTeX[b_2]) + "y+" + (LaTeX[c_2]) + "}"