Gelöste Aufgaben/FEB1

Aus numpedia
Zur Navigation springen Zur Suche springen


Aufgabenstellung

Auch wenn es nicht so aussieht: für das rotierende Rotorblatt suchen wir eine statische Lösung - das Problem heißt "quasistatisch".


Lageplan

Ein Hubschrauber-Rotor dreht mir der konstanten Winknelgeschwindigkeit Ω. Das Rotor-Blatt ist aus Aluminium. Gesucht ist die FEM-Lösung für der Verschiebung der Querschnitte und die Dehnung der Querschnitte.


Lösung mit Maxima

Declarations

Für die Komposition der Bewegungsgleichungen brauchen wir die Element-Steifigkeitsmatrix und die Element-Lastmatrix.

Wir gehen von gleichlangen Elementen aus, hier von

Elementen, also

.

Wie im Abschnitt "Finite Elemente Methode" verwenden wir die linearen Ansatzfunktionen

,

also

.

Die Element-Steifigkeitsmatrix ergibt sich für den Dehnstab zu

.

Die Element-Lastmatrix ist etwas schwieriger. Für ein einzelnes Element i ist

.

Mit

schreiben die Beziehung um zu

,

wir erhalten

.

/*******************************************************/
/* start: FEM solution */
/* Trial-Fucntions */
phi : [(1-xi), xi];

/* declare System Matrices */
K[i] : funmake('matrix, E*A*l[i]*
          makelist(
             makelist(
	        integrate(diff(phi[j],xi)/l[i] *
                          diff(phi[k],xi)/l[i], xi,0,1),
		          j,1,2),k,1,2));
P[i] : funmake('matrix, rho*A*Omega^2*l[i]^2*
             makelist(
	        integrate([(n+xi)*phi[j]], xi,0,1),
		          j,1,2));

/* number of elements */
I : 4;




Equlibrium Conditions

Die Gleichgewichtsbeziehungen des Gesamtsystems erhalten wir durch aus der Addition aller virtuellen Arbeiten des Systems, praktisch durch das Hinzuaddieren der Anteile je Element in die System-Matrizen für K und P:

und


1+1



tmp

Die geometrische Randbedingung U0 = 0 arbeiten wir ein, indem wir die erste Zeile des Gleichungssystem streichen sowie die erste Spalte der Steifigketsmatrix.===Boundary Conditions=== Text


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

/* compose system matrices */
for e : 1 thru I do
   for row : 1 thru 2 do
     (P[0][e-1+row][   1   ] : P[0][e-1+row][   1   ]+subst([n=e-1],P[i][row][ 1 ]),
      for col : 1 thru 2 do
         K[0][e-1+row][e-1+col] : K[0][e-1+row][e-1+col]+              K[i][row][col]);



tmp

Die Lösung des linearen Gleichungssystems

ist

.

Oder - in dimensionsloser Form

.===Solving=== Text


1+1



tmp

Auslenkung u(x).

Die Ergebnisse der FE-Rechnung und der analytischen Lösung können wir jetzt übereinander auftragen:

Die Dehnungen (und Spannungen) im Bauteil sind

.

Auch dieses Ergebnis können wir auftragen:

Dehnung ε(x).

===Post-Processing===

Konstante Dehnung je Element:
Was ausschaut wie ein Fehler - nämlich die "Treppenfunktion" für die Dehnung im FE-Modell - ist in Wirklichkeit die Folge unserer linearen Ansatzfunktionen. Diese abgeleitet liefern eine konstante Dehnung je Element.

1+1




Links

  • ...

Literature

  • ...