forked from johannesgerer/jburkardt-f77
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathnetode.html
More file actions
227 lines (198 loc) · 6.24 KB
/
netode.html
File metadata and controls
227 lines (198 loc) · 6.24 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
<html>
<head>
<title>
NETODE - Two-Phase Fluid Network Problem
</title>
</head>
<body bgcolor="#EEEEEE" link="#CC0000" alink="#FF3300" vlink="#000055">
<h1 align = "center">
NETODE <br> Two-Phase Fluid Network Problem
</h1>
<hr>
<p>
<b>NETODE</b>
is a FORTRAN77 program which
computes the time-dependent behavior of a two phase compressible heated fluid
in an abstract system of nodes and links.
</p>
<h3 align = "center">
Related Data and Programs:
</h3>
<p>
<a href = "../../f77_src/channel/channel.html">
CHANNEL</a>,
a FORTRAN77 program which
models the steady state behavior of an incompressible viscous fluid in
a 2D channel region using a finite element formulation of the Navier-Stokes equations.
</p>
<p>
<a href = "../../f77_src/hcell/hcell.html">
HCELL</a>,
a FORTRAN77 program which
models the time-dependent behavior of an incompressible viscous fluid in
a 2D H-shaped region using a finite element formulation of the Navier-Stokes equations.
</p>
<p>
<a href = "../../f77_src/hcell_steady/hcell_steady.html">
HCELL_STEADY</a>,
a FORTRAN77 program which
models the steady state behavior of an incompressible viscous fluid in
a 2D H-shaped region using a finite element formulation of the Navier-Stokes equations.
</p>
<p>
<a href = "../../f77_src/inout/inout.html">
INOUT</a>,
a FORTRAN77 program which
models the time-dependent behavior of an incompressible viscous fluid in
a 2D region with inflow in the bottom right and outflow in the upper left,
using a finite element formulation of the Navier-Stokes equations.
</p>
<p>
<a href = "../../f77_src/machine/machine.html">
MACHINE</a>,
a FORTRAN77 library which
evaluates various machine arithmetic constants, and is called by NETODE.
</p>
<p>
<a href = "../../f77_src/tcell/tcell.html">
TCELL</a>,
a FORTRAN77 program which
models the time-dependent behavior of an incompressible viscous fluid in
a 2D T-shaped region using a finite element formulation of the Navier-Stokes equations.
</p>
<h3 align = "center">
Reference:
</h3>
<p>
<ol>
<li>
Tom Porsching,<br>
Two Node Separation Problem,<br>
Technical Report EPRI NP-3657,<br>
Project 1741-2, 1984.
</li>
</ol>
</p>
<h3 align = "center">
Source Code:
</h3>
<p>
<ul>
<li>
<a href = "netode.f">netode.f</a>, the source code.
</li>
<li>
<a href = "netode.sh">netode.sh</a>,
commands to compile the source code.
</li>
</ul>
</p>
<h3 align = "center">
Examples and Tests:
</h3>
<p>
<b>RUN00</b> has NETODE read some user input to set up an initial problem.
Normally, this is done interactively,
but it's possible to store the user input in a file first.
<ul>
<li>
<a href = "run00_input.txt">run00_input.txt</a>,
a text file of data that can be used to setup the two node problem.
</li>
<li>
<a href = "run00_output.txt">run00_output.txt</a>,
the printed output from the program, which would go to the screen
in an interactive session.
</li>
<li>
<a href = "two_node_00.txt">two_node_00.txt</a>,
the initial state of the two node problem, as created by NETODE
in response to the user input.
</li>
</ul>
</p>
<p>
<b>RUN01</b> has NETODE read the initial data in <i>two_node_00.txt</i>
and run the simulation to time T = 5.
<ul>
<li>
<a href = "run01_input.txt">run01_input.txt</a>,
a text file of instructions to run NETODE.
</li>
<li>
<a href = "run01_output.txt">run01_output.txt</a>,
the printed output from the program, which would go to the screen
in an interactive session.
</li>
<li>
<a href = "two_node_01.txt">two_node_01.txt</a>,
the state of the two node problem at the end of the run,
as created by NETODE in response to the user input.
</li>
</ul>
</p>
<p>
<b>RUN02</b> (not included here) could read the data in <i>two_node_01.txt</i>
and advance the simulation from T = 5 to T = 10, for instance.
</p>
<h3 align = "center">
List of Routines:
</h3>
<p>
<ul>
<li>
<b>NETODE</b> is a two fluid network ODE problem solved using LSODI.
</li>
<li>
<b>ADDNET</b> adds the matrix A(T,Y) to the input matrix PA.
</li>
<li>
<b>COOKER</b> computes the Newton iterates of pressure for fixed values
</li>
<li>
<b>DENSE</b> is given a press PRESS and an enthalpy H, and computes the
</li>
<li>
<b>DOLINK</b> defines link quantities which must be computed by considering
</li>
<li>
<b>DPOLY</b> computes the derivative of a polynomial of the form
</li>
<li>
<b>EDINET</b> prints out information about the current solution.
</li>
<li>
<b>GONET</b> gets the information that initializes the problem, either
</li>
<li>
<b>JACNET,</b> if supplied, is supposed to compute the jacobian of the
</li>
<li>
<b>NLMAP</b> constructs the arrays NABNOD and LNKNOD.
</li>
<li>
<b>POLY</b> computes the value of a polynomial of the form
</li>
<li>
<b>READER</b> reads the restart data defining a problem.
</li>
<li>
<b>RESNET</b> computes the residual
</li>
<li>
<b>WRITER</b> writes restart data.
</li>
</ul>
</p>
<p>
You can go up one level to <a href = "../f77_src.html">
the FORTRAN77 source codes</a>.
</p>
<hr>
<i>
Last revised on Sat Dec 8 16:24:03 2007
</i>
<!-- John Burkardt -->
</body>
<!-- Initial HTML skeleton created by HTMLINDEX. -->
</html>