Esim.

Joen rantaan rakennetaan kanoille suorakulmion muotoinen aitaus siten,
että joenpuoleiselle sivulle ei tule aitaa. Aitaa on käytettävissä 10 metriä.
Kuinka aitauksen mitat (korkeus, leveys) on valittava,
jotta aitauksen pinta-ala olisi mahdollisimman suuri?
Mikä on tällöin aitauksen suurin mahdollinen pinta-ala?

A = Point(xAxis)
h = 2 (slider from 0 to 5, step 0.1)
a_1: abs(h)
C = Point(Circle[A, abs(h)])
a = Segment(A, C)
b_1: abs((10 - h) / 2)
D = Point(Circle[A, abs(10 - (2 * h))])
b = Segment(A, D)
c = OrthogonalLine(D, b)
d = OrthogonalLine(C, a)
B = Intersect(d, c)
e = Segment(A, C)
f = Segment(C, B)
g = Segment(B, D)
kuvio1, a_2, c_1, b_2, d_1 = Polygon(A, C, B, D)
i = IntegralBetween(0, -2, -50, 50)
teksti2: "A = " + kuvio1 + ""
E = Midpoint(f)
G = Midpoint(g)
H = Midpoint(e)
teksti3: "" + h + " m"
a_3: abs(h)
b_3: abs((10 - h) / 2)
teksti3_1: "" + h + " m"
teksti4: "" + (10 - (2 * h)) + " m"
F = Midpoint(A, B)