Gelöste Aufgaben/W8Zv: Unterschied zwischen den Versionen

Aus numpedia
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
 
(Eine dazwischenliegende Version desselben Benutzers wird nicht angezeigt)
Zeile 9: Zeile 9:
Zu den tabellierten [[Sources/Lexikon/Euler-Bernoulli-Balken/Standard-Lösungen#Einzellast, doppeltgelenkige Lagerung|Standardlösungen für den Euler-Bernoulli-Blaken]] berechnen wir eine Näherungslösung für einen beidseitig gelenkig gelagerten Euler-Bernoulli-Balken:
Zu den tabellierten [[Sources/Lexikon/Euler-Bernoulli-Balken/Standard-Lösungen#Einzellast, doppeltgelenkige Lagerung|Standardlösungen für den Euler-Bernoulli-Blaken]] berechnen wir eine Näherungslösung für einen beidseitig gelenkig gelagerten Euler-Bernoulli-Balken:
<onlyinclude>
<onlyinclude>
[[Datei:W8Zv-01.png|200px|left|mini|Caption]]
[[Datei:W8Zv-01.png|200px|left|mini|Lageplan]]
Hier soll mit dem Ansatz mit der [[Randwertprobleme/Methoden zur Lösung von Randwertproblemen/Finite Elemente Methode|Methode der Finiten Elemente]] gearbeitet werden.
Hier soll mit dem Ansatz mit der [[Randwertprobleme/Methoden zur Lösung von Randwertproblemen/Finite Elemente Methode|Methode der Finiten Elemente]] gearbeitet werden.
Gesucht ist das Verschiebungsfeld ''w(x)'' im Vergleich von FEM und analytischer Lösung.
Gesucht ist das Verschiebungsfeld ''w(x)'' im Vergleich von FEM und analytischer Lösung.
Zeile 214: Zeile 214:
'''Literature'''
'''Literature'''
* ...
* ...
[[Datei:W8Zv-01.png|mini|Lageplan]]

Aktuelle Version vom 19. November 2024, 08:21 Uhr


Aufgabenstellung

Zu den tabellierten Standardlösungen für den Euler-Bernoulli-Blaken berechnen wir eine Näherungslösung für einen beidseitig gelenkig gelagerten Euler-Bernoulli-Balken:

Lageplan

Hier soll mit dem Ansatz mit der Methode der Finiten Elemente gearbeitet werden. Gesucht ist das Verschiebungsfeld w(x) im Vergleich von FEM und analytischer Lösung.

Diese Aufgabe ist eng verwandt mit W8Zt und W8Zu.


Lösung mit Maxima

Mit dem Föppl-Symbol "<>", sowie

α=a/ℓ, β=1−α und ξ=x/ℓ

ist die analytische Lösung:

EIw(x)=Fℓ36[βξ(1−β2−ξ2)+<ξ−α>3].

Bei dieser Lösung hat die unabhängige Koordinate x ihren Ursprung in A - wir verwenden unten einen anderen Ursprung!

Mit den passenden Ansatzfunktionen berechnen wir eine Näherungslösung des Problems nach dem Prinzip der virtuellen Verrückungen.

Header

Bei der Methode der Finiten Elemente setzen wir die virtuelle Formänderungsenergie des Systems additiv aus den Anteilen je Element zusammen. Hier arbeiten wir mit zwei Elementen, die am Kraft-Angriffspunkt aneinander stoßen.

Also ist

δΠ=δΠ1+δΠ2 ,

die virtuelle Arbeit der äußeren Kraft F ist

δWa=F⋅δwF .

/*******************************************************/
/* MAXIMA script                                       */
/* version: wxMaxima 15.08.2                           */
/* author: Andreas Baumgart                            */
/* last updated: 2017-11-21                            */
/* ref: TM-C, Labor 3 - aus Gross, Augf. TM 2,Biegestab*/
/* description: finds the approx. solution employing   */
/*              the FEM-approach                       */
/*******************************************************/




Virtual Strain-Energy per Element

Aus der Finite Elemente Methode kennen wir die virtuelle Formänderungsenergie eines Balkenelements

δΠi=(δWi−1,δΦi−1,δWi,δΦi)⋅K__i⋅(Wi−1Φi−1WiΦi)

für das klassische x-z-Koordinatensystem des Euler-Bernoulli-Balkens und mit der Element-Steifigkeitsmatrix

K__i=EIℓE3⋅(126⋅ℓE−126⋅ℓE6⋅ℓE4⋅ℓE2−6⋅ℓE2⋅ℓE2−12−6⋅ℓE12−6⋅ℓE6⋅ℓE2⋅ℓE2−6⋅ℓE4⋅ℓE2).

/* virtual strain engergy */
K[e] : EI/l[i]^3*matrix([12,6*l[i],-12,6*l[i]],
                        [6*l[i],4*l[i]^2,-6*l[i],2*l[i]^2],
                        [-12,-6*l[i],12,-6*l[i]],
                        [6*l[i],2*l[i]^2,-6*l[i],4*l[i]^2]);




Equilibrium Conditions

Das Gesamt-Gleichungssystem für die Koordinaten

Q_=(W0Φ0W1Φ1W2Φ2)

ist

K__0⋅Q_=P_

mit der 6x6 Matrix K0. In diese Matrix müssen wir jetzt die Element-Steifigkeitsmatrizen für das Element 1 und das Element 2 hineinaddieren, also

K__0=EI⋅(12ℓ136ℓ12−12ℓ136ℓ12006ℓ124ℓ1−6ℓ122ℓ100−12ℓ13−6ℓ1212ℓ23+12ℓ136ℓ22−6ℓ12−12ℓ236ℓ226ℓ122ℓ16ℓ22−6ℓ124ℓ2+4ℓ1−6ℓ222ℓ200−12ℓ23−6ℓ2212ℓ23−6ℓ22006ℓ222ℓ2−6ℓ224ℓ2)

Weil die Auslenkung des Kraft-Angriffspunktes

δwF=δW1

ist

P_=(00F000).

Hier fehlen noch die ...


/* coordinates */
Q: [ W[0],Phi[0], W[1],Phi[1], W[2], Phi[2]];

/* initiate matrices */
K[0] : zeromatrix(6,6);
P    : zeromatrix(6,1);

/* virtual work of F */
P[3][1] : F;

/* compose system matrix */
for E:1 thru 2 do
  (for j:1 thru 4 do
     (for k:1 thru 4 do
         (row : 2*(E-1)+j,
          col : 2*(E-1)+k,
          K[0][row][col] : K[0][row][col]+subst([i=E],K[e][j][k]))));




Boundary Conditions

Einarbeiten der Randbedingungen in die Systemmatrix

Im Gesamt-Gleichungssystem müssen wir noch die Randbedingungen einarbeiten, nämlich

W0=0(δW0=0)W2=0(δW2=0)

Das machen wir durch Streichen der zugehörigen Zeilen und Spalten (1 und 5) im Gleichungssystem.


/* eliminate rows and columns of constrained coordinates */
K[0] : submatrix(1,5,K[0],1,5);
P    : submatrix(1,5,P);
Q    : [Q[2],Q[3],Q[4],Q[6]];

print(EI,expand(K[0]/EI),transpose(Q),"=",P)$




Solve

Die Lösung des verbleibenden Gleichungssystems mit

α=aℓ0,ℓ0=a+b

ist

Φ0⋅EIℓ02⋅F=2⋅α−3⋅α2+α36W1⋅EIℓ03⋅F=α2−2⋅α3+α43Φ1⋅EIℓ02⋅F=α−3⋅α2+2⋅α33Φ2⋅EIℓ02⋅F=α3−α6

Und die Ergebnisse können wir mit der analytischen Lösung vergleichen:


/* solve */
sol[1] : ratsimp(linsolve_by_lu(K[0],P));
sol[1] : ratsimp(subst([l[1]=alpha*l[0],l[2]=(1-alpha)*l[0]],sol[1][1]));

/* dim'less results */
scale : EI/(l[0]^3*F)*[l[0],1,l[0],l[0]];
sol[2] : ratsimp(scale*sol[1]);

/* print results */
print(transpose(scale*Q),"=",sol[2])$




Post-Process: Results

Die Auslenkung des Kraft-Angriffspunktes w(a) tragen wir hier auf:

Absenkung w(a) des Kraftangriffspunktes

Der Vergleich der tabellierten Lösungen mit unseren Lösungen:

Ortanalytische LösungFEM-LösungVergleich
AEI⋅w'A=Fℓ26(β−β3) EIΦ0=Fℓ02⋅2⋅α−3⋅α2+α36 Erfüllt, weil w'A = Φ0 und

β−β3=α3−3⋅α2+2⋅α

BEI⋅w'B=−Fℓ26(α−α3) EIΦ2=Fℓ2⋅α3−α6 Erfüllt, weil w'B = Φ2
KraftangriffspunktEIwmax=Fℓ348 für α=β=1/2 EIW1=Fℓ3⋅α2−2⋅α3+α43 Erfüllt, weil wmax = W1 für α = 1/2
⚠ Ist das jetzt die analytische Lösung?:
Sind die FEM-Ergebnisse nicht exakt die der analytischen Lösung? Stimmt das? Und wenn ja:  wie kommt das?

/* displacement of beam at force F */
plot2d(sol[2][2],[alpha,0,1],[xlabel, "α→"],[ylabel, "W1/(F l^3/EI)→"]);





Links

Literature

  • ...