Gelöste Aufgaben/FEB4: 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:FEB4-01.png|mini|235x235px|Lageplan]]
[[Datei:FEB4-01.png|left|mini|235x235px|Lageplan]]
Das skizzierte System besteht aus [[Sources/Lexikon/Euler-Bernoulli-Balken|Euler-Bernoulli-Balken]] (jeweils Länge ''a'') der Biegesteifigkeit ''EI''. Die Konstruktion wird in ''A'' durch ein gelenkiges Festlager gehalten und in ''B'' durch die Kraft ''F'' belastet.
Das skizzierte System besteht aus [[Sources/Lexikon/Euler-Bernoulli-Balken|Euler-Bernoulli-Balken]] (jeweils Länge ''a'') der Biegesteifigkeit ''EI''. Die Konstruktion wird in ''A'' durch ein gelenkiges Festlager gehalten und in ''B'' durch die Kraft ''F'' belastet.


Zeile 49: Zeile 49:
}}
}}


==tmp==
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Declarations
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Declarations
|text=
|text=
Zeile 89: Zeile 88:
}}
}}


==tmp==
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Coordinates
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Coordinates
|text=
|text=
Für jedes Finite Element führen wir zuerst das standardisierte lokale ''x/z''-[[Sources/Lexikon/Koordinaten|Koordinatensystem]][[Datei:Link.png|rahmenlos]] ein. Und wir definieren neue, anschauliche - globale - Koordinaten des Systems, um sie von den Standard-Koordinaten ''W<sub>i</sub> , Φ<sub>i</sub>'' unterscheiden zu können:
Für jedes Finite Element führen wir zuerst das standardisierte lokale ''x/z''-[[Sources/Lexikon/Koordinaten|Koordinatensystem]][[Datei:Link.png|rahmenlos]] ein. Und wir definieren neue, anschauliche - globale - Koordinaten des Systems, um sie von den Standard-Koordinaten ''W<sub>i</sub> , Φ<sub>i</sub>'' unterscheiden zu können:


<table class="wikitable">
<table style="background-color:#FFFFFF;" class="wikitable">
<tr><th>Lokale Orts-Koordinaten ''x<sub>i</sub>, z<sub>i</sub>''</th><th>Globale Knoten-Koordinaten ''U<sub>i</sub>, Ψ<sub>i</sub>''</th></tr>
<tr><th>Lokale Orts-Koordinaten ''x<sub>i</sub>, z<sub>i</sub>''</th><th>Globale Knoten-Koordinaten ''U<sub>i</sub>, Ψ<sub>i</sub>''</th></tr>
<tr><td>[[Datei:FEB4-14.png|alternativtext=|rahmenlos|336x336px]]</td>
<tr><td>[[Datei:FEB4-14.png|alternativtext=|rahmenlos|336x336px]]</td>
Zeile 123: Zeile 121:
Aus den Bildern für die Knoten-Koordinaten oben lesen wir nun die (geometrischen) Rand- und Übergangsbedingungen ab und skizzieren darunter die Einarbeitung dieser Bedingungen in die virtuellen Formänderungsenergien.
Aus den Bildern für die Knoten-Koordinaten oben lesen wir nun die (geometrischen) Rand- und Übergangsbedingungen ab und skizzieren darunter die Einarbeitung dieser Bedingungen in die virtuellen Formänderungsenergien.


<table class="wikitable">
<table style="background-color:#FFFFFF;" class="wikitable">
<tr><th>Element ''I''</th><th>Element ''II''</th><th>Element ''III''</th></tr>
<tr><th>Element ''I''</th><th>Element ''II''</th><th>Element ''III''</th></tr>
<tr><td><math>\begin{array}{lcl}
<tr><td><math>\begin{array}{lcl}
Zeile 149: Zeile 147:
Was noch fehlt ist die Übersetzung der lokalen in die globalen Koordinaten
Was noch fehlt ist die Übersetzung der lokalen in die globalen Koordinaten


<table class="wikitable">
<table style="background-color:#FFFFFF;" class="wikitable">
<tr><th>local</th><th></th><th>global</th></tr>
<tr><th>local</th><th></th><th>global</th></tr>
<tr><td><math>\begin{array}{c}
<tr><td><math>\begin{array}{c}
Zeile 188: Zeile 186:
}}
}}


==tmp==
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Assembly of System Matrices
<!-------------------------------------------------------------------------------->{{MyCodeBlock|title=Assembly of System Matrices
|text=
|text=
Zeile 358: Zeile 355:
'''Literature'''
'''Literature'''
* ...
* ...
g

Aktuelle Version vom 9. März 2021, 11:21 Uhr


Aufgabenstellung

Wie in FEB3 geht es hier um die Ausnutzung von Symmetrien mit einer skalaren Gleichgewichtsformulierung.


Lageplan

Das skizzierte System besteht aus Euler-Bernoulli-Balken (jeweils Länge a) der Biegesteifigkeit EI. Die Konstruktion wird in A durch ein gelenkiges Festlager gehalten und in B durch die Kraft F belastet.

Gesucht ist die Ersatzfeder-Steifigkeit des Systems, das Sie aus Finiten Elementen mit Euler-Bernoulli-Balken zusammensetzen.

Gesucht ist die Auslenkung des Punktes B. Das Modell soll aus wenigen Finiten Elementen bestehen, überlegen Sie, welche Modelle sinnvoll sind. Die neutralen Fasern der Balken seien in Längsrichtung undehnbar – die Querschnitts-Schwerpunkte verschieben sich also nicht in Balken-Längsrichtung.

Gegeben: a, E I, F

Lösung mit Maxima

Header

Für das FE-Modell wollen wir nicht alle Sektionen der Feder modellieren - wir schneiden die Feder entlang ihrer Längsachse durch und nehmen eins der so entstandenen Elemente exemplarisch heraus.

Federelement.

Von diesen Elementen haben wir fünf in der Feder - die Längung dieses Elements der Feder entspricht also 1/5 der Feder-Längung in B.

Im Schnitt der horizontalen Sektionen mit der Längsachse der Feder ist das Schnittmoment jeweils Null - wir dürfen uns also an den Rändern unseres Sub-Systems ein Gelenk "denken" und mit dem hier gezeichneten System arbeiten.

Aber Achtung: so wie gezeichnet ist es statisch unbestimmt: wir können im Gleichgewicht beliebige Verschiebungen des Systems in Feder-Längsrichtung angeben.

Geht's noch einfacher?:
* Wie müsste ein System aussehen, das noch einfacher gestrickt ist?
  • Welche neuen Randbedingungen ergeben sich?

/*******************************************************/
/* MAXIMA script                                       */
/* version: wxMaxima 16.04.2                           */
/* author: Andreas Baumgart                            */
/* last updated: 2020-01-10                            */
/* ref: TM-C                                           */
/* description: FEM-solution for spring section        */
/*******************************************************/




Declarations

Wir haben also ein Ersatz-System mit drei Finiten Elementen und vier Knoten:

Knoten und Stäbe.

Die Knoten 0 und 3 entstehen in unserem Ersatz-System, weil hier das Biegemoment in den horizontalen Sektionen (I und III) Null ist. Diese beiden Sektionen sind nur a/2 lang, die vertikale Sektion ist a lang.

Damit das System in Längsrichtung festgelegt ist, führen wir in Knoten "0" ein gelenkiges Festlager ein - die Verschiebung in Knoten "3" ist dann die Auslenkung von Knoten "3" relativ zu Knoten "0".

Dementsprechnd haben die drei Finiten Elementen die Längen

.

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

.

/*******************************************************/
/* coordinates and boundary conditions                 */
 l   : [a/2,a,a/2];
norm : ŵ = F*a^3/(3*EI) * 5;

 X : append(makelist(Q[i]= [W[i-1], Φ[i-1], W[i], Φ[i]],i,1,3),[Q[0]= [U[1], Ψ[1], Ψ[2], U[3]]]);
δX : subst([Q=δQ,W=δW,Φ=δΦ],X);

/* boundary conditions */
kinematics: [[W[0]=  0  ,        δW[0]=  0           ],
             [W[1]=  0  , W[2]=0,δW[1]=  0   ,δW[2]=0],
             [W[2]=-W[1],        δW[2]=-δW[1]        ]];




Coordinates

Für jedes Finite Element führen wir zuerst das standardisierte lokale x/z-Koordinatensystem ein. Und wir definieren neue, anschauliche - globale - Koordinaten des Systems, um sie von den Standard-Koordinaten Wi , Φi unterscheiden zu können:

Lokale Orts-Koordinaten xi, ziGlobale Knoten-Koordinaten Ui, Ψi

Wir haben also je Element die eingezeichneten globalen Knoten-Koordinaten

sowie die lokalen FE-Koordinaten  

.

die wir miteinander "verheiraten" müssen. Das machen wir beim Komponieren des Gesamt-Gleichungssystems.

Die virtuelle Formänderungsenergie eines Finiten Elements ist nun

,

mit

.

Die virtuelle Arbeit der Kraft ist dabei

Aus den Bildern für die Knoten-Koordinaten oben lesen wir nun die (geometrischen) Rand- und Übergangsbedingungen ab und skizzieren darunter die Einarbeitung dieser Bedingungen in die virtuellen Formänderungsenergien.

Element IElement IIElement III

Dabei sind folgende Koordinaten sind in den drei Elementen gleich oder unterscheiden sich nur durch ein Vorzeichen:

Was noch fehlt ist die Übersetzung der lokalen in die globalen Koordinaten

localglobal


/*******************************************************/
/* coordinates and boundary conditions                 */
 l   : [a/2,a,a/2];
norm : ŵ = F*a^3/(3*EI) * 5;

 X : append(makelist(Q[i]= [W[i-1], Φ[i-1], W[i], Φ[i]],i,1,3),[Q[0]= [U[1], Ψ[1], Ψ[2], U[3]]]);
δX : subst([Q=δQ,W=δW,Φ=δΦ],X);

/* boundary conditions */
kinematics: [[W[0]=  0  ,        δW[0]=  0           ],
             [W[1]=  0  , W[2]=0,δW[1]=  0   ,δW[2]=0],
             [W[2]=-W[1],        δW[2]=-δW[1]        ]];




Assembly of System Matrices

Wir bauen nun das Gleichungssystem

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

Globale Koordinaten

Dafür müssen wir die Koordinaten zwischen lokalen und globalen Koordinaten transformieren, nämlich

.

Die virtuelle Formänderungsenergie ist dann

  • für Sektion I:
  • für Sektion II:
  • für Sektion III:

Die Gesamt-Steifigkeitsmatrix aus Sektion 1 (rot) , Sektion 2 (grün) und Sektion 3 (blau) ist damit

.

Die Spaltenmatrix der eingeprägten, äußeren Lasten auf das System ist dementsprechend

.

/* system stiffness matrix K and system load matrix P */
/* assembly of system matrices                         */
A  : [K[1]=Ki(a/2),K[2]=Ki( a ),K[3]=Ki(a/2), K[0] = zeromatrix(6,6)];

P  : expand(makelist(δΠ[i] = subst(kinematics[i],transpose(subst(δX,δQ[i])).subst(A,K[i]).subst(X,Q[i])),i,1,3));
R  : δW^a = F*δU[3];

/* translate to global coordinates                     */

globals: [ Φ[0] = Ψ[0], δΦ[0] = δΨ[0],
           W[1] = U[1], δW[1] = δU[1],
           Φ[1] = Ψ[1], δΦ[1] = δΨ[1],
           Φ[2] =-Ψ[2], δΦ[2] =-δΨ[2],
           W[3] =-U[3], δW[3] =-δU[3],
           Φ[3] =-Ψ[3], δΦ[3] =-δΨ[3]];

P : sum(subst(globals,P[i]),i,1,3);

Y  : [ Ψ[0],  U[1], Ψ[1], Ψ[2], U[3], Ψ[3]];
δY : [δΨ[0], δU[1],δΨ[1],δΨ[2],δU[3],δΨ[3]];
eom : makelist(coeff(rhs(P)-rhs(R),δY[i])=0,i,1,6);



Solving

Das lineare Gleichungssystem lautet also

Und dessen Lösung ist

.

/* solve .....                                        */
sol: solve(eom,Y)[1];

ACM : augcoefmatrix(eom, Y);
ole : [K[0] = submatrix(ACM,7), p = -col(ACM,7)];
print(subst(ole, K[0]),"*",transpose(Y),"=",subst(ole,p))$




Post-Processing

Verformung des Elements.

Wir normieren die Auslenkung des Systems mit

und plotten das System damit im ausgelenkten Zustand:

Die Auslenkung in Knoten 3 ist gleichzeitig die Längung der insgesamt 5 Sub-Systeme, die Auslenkung des Gesamtsystems in B ist demnach

und die gesuchte Ersatzfedersteifigkeit des Systems ist

.

/* post-processing                                     */

displ: makelist(expand(subst(norm,(subst(sol,subst(globals,subst(kinematics[j],subst(X,Q[j])))).transpose(subst([ℓ[i]=l[j]],phi))/ŵ))),j,1,3);
offset: subst(norm,subst(sol,U[1]/ŵ));

plot2d([[parametric, (1-t)/2,  +subst([xi=t],displ[1]), [t,0,1]],
        [parametric, +subst([xi=t],displ[2]), offset+t, [t,0,1]],
        [parametric, (  t)/2, 1-subst([xi=t],displ[3]), [t,0,1]]],
        [x,-1/2,2/2],[y,-0.1,1.4], [same_xy , true],
        [legend,"I","II","III"])$




Links

  • ...

Literature

  • ...