Gelöste Aufgaben/DGEC: Unterschied zwischen den Versionen

Aus numpedia
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
 
(9 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 1: Zeile 1:
[[Category:Gelöste_Aufgaben]]
[[Category:Randwertproblem]]  
[[Category:Randwertproblem]]  
[[Category:Timoshenko-Balken]]
[[Category:Euler-Bernoulli-Balken]]
[[Category:Maxima]]
[[Category:Maxima]]


Zeile 5: Zeile 8:
Wie sich die Balkenmodell von Euler-Bernoulli und Timoshenko in Ihrem Modellverhalten unterscheiden, untersuchen wir hier.
Wie sich die Balkenmodell von Euler-Bernoulli und Timoshenko in Ihrem Modellverhalten unterscheiden, untersuchen wir hier.
<onlyinclude>
<onlyinclude>
[[Datei:DGEC-01.png|ohne|mini|144x144px|Lageplan]]
[[Datei:DGEC-01.png|mini|200x200px|Lageplan|alternativtext=|links]]
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.
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.


Zeile 12: Zeile 15:
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 24:
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 ....


<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
{{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 [[Werkzeuge/Gleichgewichtsbedingungen/Arbeitsprinzipe der Analytischen Mechanik/Prinzip der virtuellen Verrückungen|Prinzip der virtuellen Verrückungen]] auf Basis der Bewegungsgleichungen aus [[Gelöste_Aufgaben/DGEB|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.{{MyCodeBlock|title=Header
an.
|text=Text
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
1+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>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
<math>\displaystyle G=\frac{E}{2 \left( \nu+1\right) },\nu=\frac{3}{10},A={{h}^{2}},I=\frac{{{h}^{4}}}{12}</math>
{{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+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>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
{{MyCodeBlock|title=Trial-Functions
Wir wählen als Trial-Functions für die Auslenkung ''w'' und die Verdrehung ''ϕ'' des Timoshenko-Balkens:
|text=
Wir wählen als [[Sources/Lexikon/Trial-Function|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:{{MyCodeBlock|title=Trial-Functions
Und so sehen die beiden Trial-Funtions aus:
|text=Text
[[Datei:DGEC-Trialfcts.png|mini|Unsere Trialfunctions.]]
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
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>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
{{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 [[Sources/Lexikon/Virtuelle Formänderungsenergie|Virtuelle Formänderungsenergie]]
<table>
<tr><th>... für den Timoshenko-Balken</th><th>... für den Euler-Bernoulli-Balken</th></tr>
 
<tr><td><math>\begin{array}{lcl} \delta\Pi =  &\displaystyle \int_0^\ell& \displaystyle \frac{1}{4} G\,A\,(w'-\phi)\cdot (\delta w'-\delta \phi) \\&+ &E\,I\,\phi'\,\delta \phi' \; dx \end{array}</math></td><td><math>\displaystyle \delta\Pi = \int_0^\ell  EI\,w''\,\delta w'' \; dx</math></td></tr>
 
</table>


Aus DGEB wissen wir für die Virtuelle Formänderungsenergie
{| class="wikitable"
!... für den Timoshenko-Balken
!... für den Euler-Bernoulli-Balken
|-
|<math>\begin{array}{lcl} \delta\Pi =  &\displaystyle \int_0^\ell& \displaystyle \frac{1}{4} G\,A\,(w'-\phi)\cdot (\delta w'-\delta \phi) \\&+ &E\,I\,\phi'\,\delta \phi' \; dx \end{array}</math>
|<math>\displaystyle \delta\Pi = \int_0^\ell  EI\,w''\,\delta w'' \; dx</math>
|}
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>{{MyCodeBlock|title=Equilibrium-Conditions
::<math>\delta W^a = F\;\delta W</math>
|text=Text
|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>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
{{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"
<table cellpadding="10px">
!Timoshenko
<tr><th>Timoshenko</th><th>Euler-Bernoulli</th></tr>
!Euler-Bernoulli
<tr><td><math>\begin{array}{ll}\displaystyle \frac{3 \, G A}{10 \, \ell} \cdot W-\frac{G A}{5} \cdot \Phi &=F,\\
|-
|<math>\begin{array}{ll}\displaystyle \frac{3 \, G A}{10 \, \ell} \cdot W-\frac{G A}{5} \cdot \Phi &=F,\\
                         \displaystyle  \left(\frac{2\, G A\, \ell}{15}+\frac{16\, E I}{3 \ell}\right) \cdot \Phi -\frac{G A}{5}\cdot W&=0
                         \displaystyle  \left(\frac{2\, G A\, \ell}{15}+\frac{16\, E I}{3 \ell}\right) \cdot \Phi -\frac{G A}{5}\cdot W&=0
\end{array}</math>
\end{array}</math>
|<math>\displaystyle \frac{12 \, E I}{{{\ell}^{3}}}\, W=F</math>
</td><td><math>\displaystyle \frac{12 \, E I}{{{\ell}^{3}}}\, W=F</math></td></tr>
|-
 
| colspan="2" |mit der Lösung
<tr><td colspan="2">mit der Lösung></td></tr>
|-
 
| colspan="1" |<math>\displaystyle W=\frac{G A\, {{\ell}^{3}}+40 \,E I\,\ell}{12\,E I\,G A}\,F,\;\;\Phi =\frac{{{\ell}^{2}}}{8\,E I}\,F</math>
<tr><td><math>\displaystyle W=\frac{G A\, {{\ell}^{3}}+40 \,E I\,\ell}{12\,E I\,G A}\,F,\;\;\Phi =\frac{{{\ell}^{2}}}{8\,E I}\,F</math></td><td><math>\displaystyle W=\frac{{{\ell}^{3}}}{12\,E I}\,F</math></td></tr>
| colspan="1" |<math>\displaystyle W=\frac{{{\ell}^{3}}}{12\,E I}\,F</math>
 
|}
</table>
{{MyCodeBlock|title=Solving
|text=Text
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
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>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
{{MyCodeBlock|title=Post-Processing
|text=
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.
|text=Text
[[Datei:DGEC-Ergebnis.png|mini|Vergleich von Timoshenko und Euler-Bernoulli-Modell.]]
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
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 182:


'''Links'''
'''Links'''
* ...
*...


'''Literature'''
'''Literature'''
* ...
*...

Aktuelle Version vom 29. März 2021, 06:27 Uhr


Aufgabenstellung

Wie sich die Balkenmodell von Euler-Bernoulli und Timoshenko in Ihrem Modellverhalten unterscheiden, untersuchen wir hier.

Lageplan

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

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:

Unsere Trialfunctions.

/*******************************************************/
/* 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

... für den Timoshenko-Balken... für den Euler-Bernoulli-Balken

Und die virtuelle Arbeit der äußeren Kraft F ist


/*******************************************************/
/* 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.
TimoshenkoEuler-Bernoulli
mit der Lösung>

/*******************************************************/
/* 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)];



Post-Processing

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.

Vergleich von Timoshenko und Euler-Bernoulli-Modell.

/*******************************************************/
/* 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

  • ...