{ "cells": [ { "cell_type": "markdown", "metadata": {}, "source": [ "````{grid} 2\n", "```{grid-item-card}\n", ":class-header: bg-light\n", "Voraussetzungen\n", "^^^\n", "- mathematische Grundlagen von PDEs und der Linienmethode\n", "- Kenntnis des expliziten Euler-Verfahrens und des Crank-Nicolson-Verfahrens\n", "- Partielle Differentialgleichungen mit Randbedingungen\n", "```\n", "```{grid-item-card}\n", ":class-header: bg-light\n", "Lerninhalte\n", "^^^\n", "- Umsetzung der Verfahrensvorschriften zur Umsetzung der Linienmethode\n", "- Einschätzung der Auswirkungen numerischer Ungenauigkeiten\n", "```\n", "````\n" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "(conv_diff_pde)=\n", "# Konvektion und Diffusion\n", "\n", "```{image} https://upload.wikimedia.org/wikipedia/commons/thumb/e/ea/Aedes_Albopictus.jpg/512px-Aedes_Albopictus.jpg\n", ":alt: Aedes Albopictus\n", ":width: 512px\n", ":align: center\n", "```\n", "
Abbildung 1: \"Aedes Albopictus\", James Gathany/CDC, [Public domain] via Wikimedia Commons

\n", "\n", "Wir wollen simulieren, wie sich ein Insektengift in einer Blutbahn ausbreitet. Zum einen wird sich durch ein Diffusionsprozess das Insektengift mit dem Blut vermischen. Zum anderen wird es mit der Fließgeschwindigkeit des Blutes transportiert *(Konvektion)*. Es ergibt sich ein sogenannter Konvektions-Diffusionsprozess. $\\rho(t,x)$ sei die Konzentration des Insektengiftes entlang der Blutbahn.\n", "\n", "Die Kontinuitätsgleichung in einer Dimension lautet\n", "\n", "$$\n", "0 = \\frac{\\partial \\rho}{\\partial t} + \\frac{\\partial}{\\partial x} J\n", "$$\n", "\n", "mit einem Massestrom $J$. Dieser besteht aus einem Diffusionsterm $-a \\frac{\\partial \\rho}{\\partial x}$ der den Konzentrationsgradienten des Insektengiftes ausgleicht, sowie einem Geschwindigkeitsterm $c\\rho$, \n", "\n", "$$\n", "J = -a \\frac{\\partial \\rho}{\\partial x} + c(t) \\rho,\n", "$$\n", "\n", "wobei $c(t)$ die Fließgeschwindigkeit des Blutes zum Zeitpunkt $t$ bezeichnet. Als Vereinfachung gehen wir von einer zeitlich konstanten Fließgeschwindigkeit $c(t)=c=\\text{const}$ aus. Es sollte nicht allzu schwer sein, das Modell zu einem späteren Zeitpunkt durch eine pulsierende Fließgeschwindigkeit zu erweitern.\n", "\n", "Setzen wir den Massestrom in die Kontinuitätsgleichung ein, erhalten wir die Konvektions-Diffusionsgleichung\n", "\n", "```{math}\n", ":label: convection-diffusion\n", "\\frac{\\partial \\rho}{\\partial t} + c \\frac{\\partial \\rho}{\\partial x} = a \\frac{\\partial^2 \\rho}{\\partial x^2}\n", "```" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "## Aufgabe 1: Vorarbeit mit Papier und Bleistift\n", "\n", "Führen Sie eine Diskretisierung des Problems durch *(örtlich und zeitlich)*, um eine Vorschrift zur numerischen Lösung der Gleichung zu ermitteln. Gehen Sie von zeitlich konstanten Dirichlet-Randbedingungen aus. Verwenden Sie für die örtlichen Ableitungen zentrale Differenzenquotienten und für die zeitliche\n", "\n", "1. das explizite Euler-Verfahren (Untersumme)\n", "2. das Crank-Nicolson-Verfahren (Trapez-Regel)\n", "\n", "Gehen Sie wie folgt vor:\n", "\n", "1. Diskretisieren Sie zunächst im Ort, so dass Sie $N$ neue Funktionen $y_i(t) \\approx \\rho(x_i, t), i=1,...,N$ erhalten. Hierbei bezeichnet $N$ die Anzahl der Diskretisierungspunkte und $x_i$ bezeichnet den $i$-ten Diskretisierungspunkt Ihres Intervals.\n", "\n", "2. Schreiben Sie die approximierte Lösung $y_i(t_j)$ der inneren Punkte $i=2,...,N-1$ in einen Vektor\n", "\n", " $$\n", " \\mathbf{y}^{(j)} = \n", " \\begin{bmatrix}\n", " y_2(t_j) \\\\ \\vdots \\\\ y_{N-1}(t_j)\n", " \\end{bmatrix}\n", " = \n", " \\begin{bmatrix}\n", " y_2^{(j)} \\\\ \\vdots \\\\ y_{N-1}^{(j)}\n", " \\end{bmatrix}\n", " $$\n", " \n", "3. Bringen Sie die Ortsableitungen der DGL auf die rechte Seite, ersetzen Sie die partiellen Ortsableitungen durch Differenzenquotienten, so dass Sie für die inneren Punkte Folgendes schreiben können:\n", "\n", " $$\n", " \\frac{\\partial \\mathbf{y}(t_j)}{\\partial t} = A \\cdot \\mathbf{y}^{j} + \\mathbf{b}.\n", " $$\n", " \n", " Dabei ergeben sich $A \\in \\mathbb{R}^{N-1 \\times N-1}$ und $\\mathbf{b} \\in \\mathbb{R}^{N-1}$ aus den verwendeten Differenzenquotienten sowie den Randwerten $\\rho(x_0, t) = \\rho_a, \\rho(x_N, t) = \\rho_b$.\n", " \n", "4. Diskretisieren Sie nun in der Zeit, indem Sie eine Vorschrift\n", "\n", " $$\n", " \\mathbf{y}^{(j)} = \\mathbf{y}^{(j-1)} + \\Delta t \\phi(\\mathbf{y}^{(j)}, \\mathbf{y}^{(j-1)})\n", " $$\n", " \n", " finden. Je nachdem ob Sie das explizite Euler-Verfahren oder das Crank-Nicolson-Verfahren verwenden, erhalten Sie eine anderen Gestalt für $\\phi$." ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "## Aufgabe 2: Programmierung\n", "\n", "Schreiben Sie ein Matlab-Programm, das die Gleichung {eq}`convection-diffusion` für ein beliebiges Zeitinterval $[t_0, t_1]$ und Ortsintervall $[x_0, x_1]$ mit zeitlich konstanten Dirichlet-Randbedingungen $\\rho(x_0, t) = \\rho_a, \\rho(x_N, t) = \\rho_b$ löst. Implementieren Sie sowohl das explizite Euler-Verfahren als auch das Crank-Nicolson-Verfahren.\n", "\n", "Visualisieren Sie die Lösung mit Hilfe einer Animation. Unten sehen Sie eine Beispiellösung.\n", "\n", "```{admonition} Achtung\n", ":class: warning\n", "Beachten Sie bei der Wahl der Diskretisierung die [Courant-Friedrichs-Lewy-Zahl](https://de.wikipedia.org/wiki/CFL-Zahl).\n", "```\n", "\n", "## Aufgabe 3: CFL Grenzwert\n", "\n", "Prüfen Sie, für welche CFL-Zahl das explizite Euler-Verfahren nicht mehr funktioniert. Stellen Sie durch Ausprobieren auf 2 Nachkommastellen fest, wo der Grenzwert ist. Der Wert liegt vermutlich zwischen 0.1 und 1. Stellen Sie Ihren Code so ein, dass die CFL-Zahl direkt von Ihnen - auf einen klein genugen Wert - festgelegt werden kann." ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "## Aufgabe 4: Zeitabhängige Fließgeschwindigkeit $c(t)$\n", "\n", "Erweitern Sie Ihr Programm, so dass die Nutzenden eine zeitabhängige (z.B. pulsierende) Fließgeschwindigkeit $c(t)$ vorgeben können. Passen Sie gegebenenfalls die Schrittweite an, um die CFL-Zahl einzuhalten.\n", "\n", "Ihre Lösungen können beispielsweise für das Parameterset\n", "- $a = 1 \\,\\frac{\\text{m}^2}{\\text{s}}$\n", "- $c_\\text{const} = 5 \\,\\frac{\\text{m}}{\\text{s}}$\n", "- $c_\\text{dynamic} = (5 + 5\\cdot\\sin(4\\pi \\,t/\\text{s})) \\,\\frac{\\text{m}}{\\text{s}}$\n", "- $t \\in [0, 1 \\,\\text{s}]$\n", "- $x \\in [0, 10 \\,\\text{m}]$\n", "- $dx = 0.05 \\,\\text{m}$\n", "- $dt = 1e-4 \\,\\text{s}$\n", "- $\\rho_a = \\rho_b = 0 \\,\\frac{1}{\\text{m}^3}$\n", "- $\\rho(x,0) = \\rho_0(x) = 1 \\,\\frac{1}{\\text{m}^3} \\,\\forall\\, x \\in [0.2\\,\\text{m},0.4\\,\\text{m}]$\n", "so aussehen (nur jeder 50. Zeitschritt wurde ausgegeben):\n", "\n", "```{image} images/blood_animated_cos4pit.gif\n", ":alt: \"blood_animated_cos4pit\"\n", ":width: 800px\n", ":align: center\n", "```\n", "
Abbildung 2: Gegenüberstellung der Lösungen mit explizitem Euler-Verfahren und Crank-Nicolson-Verfahren. Verlauf der Dichte eines diffundierenden Fluids in einem sich bewegenden Fluid. Blau: Konstante Geschwindigkeit. Orange: pulsierende Geschwindigkeit.

\n", "\n", "\n", "```{admonition} Hinweis\n", "Die Parameter sind so gewählt, dass die physikalischen Effekte in der graphischen Ausgabe wahrnehmbar sind. Realistischer wären Parameter wie $c = 22.88 + 1.58\\cdot\\sin(2\\cdot\\pi \\,t/\\text{s}) \\,\\frac{\\text{cm}}{\\text{s}}$ (vgl. {cite}`Mohammadkarim2017`), $a$ in der Größenordnung $10^{-9}$ (vgl. [Wikipedia](https://de.wikipedia.org/wiki/Diffusionskoeffizient)), Strecken in der Größenordnung $\\text{cm}$ und ein Puls von 60-80, statt wie hier 120. \n", "```\n", "\n", "## Zusatzaufgabe: Vermeidung numerischer Oszillationen\n", "\n", "Für $a \\ll 1$ (hier $a=0.01$) hängen sich unabhängig von der Lösungsmethode hinter dem \"Hauptstrom\" Oszillationen an:\n", "\n", "```{image} images/blood_animated_a001.gif\n", ":alt: \"blood_animated_a001\"\n", ":width: 800px\n", ":align: center\n", "```\n", "
Abbildung 3: Gegenüberstellung der Lösungen mit explizitem Euler-Verfahren und Crank-Nicolson-Verfahren mit numerischen Schwingungen. Verlauf der Dichte eines diffundierenden Fluids in einem sich bewegenden Fluid.

\n", "\n", "Der Ursprung dieser Oszillationen liegt in der Numerik: Die Steilheit der linken Flanke führt dazu, dass die Dichte unter- und später überschätzt wird. Dies lässt sich auch mit einem Differenzenquotienten höherer Ordnung für den Diffusionsanteil nicht lösen. Eine dagegen einfache Abhilfe ist die Verwendung von mehr Ortsschritten (hier $x_n = 500$ statt $100$):\n", "\n", "```{image} images/blood_animated_a001_xn500.gif\n", ":alt: \"blood_animated_a001_xn500\"\n", ":width: 800px\n", ":align: center\n", "```\n", "
Abbildung 4: Gegenüberstellung der Lösungen mit explizitem Euler-Verfahren und Crank-Nicolson-Verfahren mit weniger numerischen Schwingungen durch feinere Auflösung. Verlauf der Dichte eines diffundierenden Fluids in einem sich bewegenden Fluid.

\n", "\n", "```{admonition} Hinweis\n", "Weiterführend können Sie sich über ENO (Essentially Non-Oscillatory) Methoden informieren. Diese sind speziell dafür entwickelt, numerische Oszillationen zu vermeiden. Ein Beispiel für eine ENO Methode finden Sie in dem Kapitel {ref}`traffic_pde`.\n", "```" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "## Literatur\n", "\n", "```{bibliography}\n", ":filter: docname in docnames\n", "```" ] } ], "metadata": { "kernelspec": { "display_name": "Octave", "language": "octave", "name": "octave" }, "language_info": { "file_extension": ".m", "help_links": [ { "text": "GNU Octave", "url": "https://www.gnu.org/software/octave/support.html" }, { "text": "Octave Kernel", "url": "https://github.com/Calysto/octave_kernel" }, { "text": "MetaKernel Magics", "url": "https://metakernel.readthedocs.io/en/latest/source/README.html" } ], "mimetype": "text/x-octave", "name": "octave", "version": "5.2.0" } }, "nbformat": 4, "nbformat_minor": 4 }