TEC_IO
Read and Write TEC Files

TEC_IO is a FORTRAN90 library which can read or write a TEC graphics file containing a finite element model.

There are several kinds of TEC files; the routines given here can only handle the case where a single ZONE record is used to define finite element data, using a DATAPACKING value of "POINT" (not "BLOCK"), and a ZONETYPE of

• FETRIANGLE
• FEQUADRILATERAL
• FETETRAHEDRON
• FEBRICK

The data to be written or read is assumed to have a logical organization into three groups:

• Node coordinate data;
• Element definitions, that is, the sequence of node indices that define each element;
• Node data, such as finite element coefficients for pressure, velocity, and so on.

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

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 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_TO_TEC is a FORTRAN90 program which reads the three files defining an FEM model and writes an equivalent TEC file.

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

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

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 sample problem that can be run with FEM_50_HEAT.

HOT_POINT is a sample problem that can be run with FEM_50_HEAT.

TABLE is a format used for the FEM files.

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

TEC is a data directory which contains a description and examples of the TEC graphics files used by TECPLOT

TEC_IO is also available in a MATLAB version.

TEC_TO_FEM is a FORTRAN90 program which reads a TEC file and writes a set of three files defining the equivalent FEM model.

TEC_TO_OBJ is a FORTRAN90 program which can read a TECPLOT file describing a surface in 3D composed of triangles or quadrilaterals, and write an OBJ file.

TEC_TO_UCD is an executable FORTRAN90 program which reads a (finite element) TEC file and writes an equivalent AVS UCD file.

TEC_WRITE is a FORTRAN90 library of routines which can write TEC files.

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:

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

Examples and Tests:

• tec_io_prb.f90, a sample calling program.
• tec_io_prb.csh, commands to compile and run the sample program.
• tec_io_prb_output.txt, the output from a run of the sample program.
• ell.tec, a TEC file read by the test program;
• tiny.tec, a TEC file created by the test program;

List of Routines:

• 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.
• DTABLE_DATA_WRITE writes data to a double precision table file.
• DTABLE_HEADER_WRITE writes the header to a double precision table file.
• DTABLE_WRITE writes a double precision table file.
• FILE_NAME_INC increments a partially numeric filename.
• GET_UNIT returns a free FORTRAN unit number.
• I4MAT_TRANSPOSE_PRINT prints an I4MAT, transposed.
• I4MAT_TRANSPOSE_PRINT_SOME prints some of the transpose of an I4MAT.
• ITABLE_DATA_WRITE writes data to an integer table file.
• ITABLE_HEADER_WRITE writes the header to an integer table file.
• ITABLE_WRITE writes an integer table file.
• R8MAT_TRANSPOSE_PRINT prints an R8MAT, transposed.
• R8MAT_TRANSPOSE_PRINT_SOME prints some of an R8MAT, transposed.
• S_ALPHA_LAST returns the location of the last alphabetic character.
• S_BEGIN is TRUE if one string matches the beginning of the other.
• S_BEHEAD_SUBSTRING "beheads" a string, removing a given substring.
• S_EQI is a case insensitive comparison of two strings for equality.
• S_INC "increments" a string.
• S_REPLACE_CH replaces all occurrences of one character by another.
• S_TO_I4 reads an I4 from a string.
• S_WORD_COUNT counts the number of "words" in a string.
• S_WORD_EXTRACT extracts the next word from a string.
• TEC_DATA_READ reads the data from a TEC file.
• TEC_DATA_WRITE writes the data to a TEC file.
• TEC_HEADER_PRINT prints the header to a TEC file.
• TEC_HEADER_READ reads the header from a TEC file.
• TEC_HEADER_WRITE writes the header to a TEC file.
• TEC_OPEN_READ opens a TEC file for reading.
• TEC_OPEN_WRITE opens a TEC file for writing.
• TEC_WRITE writes finite element data to a TEC file.
• TEC_ZONE_LINE_PARSE parses the "ZONE" line of 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.