⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 comparison of an implicite vs_ explicite one-dimensional finite differences program for solving the unsteady heat-flow-equation.mht

📁 一维热传导方程的求解
💻 MHT
📖 第 1 页 / 共 5 页
字号:
From: <由 Windows Internet Explorer 7 保存>
Subject: comparison of an implicite vs. explicite one-dimensional finite differences program for solving the unsteady heat-flow-equation
Date: Sun, 12 Oct 2008 21:02:54 +0800
MIME-Version: 1.0
Content-Type: multipart/related;
	type="text/html";
	boundary="----=_NextPart_000_0000_01C92CAD.E52B3BF0"
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3350

This is a multi-part message in MIME format.

------=_NextPart_000_0000_01C92CAD.E52B3BF0
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Content-Location: http://www.geomath.onlinehome.de/models/implexpl.html

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>comparison of an implicite vs. explicite =
one-dimensional finite differences program for solving the unsteady =
heat-flow-equation</TITLE>
<META http-equiv=3DCONTENT-TYPE content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.6000.16705" name=3DGENERATOR>
<META content=3D"Wolfram R=FChaak" name=3DAUTHOR>
<META content=3D20020528;21442900 name=3DCREATED>
<META content=3D"Wolfram R=FChaak" name=3DCHANGEDBY>
<META content=3D20020528;22351800 name=3DCHANGED>
<STYLE>@page  {size: 21.01cm 29.69cm; }
</STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<H1 align=3Dcenter><FONT face=3D"Helvetica, Arial, sans-serif"=20
color=3D#000000>comparison of an implicit vs. explicit one-dimensional =
finite=20
differences program for solving the unsteady heat-flow-equation =
</FONT></H1>
<P><FONT face=3D"Helvetica, Arial, sans-serif" color=3D#000000>The =
heat-flow=20
equation (without source-term):</FONT></P>
<P><FONT face=3D"Helvetica, Arial, sans-serif" color=3D#000000><IMG =
height=3D46=20
alt=3Dheatflow-equation hspace=3D8=20
src=3D"http://www.geomath.onlinehome.de/models/heatflow-equation.gif" =
width=3D117=20
align=3Dmiddle name=3Dheatflow-equation> </FONT></P>
<P></P>
<P><A =
href=3D"http://www.geomath.onlinehome.de/models/parameter.dat"><FONT=20
face=3D"Helvetica, Arial, sans-serif">The input data-file (identical for =
both=20
programs)</FONT></A></P>
<P><A href=3D"http://www.geomath.onlinehome.de/models/exphfeq.f"><FONT=20
face=3D"Helvetica, Arial, sans-serif">The explicit version (Fortran 77 =
source=20
code)</FONT></A></P>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><A=20
href=3D"http://www.geomath.onlinehome.de/models/implhfeq.f">The implict =
version=20
(Fortran 77 source code)</A></FONT><A=20
href=3D"http://www.geomath.onlinehome.de/models/implhfeq.f"><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT></A></P>
<P></P>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif"><A=20
href=3D"http://www.geomath.onlinehome.de/models/compare.f">A small =
programm for=20
comparison of the results (Fortran 77 source =
code)<BR></A></FONT></FONT></P>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif">The programs calculate the heat =
distribution=20
at a 100m long row in one year, where the row has the following thermal=20
properties:</FONT></FONT><FONT=20
face=3D"Helvetica, Arial, sans-serif"><BR></FONT></P>
<UL>
  <LI><FONT face=3D"Helvetica, Arial, sans-serif">Heat conduction =3D =
1.5 (W/(K=20
  m))</FONT>=20
  <LI><FONT face=3D"Helvetica, Arial, sans-serif">Density * specific =
heat =3D=20
  1,380,000 (J/(m=B3 M))</FONT>=20
  <LI><FONT face=3D"Helvetica, Arial, sans-serif">The time step is in =
both cases 1=20
  hour</FONT>=20
  <LI><FONT face=3D"Helvetica, Arial, sans-serif">Initial temperature =
=3D 283.15=20
  K</FONT>=20
  <LI><FONT face=3D"Helvetica, Arial, sans-serif">Spatial step size 1 =
m</FONT>=20
  <LI><FONT face=3D"Helvetica, Arial, sans-serif">At the first 3 grid =
nodes there=20
  is a Dirichlet border condition with a T of 283.15 + 50 (K)</FONT> =
</LI></UL><PRE></PRE>
<H1><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif">The =
results:</FONT></FONT></H1><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<H2><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif">Explicit</FONT></FONT></H2><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif"><IMG height=3D600 alt=3D"explicit =
solution"=20
src=3D"http://www.geomath.onlinehome.de/models/EXPL.OUT.png" width=3D800 =
align=3Dleft=20
border=3D0 name=3DGrafik1> <BR clear=3Dleft></FONT></FONT></P><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<H2><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif">Implicit</FONT></FONT></H2><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif"><IMG height=3D600 alt=3D"implicite =
solution"=20
src=3D"http://www.geomath.onlinehome.de/models/IMPL.OUT.png" width=3D800 =
align=3Dleft=20
border=3D0 name=3DGrafik2> <BR clear=3Dleft></FONT></FONT></P><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<H2><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif">The =
difference</FONT></FONT></H2><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif">(really small - only at the =
borders there is=20
a bigger difference probably because of a malfunction of the=20
SY-Subroutine):</FONT></FONT></P><FONT=20
face=3D"Helvetica, Arial, sans-serif"></FONT>
<P><FONT face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif"><IMG height=3D600 alt=3Dcomparison =

src=3D"http://www.geomath.onlinehome.de/models/DIFF.OUT.png" width=3D800 =
align=3Dleft=20
border=3D0 name=3DGrafik3> <BR clear=3Dleft></FONT></FONT></P><FONT=20
face=3D"Helvetica, Arial, sans-serif"><FONT=20
face=3D"Helvetica, Arial, sans-serif"><BR></FONT></FONT>
<HR width=3D"100%" SIZE=3D2>

<DIV align=3Dright>Author: <A =
href=3D"mailto:w.ruehaak@online.de">Wolfram=20
R=FChaak</A>, 28. May 2002<BR></DIV><BR><BR><BR></BODY></HTML>

------=_NextPart_000_0000_01C92CAD.E52B3BF0
Content-Type: image/gif
Content-Transfer-Encoding: base64
Content-Location: http://www.geomath.onlinehome.de/models/heatflow-equation.gif

R0lGODlhZwAuAPAAAAAA/wD//yH5BAEAAAIALAAAAABnAC4AhwAAAP////wD+wAAAP///wAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAj/AAUIHEiwoMGDCBMqXMiwocOHECNKnEixosWLGDNq3NgQAACOIEN2FPhRpMmTBUui
XBlSJUaPHlkOhEkRpksBNy2WvGmz58acDncS5NmTZkSXKpP+BApxp1GcM6MeRcj0YkydI4/aPHiV
48eqCn0u7BpUqUGyGr9K7AqWZNuUSLm2dNs07tipQ8++XUv3Ic+xe/NKhQvSblDBYQMPZqrY71DF
Zu+uRev2qUzAb8Ve3sy5s+fPoEP7LUpZtGmTjV+SXr26I+vXW5PCnq0ZLm3WOFtXvk3aNm/Yp4ML
H06ceGmGW4tbJckXqvKMqVNKf950+czoK5Nn1fpUe0XLvpEzYd9ed7Bz684NN84MHjDi898FG8Y7
F/Hx6ubHjwZP875489idlZ9+rg2YW4D6/YVgbn1NBx9X8xk4WU7+udbebv8ZuKBMGzr4YGXUEfiS
hmp1iFphpckW4oostujiizAWFBAAIf8LU1RBUkRJViA1LjAJAasKAADLBAAAADs=

------=_NextPart_000_0000_01C92CAD.E52B3BF0
Content-Type: image/png
Content-Transfer-Encoding: base64
Content-Location: http://www.geomath.onlinehome.de/models/EXPL.OUT.png

iVBORw0KGgoAAAANSUhEUgAAAyAAAAJYCAIAAAAVFBUnAAB35UlEQVR4Ae29Max0zVOfiUSGNiJB
5KuNnFjkiByRW+TIuXFGYDm3HDiznDmwnSOIEREJcr4iRUDmYIXYwPvful/z1lu3+pzuX597ZqZ6
7nN0db/q6l/36X66u6a+mXPn/bVfcUEAAhCAAAQgAAEI3Erg127tjc4gAAEIQAACEIAABH5FgsUm
gAAEIAABCEAAAjcTIMG6GSjdQQACEIAABCAAARIs9gAEIAABCEAAAhC4mQAJ1s1A6Q4CEIAABCAA
AQiQYLEHIAABCEAAAhCAwM0ESLBuBkp3EIAABCAAAQhAgASLPQABCEAAAhCAAARuJkCCdTNQuoMA
BCAAAQhAAAIkWOwBCEAAAhCAAAQgcDMBEqybgdIdBCAAAQhAAAIQIMFiD0AAAhCAAAQgAIGbCZBg
3QyU7iAAAQhAAAIQgAAJFnsAAhCAAAQgAAEI3EyABOtmoHQHAQhAAAIQgAAESLDYAxCAAAQgAAEI
QOBmAiRYNwOlOwhAAAIQgAAEIECCxR6AAAQgAAEIQAACNxMgwboZKN1BAAIQgAAEIAABEiz2AAQg
AAEIQAACELiZAAnWzUDpDgIQgAAEIAABCJBgsQcgAAEIQAACEIDAzQRIsG4GSncQgAAEIAABCECA

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -