Gelöste Aufgaben/FEB2: Unterschied zwischen den Versionen

Aus numpedia
Zur Navigation springen Zur Suche springen
KKeine Bearbeitungszusammenfassung
 
(6 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 13: Zeile 13:


<onlyinclude>
<onlyinclude>
[[Datei:FEB2-01.png|mini|217x217px|Lageplan|alternativtext=]]
[[Datei:FEB2-01.png|mini|left|217x217px|Lageplan|alternativtext=]]
Gesucht ist die Verschiebungen und Verdrehungen der Balken mit der [[Randwertprobleme/Methoden zur Lösung von Randwertproblemen/Finite Elemente Methode|Methode der Finiten ELemente]].
Gesucht ist die Verschiebungen und Verdrehungen der Balken mit der [[Randwertprobleme/Methoden zur Lösung von Randwertproblemen/Finite Elemente Methode|Methode der Finiten ELemente]].
</onlyinclude>
</onlyinclude>
Zeile 20: Zeile 20:
== Lösung mit Maxima ==
== Lösung mit Maxima ==
Berechnet werden sollten daf[r die Auslenkungen und Verdrehung der Punkte ''A, B'' und ''C''. Das Modell soll aus zwei Finiten Elementen bestehen, jeweils eins für den Abschnitt ''AB'' und ''BC''. Die neutralen Fasern der beiden Balken seien in Längsrichtung undehnbar – die Querschnitts-Schwerpunkte verschieben sich also nicht in Balken-Längsrichtung.
Berechnet werden sollten daf[r die Auslenkungen und Verdrehung der Punkte ''A, B'' und ''C''. Das Modell soll aus zwei Finiten Elementen bestehen, jeweils eins für den Abschnitt ''AB'' und ''BC''. Die neutralen Fasern der beiden Balken seien in Längsrichtung undehnbar – die Querschnitts-Schwerpunkte verschieben sich also nicht in Balken-Längsrichtung.
 
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->Hier müssen die Element-Steifigkeitsmatrizen für zwei Sektionen von [[Sources/Lexikon/Euler-Bernoulli-Balken|Euler-Bernoulli-Balken]] zusammengefügt (assembliert) werden. Die Schwierigkeit liegt darin, die Koordinaten in Punkt ''B'' passend zu wählen.{{MyCodeBlock|title=Header
{{MyCodeBlock|title=Header
|text=Text
|text=
Hier müssen die Element-Steifigkeitsmatrizen für zwei Sektionen von [[Sources/Lexikon/Euler-Bernoulli-Balken|Euler-Bernoulli-Balken]] zusammengefügt (assembliert) werden. Die Schwierigkeit liegt darin, die Koordinaten in Punkt ''B'' passend zu wählen.
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
1+1
 
/*******************************************************/
/* MAXIMA script                                      */
/* version: wxMaxima 16.04.2                          */
/* author: Andreas Baumgart                            */
/* last updated: 2018-02-13                            */
/* ref: TM-C                                          */
/* description: FEM-solution for two rgidly connected  */
/*              sections                              */
/*******************************************************/
 
/*******************************************************/
/* MAXIMA script                                      */
/* version: wxMaxima 16.04.2                          */
/* author: Andreas Baumgart                            */
/* last updated: 2018-02-13                            */
/* ref: TM-C                                          */
/* description: FEM-solution for two rigidly connected */
/*              sections                              */
/*******************************************************/
</syntaxhighlight>
</syntaxhighlight>
}}
}}
))tmp))
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Declarations
<!-------------------------------------------------------------------------------->
|text=
Die Element-Steifigkeitsmatrix kopieren wir aus Abschnitt FEM-Formulierung für den Euler-Bernoulli-Balken zu:
Die Element-Steifigkeitsmatrix kopieren wir aus Abschnitt FEM-Formulierung für den Euler-Bernoulli-Balken zu:


<math>\displaystyle K_i(\ell_i) = \frac{E I}{\ell_i^3}\cdot \begin{pmatrix}12 & 6\cdot \ell & -12 & 6\cdot \ell_i\\ 6\cdot \ell_i & 4\cdot {{\ell_i}^{2}} & -6\cdot \ell_i & 2\cdot {{\ell_i}^{2}}\\ -12 & -6\cdot \ell_i & 12 & -6\cdot \ell_i\\ 6\cdot \ell_i & 2\cdot {{\ell_i}^{2}} & -6\cdot \ell_i & 4\cdot {{\ell_i}^{2}}\end{pmatrix}</math>.
::<math>\displaystyle K_i(\ell_i) = \frac{E I}{\ell_i^3}\cdot \begin{pmatrix}12 & 6\cdot \ell_i & -12 & 6\cdot \ell_i\\ 6\cdot \ell_i & 4\cdot {{\ell_i}^{2}} & -6\cdot \ell_i & 2\cdot {{\ell_i}^{2}}\\ -12 & -6\cdot \ell_i & 12 & -6\cdot \ell_i\\ 6\cdot \ell_i & 2\cdot {{\ell_i}^{2}} & -6\cdot \ell_i & 4\cdot {{\ell_i}^{2}}\end{pmatrix}</math>.


Die Element-Längen der zwei Finiten Elemente sind hier
Die Element-Längen der zwei Finiten Elemente sind hier


<math>\begin{array}{l}\ell_1 = a\\ \ell_2 = 2\,a\end{array}</math>.
::<math>\begin{array}{l}\ell_1 = a\\ \ell_2 = 2\,a\end{array}</math>.
<!-------------------------------------------------------------------------------->
|code=
<syntaxhighlight lang="lisp" line start=1>


/***************************************************/
/* FEM-Formulierung+für+den+Euler-Bernoulli-Balken */
/*Trial-Fucntions*/
phi : [      (xi-1)^2*(2*xi+1),
        l[i]* xi    *(  xi-1)^2,
        -      xi^2  *(2*xi-3),
        l[i]* xi^2  *(  xi-1)];
Ki(l):= (EI/l^3)*matrix([ 12, 6*l  ,-12  , 6*l  ],
                        [6*l, 4*l^2, -6*l, 2*l^2],
                        [-12,-6*l  , 12  ,-6*l  ],
                        [6*l, 2*l^2, -6*l, 4*l^2]);
/***************************************************/
</syntaxhighlight>
}}
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Coordinates
|text=
Zunächst hat das System mit zwei Finiten Elementen jeweils 4 Koordinaten, nämlich


Zunächst hat das System mit zwei Finiten Elementen jeweils 4 Koordinaten, nämlich
::<math>W_{i-1},\Phi_{i-1},W_{i},\Phi_{i}</math>.


<math>W_{i-1},\Phi_{i-1},W_{i},\Phi_{i}</math>.
<table>
{| class="wikitable"
<tr>
!Sektino ''AB''
<th style="background-color:#ff0000;">Sektion ''A-B''</th>
!Sektion ''BC''
<th style="background-color:#00ff00;">Sektion ''B-C''</th></tr>
|-
<tr><td style="width:50%; vertical-align:top">Die Sektion ist in A fest eingespannt, also ist hier
|Die Sektion ist in A fest eingespannt, also ist hier


<math>W_{i-1} =0,\;\Phi_{i-1}=0.</math>
::<math>W_{i-1} =0,\;\Phi_{i-1}=0.</math>


Es bleiben die Verschiebung und Verdrehung in ''B'', also
Es bleiben die Verschiebung und Verdrehung in ''B'', also


<math>W_{i} = W_B,\; \Phi_{i} = \Phi_B</math>.
::<math>W_{i} = W_B,\; \Phi_{i} = \Phi_B</math>.
|Die neutralen Fasern der Balken-Sektionen - also auch von ''AB'' - sind undehnbar. Die Punkte ''B'' und ''C'' können sich also nur in vertikale Richtung jeweils um ''W<sub>B</sub>'' verschieben.  Durch diese Starrkörper-Verschiebung wird keine Arbeit geleistet - das tun nur die Lateral-Verschiebungen in ''w<sub>2</sub>(x<sub>2</sub>)''.
</td>
<td style="width:50%; vertical-align:top">
Die neutralen Fasern der Balken-Sektionen - also auch von ''AB'' - sind undehnbar. Die Punkte ''B'' und ''C'' können sich also nur in vertikale Richtung jeweils um ''W<sub>B</sub>'' verschieben.  Durch diese Starrkörper-Verschiebung wird keine Arbeit geleistet - das tun nur die Lateral-Verschiebungen in ''w<sub>2</sub>(x<sub>2</sub>)''.


Es ist also
Es ist also


<math>W_{i-1} =0,\;W_{i}=0.</math>
::<math>W_{i-1} =0,\;W_{i}=0.</math>


Es bleiben also die Verdrehungen in ''B'' und ''C'' zu
Es bleiben also die Verdrehungen in ''B'' und ''C'' zu


<math>\Phi_{i-1} = \Phi_B,\; \Phi_{i} = \Phi_C</math>
::<math>\Phi_{i-1} = \Phi_B,\; \Phi_{i} = \Phi_C</math>
|}
</td></tr>
</table>
 
[[Datei:FEB2-12.png|mini|Übertragung der Koordinaten.|alternativtext=|links]]Die verbleibenden Koordinaten des Gesamtsystems sind
[[Datei:FEB2-12.png|mini|Übertragung der Koordinaten.|alternativtext=|links]]Die verbleibenden Koordinaten des Gesamtsystems sind


<math>\underline{Q} = \left(\begin{array}{l}W_B\\\Phi_B\\\Phi_C\end{array}\right)</math>
::<math>\underline{Q} = \left(\begin{array}{l}W_B\\\Phi_B\\\Phi_C\end{array}\right)</math>


Das verformte System sieht dann so aus:[[Datei:FEB2-11.png|mini|245x245px|Verformte Lage.|alternativtext=]]{{MyCodeBlock|title=Coordinates
Das verformte System sieht dann so aus:[[Datei:FEB2-11.png|mini|245x245px|Verformte Lage.|alternativtext=]]
|text=Text
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
1+1
/* coordinates */
Q : [W[B], Phi[B],Phi[C]];
 
K[1] : submatrix(1,2,Ki(  a),1,2);
K[2] : submatrix(1,3,Ki(2*a),1,3);
</syntaxhighlight>
</syntaxhighlight>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
{{MyCodeBlock|title=Assembly of System Matrices
|text=
Wir bauen das Gleichungssystem
Wir bauen das Gleichungssystem


<math>\underline{\underline{K}}\cdot\underline{Q} = \underline{P}</math>
::<math>\underline{\underline{K}}\cdot\underline{Q} = \underline{P}</math>


zusammen, indem wir die Anteile der Element-Steifigkeitsmatrizen und die äußeren Lasten in die jeweiligen System Matrizen hineinaddieren.
zusammen, indem wir die Anteile der Element-Steifigkeitsmatrizen und die äußeren Lasten in die jeweiligen System Matrizen hineinaddieren.
Zeile 85: Zeile 131:
Die virtuelle Formänderungsenergie ist
Die virtuelle Formänderungsenergie ist


* für Sektion ''AB'':
<ul>
<math>\delta\Pi_{AB} = \left(\delta W_B, \delta\Phi_B \right) \cdot \begin{pmatrix}\displaystyle\frac{12\cdot \mathit{EI}}{{{a}^{3}}} &\displaystyle -\frac{6\cdot \mathit{EI}}{{{a}^{2}}}\\ \displaystyle -\frac{6\cdot \mathit{EI}}{{{a}^{2}}} & \displaystyle\frac{4\cdot \mathit{EI}}{a}\end{pmatrix} \cdot \left(\begin{array}{l}W_B\\\Phi_B\end{array}\right)</math> und
<li>für Sektion ''AB'':<br/>
* für Section ''BC'':
<math>\delta\Pi_{AB} = \left(\delta W_B, \delta\Phi_B \right) \cdot \begin{pmatrix}\displaystyle\frac{12\cdot \mathit{EI}}{{{a}^{3}}} &\displaystyle -\frac{6\cdot \mathit{EI}}{{{a}^{2}}}\\ \displaystyle -\frac{6\cdot \mathit{EI}}{{{a}^{2}}} & \displaystyle\frac{4\cdot \mathit{EI}}{a}\end{pmatrix} \cdot \left(\begin{array}{l}W_B\\\Phi_B\end{array}\right)</math> und</li>
<math>\delta\Pi_{BC} = \left(\delta\Phi_B, \delta\Phi_C \right) \cdot \begin{pmatrix}\displaystyle \frac{2\cdot \mathit{EI}}{a} & \displaystyle \frac{\mathit{EI}}{a}\\ \displaystyle \frac{\mathit{EI}}{a} & \displaystyle \frac{2\cdot \mathit{EI}}{a}\end{pmatrix} \cdot \left(\begin{array}{l}\Phi_B\\\Phi_C\end{array}\right)</math>
<li>für Section ''BC'':<br/>
<math>\delta\Pi_{BC} = \left(\delta\Phi_B, \delta\Phi_C \right) \cdot \begin{pmatrix}\displaystyle \frac{2\cdot \mathit{EI}}{a} & \displaystyle \frac{\mathit{EI}}{a}\\ \displaystyle \frac{\mathit{EI}}{a} & \displaystyle \frac{2\cdot \mathit{EI}}{a}\end{pmatrix} \cdot \left(\begin{array}{l}\Phi_B\\\Phi_C\end{array}\right)</math>.</li>
</ul>


Die Gesamt-Steifigkeitsmatrix aus Sektion AB (rot) und Sektion 2 (grün) ist damit
Die Gesamt-Steifigkeitsmatrix aus <span style="color:#800000">Sektion AB (rot)</span> und <span style="color:#008000">Sektion 2 (grün)</span> ist damit


<math>\displaystyle \underline{\underline{K}} = \frac{E\,I}{a^3} \cdot
::<math>\displaystyle \underline{\underline{K}} = \frac{E\,I}{a^3} \cdot
\left(\begin{array}{ccc}
\left(\begin{array}{ccc}
{\color{red}{+12}}&{\color{red}{-6 a}}&0\\
{\color{red}{+12}}&{\color{red}{-6 a}}&0\\
Zeile 101: Zeile 149:
Die Spaltenmatrix der eingeprägten, äußeren Lasten auf das System kommt aus
Die Spaltenmatrix der eingeprägten, äußeren Lasten auf das System kommt aus


<math>\delta W^a = - F \cdot \delta W_B + M \cdot \delta \Phi_B </math>
::<math>\delta W^a = - F \cdot \delta W_B + M \cdot \delta \Phi_B </math>


zu
zu


<math>\displaystyle \underline{P} = \left(\begin{array}{r}-F\\M\\0\end{array}\right)</math>.{{MyCodeBlock|title=Assembly of System Matrices
::<math>\displaystyle \underline{P} = \left(\begin{array}{r}-F\\M\\0\end{array}\right)</math>.
|text=Text
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
1+1
 
/* system stiffness matrix K and system load matrix P */
K[0] : zeromatrix(3,3);
 
/* assembel */
for row:1 thru 2 do
  for col:1 thru 2 do
    (K[0][row  ,col  ] : K[0][row  ,col  ] + K[1][row,col],
      K[0][row+1,col+1] : K[0][row+1,col+1] + K[2][row,col]);
 
P : matrix([-F],[M],[0]);
</syntaxhighlight>
</syntaxhighlight>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
Die Lösung des linearen Gleichungssystems lievert
{{MyCodeBlock|title=Solving
|text=
Die Lösung des linearen Gleichungssystems liefert


<math>\begin{pmatrix}{{W}_{B}}\\ {{\Phi}_{B}}\\ {{\Phi}_{C}}\end{pmatrix}=\begin{pmatrix}\frac{12\cdot {{a}^{2}}\cdot M-11\cdot {{a}^{3}}\cdot F}{60\cdot \mathit{EI}}\\ \frac{2\cdot a\cdot M-{{a}^{2}}\cdot F}{5\cdot \mathit{EI}}\\ -\frac{2\cdot a\cdot M-{{a}^{2}}\cdot F}{10\cdot \mathit{EI}}\end{pmatrix}</math>{{MyCodeBlock|title=Solving
::<math>\begin{pmatrix}{{W}_{B}}\\ {{\Phi}_{B}}\\ {{\Phi}_{C}}\end{pmatrix}=\begin{pmatrix}\displaystyle \frac{12\cdot {{a}^{2}}\cdot M-11\cdot {{a}^{3}}\cdot F}{60\cdot \mathit{EI}}\\\displaystyle  \frac{2\cdot a\cdot M-{{a}^{2}}\cdot F}{5\cdot \mathit{EI}}\\\displaystyle  -\frac{2\cdot a\cdot M-{{a}^{2}}\cdot F}{10\cdot \mathit{EI}}\end{pmatrix}</math>
|text=Text
|code=
|code=
<syntaxhighlight lang="lisp" line start=1>
<syntaxhighlight lang="lisp" line start=1>
1+1
/* solve by LU-factorisation */
sol: ratsimp(linsolve_by_lu(K[0],P)[1]);
print(transpose(Q)=sol);
</syntaxhighlight>
</syntaxhighlight>
}}
}}
<!-------------------------------------------------------------------------------->
<!-------------------------------------------------------------------------------->
{{MyCodeBlock|title=Post/Processing
|text=
Solange
Solange


<math>\displaystyle M > \frac{11\cdot a\cdot F}{12}</math>
::<math>\displaystyle M > \frac{11\cdot a\cdot F}{12}</math>


sieht das System im ausgelenkten Zustand so aus:[[Datei:FEB2-21.png|mini|327x327px|Lage des verformten Systems.]]{{MyCodeBlock|title=Post/Processing
sieht das System im ausgelenkten Zustand so aus:[[Datei:FEB2-21.png|mini|327x327px|Lage des verformten Systems.]]
|text=Text
|code=NONE
|code=
<syntaxhighlight lang="lisp" line start=1>
1+1
</syntaxhighlight>
}}
}}



Aktuelle Version vom 20. Dezember 2022, 11:03 Uhr


Aufgabenstellung

Die zwei Euler-Bernoulli-Balken AB (Länge a) und BC (Länge 2a) sind in B fest verschweißt. Ihre Biegesteifigkeit ist EI. Die Konstruktion ist in A fest eingespannt und in C durch ein verschiebliches Gelenklager gelagert. In B ist sie durch die Kraft F und das Moment M belastet.


Lageplan

Gesucht ist die Verschiebungen und Verdrehungen der Balken mit der Methode der Finiten ELemente.

Gegeben: a, E I, F, M

Lösung mit Maxima

Berechnet werden sollten daf[r die Auslenkungen und Verdrehung der Punkte A, B und C. Das Modell soll aus zwei Finiten Elementen bestehen, jeweils eins für den Abschnitt AB und BC. Die neutralen Fasern der beiden Balken seien in Längsrichtung undehnbar – die Querschnitts-Schwerpunkte verschieben sich also nicht in Balken-Längsrichtung.

Header

Hier müssen die Element-Steifigkeitsmatrizen für zwei Sektionen von Euler-Bernoulli-Balken zusammengefügt (assembliert) werden. Die Schwierigkeit liegt darin, die Koordinaten in Punkt B passend zu wählen.


/*******************************************************/
/* MAXIMA script                                       */
/* version: wxMaxima 16.04.2                           */
/* author: Andreas Baumgart                            */
/* last updated: 2018-02-13                            */
/* ref: TM-C                                           */
/* description: FEM-solution for two rgidly connected  */
/*              sections                               */
/*******************************************************/

/*******************************************************/
/* MAXIMA script                                       */
/* version: wxMaxima 16.04.2                           */
/* author: Andreas Baumgart                            */
/* last updated: 2018-02-13                            */
/* ref: TM-C                                           */
/* description: FEM-solution for two rigidly connected */
/*              sections                               */
/*******************************************************/



Declarations

Die Element-Steifigkeitsmatrix kopieren wir aus Abschnitt FEM-Formulierung für den Euler-Bernoulli-Balken zu:

.

Die Element-Längen der zwei Finiten Elemente sind hier

.

/***************************************************/
/* FEM-Formulierung+für+den+Euler-Bernoulli-Balken */ 
/*Trial-Fucntions*/
phi : [       (xi-1)^2*(2*xi+1),
         l[i]* xi     *(  xi-1)^2,
        -      xi^2   *(2*xi-3),
         l[i]* xi^2   *(  xi-1)];
 
Ki(l):= (EI/l^3)*matrix([ 12, 6*l  ,-12  , 6*l  ],
                        [6*l, 4*l^2, -6*l, 2*l^2],
                        [-12,-6*l  , 12  ,-6*l  ],
                        [6*l, 2*l^2, -6*l, 4*l^2]);
/***************************************************/



Coordinates

Zunächst hat das System mit zwei Finiten Elementen jeweils 4 Koordinaten, nämlich

.
Sektion A-B Sektion B-C
Die Sektion ist in A fest eingespannt, also ist hier

Es bleiben die Verschiebung und Verdrehung in B, also

.

Die neutralen Fasern der Balken-Sektionen - also auch von AB - sind undehnbar. Die Punkte B und C können sich also nur in vertikale Richtung jeweils um WB verschieben.  Durch diese Starrkörper-Verschiebung wird keine Arbeit geleistet - das tun nur die Lateral-Verschiebungen in w2(x2).

Es ist also

Es bleiben also die Verdrehungen in B und C zu

Übertragung der Koordinaten.

Die verbleibenden Koordinaten des Gesamtsystems sind

Das verformte System sieht dann so aus:

Verformte Lage.

/* coordinates */
Q : [W[B], Phi[B],Phi[C]];

K[1] : submatrix(1,2,Ki(  a),1,2);
K[2] : submatrix(1,3,Ki(2*a),1,3);



Assembly of System Matrices

Wir bauen das Gleichungssystem

zusammen, indem wir die Anteile der Element-Steifigkeitsmatrizen und die äußeren Lasten in die jeweiligen System Matrizen hineinaddieren.

Die virtuelle Formänderungsenergie ist

  • für Sektion AB:
    und
  • für Section BC:
    .

Die Gesamt-Steifigkeitsmatrix aus Sektion AB (rot) und Sektion 2 (grün) ist damit

,

Die Spaltenmatrix der eingeprägten, äußeren Lasten auf das System kommt aus

zu

.

/* system stiffness matrix K and system load matrix P */
K[0] : zeromatrix(3,3);

/* assembel */
for row:1 thru 2 do
   for col:1 thru 2 do
     (K[0][row  ,col  ] : K[0][row  ,col  ] + K[1][row,col],
      K[0][row+1,col+1] : K[0][row+1,col+1] + K[2][row,col]);

P : matrix([-F],[M],[0]);



Solving

Die Lösung des linearen Gleichungssystems liefert


/* solve by LU-factorisation */
sol: ratsimp(linsolve_by_lu(K[0],P)[1]);
print(transpose(Q)=sol);



Post/Processing

Solange

sieht das System im ausgelenkten Zustand so aus:

Lage des verformten Systems.


NONE




Links

  • ...

Literature

  • ...