Gelöste Aufgaben/DGEC: Unterschied zwischen den Versionen

Aus numpedia
Zur Navigation springen Zur Suche springen
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 ....


<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
==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 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.{{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
|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:{{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 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>{{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"
{| 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>
|}
|}
{{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==
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+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.

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

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:

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 {


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

Vergleich von Timoshenko und Euler-Bernoulli-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

  • ...