FEM_TO_TEC
Convert an FEM Model to a TEC Graphics File

FEM_TO_TEC is a FORTRAN90 program using double precision arithmetic, which reads three files defining a finite element model (FEM format) and writes a TEC graphics file suitable for display by TECPLOT.

The finite element model is assumed to include three items:

• Node coordinates, stored in a "node coordinate file";
• Elements defined by a sequence of node indices, store in an "element file";
• Node data, such as finite element coefficients for pressure, velocity, and so on, stored in a "node data file";

FEM_TO_TEC reads these three files and writes an equivalent TEC file that can be processed by the TECPLOT graphics program.

The TECPLOT home page contains a description of the TECPLOT program.

Usage:

fem_to_tec ( 'node_file', 'element_file', 'solution_file', 'tec_file' )

reads the FEM data in node_file, element_file and solution_file and writes the data to a TECPLOT file tec_file.

Related Data and Programs:

FEM is a data directory which contains a description of the data files that can be used to describe a finite element model.

FEM_50 is a MATLAB finite element program in just 50 lines of code.

FEM_50_HEAT is a modified version of FEM_50 suitable for solving the heat equation.

FEM_IO is a set of FORTRAN90 routines for reading or writing an FEM model.

FEM_SAMPLE is a FORTRAN90 library of routines for evaluating a finite element function defined on an order 3 or order 6 triangulation.

FEM_TO_TEC is also available in a MATLAB version.

FEM1D, is an executable FORTRAN90 program which applies the finite element method, with piecewise linear basis functions, to a two point boundary value problem;

FEM2D_POISSON is a FORTRAN90 program for solving Poisson's equation on a square, using the finite element method.

FEMPACK is a library of FORTRAN90 routines for finite element calculations.

FREE_FEM_HEAT is a FORTRAN90 program which uses the finite element method and the backward Euler method to solve the time-dependent heat equation on an arbitrary triangulated region in 2D. (The user supplies some information in some problem-dependent subroutines.)

FREE_FEM_POISSON is a FORTRAN90 program for solving Poisson's equation on a triangulated region, using the finite element method.

FREE_FEM_STOKES is a FORTRAN90 program for solving the Stokes equations on a triangulated region, using the finite element method.

HOT_PIPE is a set of MATLAB routines which define a sample problem that can be run with FEM_50_HEAT.

HOT_POINT is a set of MATLAB routines which define a sample problem that can be run with FEM_50_HEAT.

PLTMG_SINGLE is a FORTRAN77 library of routines for solving elliptic partial differential equations using the finite element method with piecewise linear triangles and the multigrid approach.

TABLE is a file format which is used for the FEM files.

TABLE_IO is a library of FORTRAN90 routines for reading and writing TABLE files.

TEC is a data directory which contains a description and examples of TEC graphics files.

TEC_IO is a FORTRAN90 library which reads or writes a TEC file containing a finite element model.

TEC_TO_FEM is a FORTRAN90 program which converts a TEC file into an FEM model.

Reference:

• Tecplot, Inc,
  TECPLOT Reference Manual,
  Version 10, Release 4,
  Tecplot, Inc, 2005.
• Tecplot, Inc,
  TECPLOT User's Manual,
  Version 10,
  Tecplot, Inc, 2005.

Source Code:

• fem_to_tec.f90, the source code.
• fem_to_tec.csh, commands to compile the source code.

Examples and Tests:

ELL is an example of a 2D finite element model in which a scalar value is stored. This data was computed by the FREE_FEM_POISSON program.

• ell_node_coord.txt
• ell_element.txt
• ell_node_data.txt
• ell.tec

TINY is a "tiny" example of a 2D finite element model in which a vector value is stored.

• tiny_node_coord.txt
• tiny_element.txt
• tiny_node_data.txt
• tiny.tec

List of Routines:

• MAIN is the main program for FEM_TO_TEC.
• CH_CAP capitalizes a single character.
• CH_EQI is a case insensitive comparison of two characters for equality.
• CH_IS_ALPHA is TRUE if C is an alphabetic character.
• CH_TO_DIGIT returns the integer value of a base 10 digit.
• DTABLE_DATA_READ reads data from a double precision table file.
• DTABLE_DATA_WRITE writes data to a double precision table file.
• DTABLE_HEADER_READ reads the header from a double precision table file.
• FEM_DATA_READ reads data from a set of FEM files.
• FEM_HEADER_PRINT prints the header to set of FEM files.
• FEM_HEADER_READ reads the sizes of arrays in a set of FEM files.
• FEM_TO_TEC_HANDLE reads data from a set of FEM files and writes a TEC file.
• FILE_COLUMN_COUNT counts the number of columns in the first line of a file.
• FILE_NAME_INC increments a partially numeric filename.
• FILE_ROW_COUNT counts the number of rows in a file.
• GET_UNIT returns a free FORTRAN unit number.
• ITABLE_DATA_READ reads data from an integer table file.
• ITABLE_HEADER_READ reads the header from an integer table file.
• S_ALPHA_LAST returns the location of the last alphabetic character.
• S_BLANK_DELETE removes blanks from a string, left justifying the remainder.
• S_INC "increments" a string.
• S_TO_I4 reads an integer value from a string.
• S_TO_I4VEC reads an integer vector from a string.
• S_TO_R8 reads an R8 from a string.
• S_TO_R8VEC reads an R8VEC from a string.
• S_WORD_COUNT counts the number of "words" in a string.
• TEC_DATA_WRITE writes the data to a TEC file.
• TEC_HEADER_WRITE writes the header to a TEC file.
• TEC_OPEN_WRITE opens a TEC file for writing.
• TEC_WRITE writes finite element data to a TEC file.
• TIMESTAMP prints the current YMDHMS date as a time stamp.
• TIMESTRING writes the current YMDHMS date into a string.

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