TEC_TO_OBJ
Convert TECPLOT Finite Element Files to OBJ Format

TEC_TO_OBJ is a FORTRAN90 program which can read a TECPLOT ASCII file defining a 3D surface of triangles or quadrilaterals, and write a corresponding Alias OBJ file.

TEC_TO_OBJ can only read a very specific type of TECPLOT ASCII FILE, namely, one in which the spatial dimension is 3, and in which the objects are triangular finite elements.

This means that the first three lines of the TECPLOT file should look something like this:

        TITLE = "human.dat created by IVREAD."
        VARIABLES = "X", "Y", "Z", "R", "G", "B"
        ZONE N = 64, E = 96, DATAPACKING = POINT, ZONETYPE = FETRIANGLE
      

        TITLE = "human.dat created by IVREAD."
        VARIABLES = "X", "Y", "Z", "R", "G", "B"
        ZONE N = 64, E = 48, DATAPACKING = POINT, ZONETYPE = FEQUADRILATERAL
      

• The list of variables on line 2 begins with "X", "Y" and "Z", which indicates this is a 3D spatial problem;
• The formatting information on line 3 specifies POINT datapacking with FETRIANGLE or FEQUADRILATERAL zonetype.

The TECPLOT home page is
http://www.tecplot.com/

Usage:

tec_to_obj file.dat

reads the TECPLOT ASCII file file.dat and creates the Alias OBJ file file.obj.

Licensing:

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

Languages:

TEC_TO_OBJ is available in a FORTRAN90 version.

Related Data and Programs:

IVCON, a C++ program which reads an Alias OBJ file and writes out an equivalent file in a variety of formats.

IVREAD, a FORTRAN90 program which reads an Alias OBJ file and write out an equivalent file in a variety of formats.

OBJ, a data directory which contains a description of the Alias OBJ data file format.

OBJ_TO_PLY, a C program which reads an Alias OBJ file and writes a PLY file.

OBJ_IO, a FORTRAN90 library which reads or writes an Alias OBJ file.

OBJ2OPENGL, a PERL script which converts an Alias OBJ file to a C/C++ include file appropriate for use with Open GL;

PLY_TO_OBJ, a C program which reads a PLY 3D graphics file and writes an equivalent OBJ graphics file.

TEC, a data directory which contains a description of TECPLOT files.

TEC_IO, a FORTRAN90 library which reads or writes a TECPLOT file definite a finite element dataset.

TEC_TO_FEM, a FORTRAN90 program which convert a TECPLOT graphics file defining a finite element dataset into a set of FEM files.

TEC_TO_OBJ2, a FORTRAN90 program which is a minor revision of TEC_TO_OBJ and which tries to read data from multiple zones in a TECPLOT file and write it to an OBJ file.

TEC_WRITE, a FORTRAN90 which can write TEC files.

Reference:

1. http://www.alias.com/eng/index.shtml, The Alias web site.
2. obj_format.txt, some information about the Alias OBJ format.
3. Tecplot, Inc,
   TECPLOT Reference Manual,
   Version 10, Release 4,
   Tecplot, Inc, 2005.
4. Tecplot, Inc,
   TECPLOT User's Manual,
   Version 10,
   Tecplot, Inc, 2005.

Source Code:

• tec_to_obj.f90, the source code.

Examples and Tests:

HUMANOID_TRI is a TECPLOT file describing a humanoid shape using finite element triangles.

• humanoid_tri.dat, a TECPLOT ASCII file defining the dataset.
• humanoid_tri.obj, the OBJ file created by TEC_TO_OBJ.
• humanoid_tri.png, a PNG "snapshot" of the humanoid figure.

HUMANOID_QUAD is a TECPLOT file describing a humanoid shape using finite element quadrilaterals.

• humanoid_quad.dat, a TECPLOT ASCII file defining the dataset.
• humanoid_quad.obj, the OBJ file created by TEC_TO_OBJ.
• humanoid_quad.png, a PNG "snapshot" of the humanoid figure.

List of Routines:

• MAIN is the main program for TEC_TO_OBJ.
• CH_CAP capitalizes a single character.
• CH_EQI is a case insensitive comparison of two characters for equality.
• CH_TO_DIGIT returns the integer value of a base 10 digit.
• FILE_NAME_EXT_GET determines the "extension" of a file name.
• FILE_NAME_EXT_SWAP replaces the current "extension" of a file name.
• GET_UNIT returns a free FORTRAN unit number.
• OBJ_WRITE writes graphics information to an Alias OBJ file.
• S_BEGIN is TRUE if one string matches the beginning of the other.
• S_BEHEAD_SUBSTRING "beheads" a string, removing a given substring.
• S_BLANK_DELETE removes blanks from a string, left justifying the remainder.
• S_BLANKS_DELETE replaces consecutive blanks by one blank.
• S_CAT concatenates two strings to make a third string.
• S_EQI is a case insensitive comparison of two strings for equality.
• S_INDEX_LAST finds the LAST occurrence of a given substring.
• S_REPLACE_CH replaces all occurrences of one character by another.
• S_TO_I4 reads an I4 from a string.
• S_TO_R8 reads an R8 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_HEADER_PRINT prints the header to a TEC file.
• TEC_HEADER_READ reads the header from a TEC file.
• TEC_TO_OBJ_HANDLE reads data from a TECPLOT file and writes an OBJ file.
• TEC_ZONE_LINE_PARSE parses the "ZONE" line of a TEC file.
• TIMESTAMP prints the current YMDHMS date as a time stamp.

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