h=

r=

t1

t2

show harvest

e1 = 0
r = 0.2
h = 0.05
e2: 1 - h / r
stablee = Max(e1, e2)
M = 1
inputBox1 = Textfield(h)
f(x) = x + ((r * x) * (1 - x)) - (h * x)
f' = Derivative(f)
inputBox2 = Textfield(r)
E1: (e1, e1)
E2: (e2, e2)
tanlin2(x) = f(e2) + (f'(e2) * (x - e2))
tanlin1(x) = f(e1) + (f'(e1) * (x - e1))
viewt1 = false
toth: (h * stablee)
viewt2 = false
b = true
text2: "$\text{sustainable harvest}=" + (LaTeX[h]) + "\cdot" + (LaTeX[stablee]) + "=" + (LaTeX[toth]) + "$"
text3: "$E_1= " + (LaTeX[e1]) + ",\,E_2= " + (LaTeX[e2]) + "$"
text1: "$f(x)= " + (LaTeX[f]) + " $"