NETODE
Two-Phase Fluid Network Problem

NETODE 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.

Related Data and Programs:

CHANNEL, 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.

HCELL, 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.

HCELL_STEADY, 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.

INOUT, 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.

MACHINE, a FORTRAN77 library which evaluates various machine arithmetic constants, and is called by NETODE.

TCELL, 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.

Reference:

1. Tom Porsching,
   Two Node Separation Problem,
   Technical Report EPRI NP-3657,
   Project 1741-2, 1984.

Source Code:

• netode.f, the source code.
• netode.sh, commands to compile the source code.

Examples and Tests:

RUN00 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.

• run00_input.txt, a text file of data that can be used to setup the two node problem.
• run00_output.txt, the printed output from the program, which would go to the screen in an interactive session.
• two_node_00.txt, the initial state of the two node problem, as created by NETODE in response to the user input.

RUN01 has NETODE read the initial data in two_node_00.txt and run the simulation to time T = 5.

• run01_input.txt, a text file of instructions to run NETODE.
• run01_output.txt, the printed output from the program, which would go to the screen in an interactive session.
• two_node_01.txt, the state of the two node problem at the end of the run, as created by NETODE in response to the user input.

RUN02 (not included here) could read the data in two_node_01.txt and advance the simulation from T = 5 to T = 10, for instance.

List of Routines:

• NETODE is a two fluid network ODE problem solved using LSODI.
• ADDNET adds the matrix A(T,Y) to the input matrix PA.
• COOKER computes the Newton iterates of pressure for fixed values
• DENSE is given a press PRESS and an enthalpy H, and computes the
• DOLINK defines link quantities which must be computed by considering
• DPOLY computes the derivative of a polynomial of the form
• EDINET prints out information about the current solution.
• GONET gets the information that initializes the problem, either
• JACNET, if supplied, is supposed to compute the jacobian of the
• NLMAP constructs the arrays NABNOD and LNKNOD.
• POLY computes the value of a polynomial of the form
• READER reads the restart data defining a problem.
• RESNET computes the residual
• WRITER writes restart data.

You can go up one level to the FORTRAN77 source codes.