x_0

Γωνία στο χ_0

Β

Α

Παράμετροι Συνάρτησης

Ασυνέχεια στο Α

Εμφάνιση Τριγώνου Κλίσης

Ασυνέχεια στο Β

Τετμημένη σημείου Ε

x_0

n = 1.1264314570736564 (slider from x(a) to x(b), step 0.0010)
s = 0 (slider from -1 to 1, step 0.01)
r = 0 (slider from -1 to 1, step 0.1)
ν = 1.2 (slider from -3 to 3, step 0.01)
μ = 0 (slider from -3 to 3, step 0.01)
q = false
λ = 0.88 (slider from -2 to 2, step 0.01)
κ = 1.2 (slider from -5 to 5, step 0.1)
a = Point(xAxis)
b = Point(xAxis)
d = Segment(a, b)
x_0: (n, 0)
p = 0 (slider from -4 to 4, step 0.01)
f = Function(If[x < x(x_0), κ * sin(λ * x - μ) + ν, If[q, -(κ * sin(λ * x - μ) + ν) + 2 * (κ * sin(λ * x(x_0) - μ) + ν), κ * sin(λ * x - μ) + ν]], x(a), x(b))
Β: (x(b), f(x(b)))
Θ: (x(b), y(Β) + s)
Α: (x(a), f(x(a)))
Η: (x(a), y(Α) + r)
m = 1.2754314570736527 (slider from x(a) to x(b), step 0.0010)
c = Segment(Η, Θ)
α = Slope(c)
Γ: (x(x_0), f(x(x_0)))
Ε: (m, f(m))
Ζ: (x(Ε), 0)
g = Segment(Ζ, Ε)
h = Tangent(Ε, f)
i = Segment(x_0, Γ)
α_2 = Slope(h)
α_3 = Slope(c)
k = false
Δ: (x(x_0), κ * sin(λ * x(x_0) - μ) + ν)
κείμενο3: "Κλίση της ΑΒ = " + α_3 + ""
κείμενο4: "Κλίση της Εφαπτομένης στο Ε = " + α_2 + ""
e = Segment(a, If[r < 0, Α, Η])
j = Segment(b, If[s < 0, Β, Θ])