FEM_TO_TEC
Convert an FEM Model to a TEC Graphics File

FEM_TO_TEC is a FORTRAN90 program which reads three files defining a finite element model (FEM format) and writes a TECPLOT ASCII 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 TECPLOT ASCII 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', 'value_file', 'tec_file' )

• node_file is the FEM node file;
• element_file is the FEM element file;
• value_file is the FEM value file;
• tec_file is the TEC file to be created.

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Languages:

FEM_TO_TEC is available in a FORTRAN90 version and a MATLAB version.

Related Data and Programs:

FEM_IO, a FORTRAN90 library which reads or writes an FEM model.

FEM_TO_MEDIT, a FORTRAN90 program which reads a pair of FEM files defining node coordinates and elements, and creates a corresponding MEDIT mesh file.

FEM_TO_TRIANGLE, a FORTRAN90 program which reads FEM files defining a 2D mesh of triangles, namely a file of node coordinates and a file of elements defined by node indices, and creates a corresponding pair of node and element files for use by Jonathan Shewchuk's triangle program.

FEM2D, a data directory which contains examples of 2D FEM files, text files that describe a 2D finite element geometry and associated nodal values;

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

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

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

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_nodes.txt
• ell_elements.txt
• ell_values.txt
• ell.dat

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

• tiny_nodes.txt
• tiny_elements.txt
• tiny_values.txt
• tiny.dat

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.