Vnitřní síly - prostý nosník s osamělou sílou
Author: Miroslav Vokáč

$\ell$

$F$

$x_F$

Montrer les forces

Moments de flexion

Trace Max max

Cacher les dimensions

gr

Metre

L: 0.739 + 0.131
F: 1981 + 697
rx = 0.259 (slider from 0.001 to 1, step 0.001)
x_F: (rx * L)
Z1 = (0, 0)
Z2: Z1 + (L * Vector[(1, 0)])
mark = 0.3
Z3: Z1 + (x_F * Vector[(1, 0)])
Z4: Z3 + Vector[(0, 1)]
vecF = Vector(Z4, Z3)
a = Segment(Z1, Z2)
Z5: Z1 + (mark * Vector[(-0.5000000000000001, -0.8660254037844386)])
Z6: Z2 + (mark * Vector[(-0.5000000000000001, -0.8660254037844386)])
Z7: Z1 + (mark * Vector[(0.5000000000000001, -0.8660254037844386)])
Z8: Z2 + (mark * Vector[(0.5000000000000001, -0.8660254037844386)])
Z9: Z6 + ((0.25 * mark) * Vector[(0, -1)])
Z10: Z8 + ((0.25 * mark) * Vector[(0, -1)])
b = Segment(Z1, Z5)
c = Segment(Z5, Z7)
d = Segment(Z7, Z1)
f = Segment(Z2, Z6)
g = Segment(Z6, Z8)
h = Segment(Z8, Z2)
i = Segment(Z9, Z10)
A: (F * (L - x_F) / L)
B: (F * x_F / L)
Z11: Z1 + Vector[(0, A / F)]
Z12: Z3 + Vector[(0, A / F)]
Z13: Z3 - Vector[(0, B / F)]
Z14: Z2 - Vector[(0, B / F)]
fceV, z1, z11, z12, z13, z14, z2 = Polygon(Z1, Z11, Z12, Z13, Z14, Z2)
BoolV = true
Z15: Z3 - Vector[(0, (A * x_F / F))]
BoolM = false
fceM, z2_1, z1_1, z15 = Polygon(Z1, Z15, Z2)
BoolMaxMax = false
VB: (-B)
Mx: (A * x_F)
text4: "" + (LaTeX[Mx]) + "\,{\rm kNm}"
Z16 = (0, 0.25)
Z17 = (0, 0.5)
Z18 = (0, 0.75)
Z19: (x_F, 0.5)
l = Segment(Z18, Z16)
u = Vector(Z17, Z19)
v = Vector(Z19, Z17)
text5: "$ x_F=" + (LaTeX[x_F]) + "\,{\rm m} $"
Z20 = (0, -0.5)
Z21 = (0, -1)
Z22: Z20 + Vector[(L, 0)]
Z23: Z21 + Vector[(L, 0)]
Z24 = Midpoint(Z20, Z21)
Z25 = Midpoint(Z22, Z23)
w = Vector(Z24, Z25)
z = Vector(Z25, Z24)
m = Segment(Z21, Z20)
n = Segment(Z22, Z23)
text6: "$ \ell = " + (LaTeX[L]) + "\,{\rm m} $"
BoolKoty = false
text1_1: "$ F=" + (LaTeX[F]) + "\,{\rm gr} $"
text3: "$ " + (LaTeX[VB]) + "\,{\rm gr} $"
text2_1: "" + (LaTeX[A]) + "\,{\rm gr
}"
ChampTexte1 = Textfield(F)
ChampTexte2 = Textfield(L)