εψιλοντικός ορισμός του ορίου για την f(x)=3x+1 και το σημείο Α(2,0)
Author: Toυρναβίτης Στέργιος

Mετακινήστε το e, την ακτίνα του διαστήματος (7-ε,7+ε) πάνω στον άξονα y΄y. Για οποιοδήποτε ε>0, υπάρχει δ>0: για κάθε Μ που κινείται
στο διάστημα (2-δ,2+δ) και η τετμημένη του είναι διαφορετική του 2, η τεταγμένη του σημείου βρίσκεται στο διάστημα (7-ε,7+ε)

A = Point(xAxis)
b = OrthogonalLine(A, xAxis)
B_1 = Intersect(a_1, b)
e = 3 (slider from 0 to 3, step 0.01)
a = Segment(B_1, A)
c = OrthogonalLine(B_1, yAxis)
d = Line(A, c)
f = OrthogonalLine(A, yAxis)
C = Point(f)
O = Point(d)
g = OrthogonalLine(O, c)
h = OrthogonalLine(O, d)
B = Intersect(c, g)
i = Segment(B_1, B)
j: y = 7.0 + e
k: x = 2.0 + e / 3.0
m: y = 7.0 - e
l_1: x = 2.0 - e / 3.0
l = Intersect(g, m)
K = Intersect(g, j)
F = Intersect(a_1, m)
G = Intersect(d, l_1)
H = Intersect(d, k)
I = Intersect(a_1, j)
πολύγ.1, f_1, g_1, h_1, i_1 = Polygon(F, G, H, I)
πολύγ.2, k_1, i_2, f_2, l_2 = Polygon(K, I, F, l)
n = Segment(G, H)
M = Point(g_1)
p = OrthogonalLine(M, d)
E = Intersect(a_1, p)
q = OrthogonalLine(E, g)
J = Intersect(g, q)
r = Segment(M, E)
s = Segment(E, J)
t = Segment(G, A)
δ = Segment(A, H)
c_1 = Segment(l, B)
ε = Segment(B, K)
απόστασηlK = Distance(l, K)
o = Distance(l, K)
απόστασηΓK = Distance(B, K)
πολύγ.3, l_3, f_3, i_3, k_2 = Polygon(l, F, I, K)
πολύγ.4, f_4, g_2, h_2, i_4 = Polygon(F, G, H, I)