Gelöste Aufgaben/DGEC: Unterschied zwischen den Versionen

Aus numpedia
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
 
(10 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
{{MyCodeBlock|title=Header
|text=Text
|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
*Euler-Bernoulli-Balkens
 
an.
|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==
{{MyCodeBlock|title=Parameter
{{MyCodeBlock|title=Parameter
|text=Text
|text=Parameter sind
 
::<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
{{MyCodeBlock|title=Trial-Functions
|text=Text
|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> .
 
Beim Euler-Bernoulli-Balken ist
 
::<math>\phi(x) = w')(x)</math>
 
fest "eingebaut" - wir brauchen keine Trial-Funktion für ''ϕ''.
 
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+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
{{MyCodeBlock|title=Equilibrium-Conditions
|text=Text
|text=
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>.
 
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>
 
Und die virtuelle Arbeit der äußeren Kraft ''F'' ist
 
::<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>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==tmp==
{{MyCodeBlock|title=Solving
{{MyCodeBlock|title=Solving
|text=Text
|text=
Aus den Gleichgewichtsbedingungen erhalten wir die Gleichungen von
 
*''W'' und ''Φ'' für den Timoshenko-Balken und
*''W'' für den Euler-Bernoulli-Balken.
 
<table cellpadding="10px">
<tr><th>Timoshenko</th><th>Euler-Bernoulli</th></tr>
<tr><td><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
\end{array}</math>
</td><td><math>\displaystyle \frac{12 \, E I}{{{\ell}^{3}}}\, W=F</math></td></tr>
 
<tr><td colspan="2">mit der Lösung></td></tr>
 
<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>
 
</table>
|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
{{MyCodeBlock|title=Post-Processing
|text=Text
|text=
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>:
 
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.]]
|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 82: 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

  • ...