Gelöste Aufgaben/DGEC: Unterschied zwischen den Versionen
(→tmp) |
Keine Bearbeitungszusammenfassung |
||
Zeile 1: | Zeile 1: | ||
[[Category:Randwertproblem]] | [[Category:Randwertproblem]] | ||
[[Category:Timoshenko-Balken]] | |||
[[Category:Euler-Bernoulli-Balken]] | |||
[[Category:Maxima]] | [[Category:Maxima]] | ||
Zeile 12: | Zeile 14: | ||
Wir vergleichen die Auslenkung in ''B'' nach den Balken-Modellen von | Wir vergleichen die Auslenkung in ''B'' nach den Balken-Modellen von | ||
* [[Sources/Lexikon/Euler-Bernoulli-Balken|Euler-Bernoulli]] und | *[[Sources/Lexikon/Euler-Bernoulli-Balken|Euler-Bernoulli]] und | ||
* [[Sources/Lexikon/Timoshenko-Balken|Timoshenko]] | *[[Sources/Lexikon/Timoshenko-Balken|Timoshenko]] | ||
</onlyinclude> | </onlyinclude> | ||
Der Balken-Querschnitt sei rechteckig mit den Abmessungen ''h'', ''b'': | Der Balken-Querschnitt sei rechteckig mit den Abmessungen ''h'', ''b'': | ||
Zeile 21: | Zeile 23: | ||
Hier gelte für den Querschnitt ''h=b''. | Hier gelte für den Querschnitt ''h=b''. | ||
== Lösung mit Maxima == | ==Lösung mit Maxima== | ||
Lorem Ipsum .... | Lorem Ipsum .... | ||
<!--------------------------------------------------------------------------------> | <!--------------------------------------------------------------------------------> | ||
== | {{MyCodeBlock|title=Header | ||
Wir suchen Näherungslösungen für die Verschiebung des Punktes ''B'' mit dem Prinzip der virtuellen Verrückungen auf Basis der Bewegungsgleichungen aus DGEB. Dazu setzen wir einmal die Verschiebung und Verdrehung der Querschnitte jeweils nach dem Modell des | |text=Wir suchen Näherungslösungen für die Verschiebung des Punktes ''B'' mit dem Prinzip der virtuellen Verrückungen auf Basis der Bewegungsgleichungen aus DGEB. Dazu setzen wir einmal die Verschiebung und Verdrehung der Querschnitte jeweils nach dem Modell des | ||
* Timoshenko-Balkens und | *Timoshenko-Balkens und | ||
* Euler-Bernoulli-Balkens | *Euler-Bernoulli-Balkens | ||
an. | an. | ||
|code= | |code= | ||
<syntaxhighlight lang="lisp" line start=1> | <syntaxhighlight lang="lisp" line start=1> | ||
/*******************************************************/ | |||
/* MAXIMA script */ | |||
/* version: wxMaxima 15.08.2 */ | |||
/* author: Andreas Baumgart */ | |||
/* last updated: 2018-12-09 */ | |||
/* ref: Euler-Bernoulli Beam */ | |||
/* description: derives the equations of motion for */ | |||
/* the Timoshenko and EBB beam */ | |||
/*******************************************************/ | |||
/* declare variational variables */ | |||
declare("δW", alphabetic); /* virtual work */ | |||
declare("δA", alphabetic); /* virtual work of implied external forces */ | |||
declare("δΠ", alphabetic); /* virtual strain energy */ | |||
declare("δw", alphabetic); | |||
declare( "ϕ", alphabetic); | |||
declare("δϕ", alphabetic); | |||
declare( "Φ", alphabetic); | |||
declare("δΦ", alphabetic); | |||
declare( "ℓ", alphabetic); | |||
</syntaxhighlight> | </syntaxhighlight> | ||
}} | }} | ||
<!--------------------------------------------------------------------------------> | <!--------------------------------------------------------------------------------> | ||
{{MyCodeBlock|title=Parameter | {{MyCodeBlock|title=Parameter | ||
|text=Parameter sind | |text=Parameter sind | ||
<math></math> | ::<math>\displaystyle G=\frac{E}{2 \left( \nu+1\right) },\nu=\frac{3}{10},A={{h}^{2}},I=\frac{{{h}^{4}}}{12}</math> | ||
|code= | |code= | ||
<syntaxhighlight lang="lisp" line start=1> | <syntaxhighlight lang="lisp" line start=1> | ||
1+ | /*******************************************************/ | ||
/* parameters */ | |||
params: [GA=G*A, EI = E*I, G = E/(2*(1+nu)), nu=3/10, A=h^2, I=h^4/12]; | |||
</syntaxhighlight> | </syntaxhighlight> | ||
}} | }} | ||
<!--------------------------------------------------------------------------------> | <!--------------------------------------------------------------------------------> | ||
= | {{MyCodeBlock|title=Trial-Functions | ||
|text= | |||
Wir wählen als Trial-Functions für die Auslenkung ''w'' und die Verdrehung ''ϕ'' des Timoshenko-Balkens: | Wir wählen als Trial-Functions für die Auslenkung ''w'' und die Verdrehung ''ϕ'' des Timoshenko-Balkens: | ||
<math>\begin{array}{ll}w(x) &= W \cdot (3\,\xi^2-2\,\xi^3),\\ \phi(x) &= \Phi\cdot 4\,\xi\,(1-\xi) \end{array}</math> . | ::<math>\begin{array}{ll}w(x) &= W \cdot (3\,\xi^2-2\,\xi^3),\\ \phi(x) &= \Phi\cdot 4\,\xi\,(1-\xi) \end{array}</math> . | ||
Beim Euler-Bernoulli-Balken ist | Beim Euler-Bernoulli-Balken ist | ||
<math>\phi(x) = w')(x)</math> | ::<math>\phi(x) = w')(x)</math> | ||
fest "eingebaut" - wir brauchen keine Trial-Funktion für ''ϕ''. | fest "eingebaut" - wir brauchen keine Trial-Funktion für ''ϕ''. | ||
Und so sehen die beiden Trial-Funtions aus: | Und so sehen die beiden Trial-Funtions aus: | ||
| | [[Datei:DGEC-Trialfcts.png|mini|Unsere Trialfunctions.]] | ||
|code= | |code= | ||
<syntaxhighlight lang="lisp" line start=1> | <syntaxhighlight lang="lisp" line start=1> | ||
1 | /*******************************************************/ | ||
/* trial functions */ | |||
trials : [w = W*(3*xi^2-2*xi^3), ϕ = Φ*4*xi*(1-xi)]; | |||
plot2d(subst(trials,[w/W, ϕ/Φ]), [xi,0,1], [xlabel, "ξ ->"], [ylabel, "φ ->"]); | |||
</syntaxhighlight> | </syntaxhighlight> | ||
}} | }} | ||
<!--------------------------------------------------------------------------------> | <!--------------------------------------------------------------------------------> | ||
= | {{MyCodeBlock|title=Equilibrium-Conditions | ||
|text= | |||
Mit dem Prinzip der virtuellen Verrückungen lautet die Gleichgewichtsbedingung | Mit dem Prinzip der virtuellen Verrückungen lautet die Gleichgewichtsbedingung | ||
<math>\begin{array}{ll}\delta W &= \delta W^a - \delta \Pi\\&\stackrel{!}{=}0\end{array}</math>. | ::<math>\begin{array}{ll}\delta W &= \delta W^a - \delta \Pi\\&\stackrel{!}{=}0\end{array}</math>. | ||
Aus DGEB wissen wir für die Virtuelle Formänderungsenergie | Aus DGEB wissen wir für die Virtuelle Formänderungsenergie | ||
Zeile 85: | Zeile 110: | ||
Und die virtuelle Arbeit der äußeren Kraft ''F'' ist | Und die virtuelle Arbeit der äußeren Kraft ''F'' ist | ||
<math>\delta W^a = F\;\delta W</math> | ::<math>\delta W^a = F\;\delta W</math> | ||
|code= | |code= | ||
<syntaxhighlight lang="lisp" line start=1> | <syntaxhighlight lang="lisp" line start=1> | ||
1+1 | |||
/*******************************************************/ | |||
/* Principle of Virtual Work */ | |||
δΠ : [ 1/4*GA*('diff(w,x)-ϕ)*'diff(δw,x) | |||
+ 1/4*GA*(ϕ-'diff(w,x))* δϕ | |||
+ EI*'diff(ϕ,x)*'diff(δϕ,x), | |||
EI*'diff(w,x,2)*'diff(δw,x,2)]; | |||
δA : F*δW; | |||
Q : [[ W, Φ, w, ϕ], | |||
[δW,δΦ,δw,δϕ]]; | |||
varia : makelist(Q[1][i]=Q[2][i],i,1,4); | |||
δΠ : subst([xi=x/ℓ],subst(trials,subst(subst(varia,trials),δΠ))); | |||
δΠ : integrate(ev(δΠ,nouns),x,0,ℓ); | |||
</syntaxhighlight> | </syntaxhighlight> | ||
}} | }} | ||
<!--------------------------------------------------------------------------------> | <!--------------------------------------------------------------------------------> | ||
== | {{MyCodeBlock|title=Solving | ||
|text= | |||
Aus den Gleichgewichtsbedingungen erhalten wir die Gleichungen von | Aus den Gleichgewichtsbedingungen erhalten wir die Gleichungen von | ||
* ''W'' und ''Φ'' für den Timoshenko-Balken und | *''W'' und ''Φ'' für den Timoshenko-Balken und | ||
* ''W'' für den Euler-Bernoulli-Balken. | *''W'' für den Euler-Bernoulli-Balken. | ||
{| class="wikitable" | {| class="wikitable" | ||
Zeile 115: | Zeile 152: | ||
| colspan="1" |<math>\displaystyle W=\frac{{{\ell}^{3}}}{12\,E I}\,F</math> | | colspan="1" |<math>\displaystyle W=\frac{{{\ell}^{3}}}{12\,E I}\,F</math> | ||
|} | |} | ||
|code= | |code= | ||
<syntaxhighlight lang="lisp" line start=1> | <syntaxhighlight lang="lisp" line start=1> | ||
1 | /*******************************************************/ | ||
/* equations of motion */ | |||
eom: [makelist(coeff(expand(δΠ[1]-δA),Q[2][i])=0,i,1,2), | |||
coeff(expand(δΠ[2]-δA),Q[2][1])=0]; | |||
sol: [solve(eom[1],[ W, Φ])[1], solve(eom[2], W)]; | |||
</syntaxhighlight> | </syntaxhighlight> | ||
}} | }} | ||
<!--------------------------------------------------------------------------------> | <!--------------------------------------------------------------------------------> | ||
Einsetzen der Parameter liefert die Verschiebung des Punkte | Einsetzen der Parameter liefert die Verschiebung des Punkte | ||
<math>\displaystyle \tilde{W} = \frac{W}{\displaystyle \frac{\ell^3\,F}{E\,h^4}} \text{ für } \alpha = \frac{h}{\ell}:</math>: | ::<math>\displaystyle \tilde{W} = \frac{W}{\displaystyle \frac{\ell^3\,F}{E\,h^4}} \text{ für } \alpha = \frac{h}{\ell}:</math>: | ||
Wir sehen: für schlanke Balken bis α<0.2 können wir getrost mit der Euler-Bernoulli-Hypothese arbeiten - für "stäbigere" Balken brauchen wir mindestens das Timoshenko-Modell.{{MyCodeBlock|title=Post-Processing | Wir sehen: für schlanke Balken bis α<0.2 können wir getrost mit der Euler-Bernoulli-Hypothese arbeiten - für "stäbigere" Balken brauchen wir mindestens das Timoshenko-Modell. | ||
[[Datei:DGEC-Ergebnis.png|mini|Vergleich von Timoshenko und Euler-Bernoulli-Modell.]] | |||
{{MyCodeBlock|title=Post-Processing | |||
|text=Text | |text=Text | ||
|code= | |code= | ||
<syntaxhighlight lang="lisp" line start=1> | <syntaxhighlight lang="lisp" line start=1> | ||
1 | /*******************************************************/ | ||
/* post-processing */ | |||
sol: ratsimp(subst([h=alpha*ℓ],subst(params,sol/(F*ℓ^3/(E*h^4))))); | |||
plot2d([rhs(sol[1][1]),rhs(sol[2][1])], [alpha,0.0001,0.5], [y,0,3], logx, [xlabel, "α ->"], [ylabel, "W/(Fℓ^3/12EI) ->"], [legend,"Timoshenko","Euler-Bernoulli"]); | |||
</syntaxhighlight> | </syntaxhighlight> | ||
}} | }} | ||
Zeile 139: | Zeile 184: | ||
'''Links''' | '''Links''' | ||
* ... | *... | ||
'''Literature''' | '''Literature''' | ||
* ... | *... |
Version vom 23. Februar 2021, 12:04 Uhr
Aufgabenstellung
Wie sich die Balkenmodell von Euler-Bernoulli und Timoshenko in Ihrem Modellverhalten unterscheiden, untersuchen wir hier.
Ein Balken AB (Länge ℓ, Rechteck-Querschnitt h*b, Elastizitäts-Module E) ist in A fest eingespannt und in B durch eine Parallelführung gelagert.
In B wird er durch eine senkrechte Kraft F belastet.
Wir vergleichen die Auslenkung in B nach den Balken-Modellen von
Der Balken-Querschnitt sei rechteckig mit den Abmessungen h, b:
Hier gelte für den Querschnitt h=b.
Lösung mit Maxima
Lorem Ipsum ....
Header
Wir suchen Näherungslösungen für die Verschiebung des Punktes B mit dem Prinzip der virtuellen Verrückungen auf Basis der Bewegungsgleichungen aus DGEB. Dazu setzen wir einmal die Verschiebung und Verdrehung der Querschnitte jeweils nach dem Modell des
- Timoshenko-Balkens und
- Euler-Bernoulli-Balkens
an.
/*******************************************************/
/* MAXIMA script */
/* version: wxMaxima 15.08.2 */
/* author: Andreas Baumgart */
/* last updated: 2018-12-09 */
/* ref: Euler-Bernoulli Beam */
/* description: derives the equations of motion for */
/* the Timoshenko and EBB beam */
/*******************************************************/
/* declare variational variables */
declare("δW", alphabetic); /* virtual work */
declare("δA", alphabetic); /* virtual work of implied external forces */
declare("δΠ", alphabetic); /* virtual strain energy */
declare("δw", alphabetic);
declare( "ϕ", alphabetic);
declare("δϕ", alphabetic);
declare( "Φ", alphabetic);
declare("δΦ", alphabetic);
declare( "ℓ", alphabetic);
Parameter
Parameter sind
/*******************************************************/
/* parameters */
params: [GA=G*A, EI = E*I, G = E/(2*(1+nu)), nu=3/10, A=h^2, I=h^4/12];
Trial-Functions
Wir wählen als Trial-Functions für die Auslenkung w und die Verdrehung ϕ des Timoshenko-Balkens:
- .
Beim Euler-Bernoulli-Balken ist
fest "eingebaut" - wir brauchen keine Trial-Funktion für ϕ.
Und so sehen die beiden Trial-Funtions aus:
/*******************************************************/
/* trial functions */
trials : [w = W*(3*xi^2-2*xi^3), ϕ = Φ*4*xi*(1-xi)];
plot2d(subst(trials,[w/W, ϕ/Φ]), [xi,0,1], [xlabel, "ξ ->"], [ylabel, "φ ->"]);
Equilibrium-Conditions
Mit dem Prinzip der virtuellen Verrückungen lautet die Gleichgewichtsbedingung
- .
Aus DGEB wissen wir für die Virtuelle Formänderungsenergie {
/*******************************************************/
/* Principle of Virtual Work */
δΠ : [ 1/4*GA*('diff(w,x)-ϕ)*'diff(δw,x)
+ 1/4*GA*(ϕ-'diff(w,x))* δϕ
+ EI*'diff(ϕ,x)*'diff(δϕ,x),
EI*'diff(w,x,2)*'diff(δw,x,2)];
δA : F*δW;
Q : [[ W, Φ, w, ϕ],
[δW,δΦ,δw,δϕ]];
varia : makelist(Q[1][i]=Q[2][i],i,1,4);
δΠ : subst([xi=x/ℓ],subst(trials,subst(subst(varia,trials),δΠ)));
δΠ : integrate(ev(δΠ,nouns),x,0,ℓ);
Solving
Aus den Gleichgewichtsbedingungen erhalten wir die Gleichungen von
- W und Φ für den Timoshenko-Balken und
- W für den Euler-Bernoulli-Balken.
{
/*******************************************************/
/* equations of motion */
eom: [makelist(coeff(expand(δΠ[1]-δA),Q[2][i])=0,i,1,2),
coeff(expand(δΠ[2]-δA),Q[2][1])=0];
sol: [solve(eom[1],[ W, Φ])[1], solve(eom[2], W)];
Einsetzen der Parameter liefert die Verschiebung des Punkte
- :
Wir sehen: für schlanke Balken bis α<0.2 können wir getrost mit der Euler-Bernoulli-Hypothese arbeiten - für "stäbigere" Balken brauchen wir mindestens das Timoshenko-Modell.
Post-Processing
Text
/*******************************************************/
/* post-processing */
sol: ratsimp(subst([h=alpha*ℓ],subst(params,sol/(F*ℓ^3/(E*h^4)))));
plot2d([rhs(sol[1][1]),rhs(sol[2][1])], [alpha,0.0001,0.5], [y,0,3], logx, [xlabel, "α ->"], [ylabel, "W/(Fℓ^3/12EI) ->"], [legend,"Timoshenko","Euler-Bernoulli"]);
Links
- ...
Literature
- ...