CFD Utilities Files

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

   program merge_files

!  Original Description:
!
!     Merge the contents of two Tecplot files which apply to the same structured
!  grid (2-D or 3-D, same number of zones and same zone sizes).  The coordinates
!  are assumed to match, so only those from the first file are carried over.
!  The inputs must be ASCII files; the merged output may be ASCII or binary.
!  File types are deduced from their names (*.dat or *.plt), which are prompted
!  for.  Zones are processed one at a time (no need to store more than one).
!
!  Current Description:
!
!     Combine the variables from two or more formatted Tecplot files with common
!  underlying structured grids.  The file names are read from a list named
!  merge_files.inp (one file per line).  The variable names are expected to be
!  distinct (no duplicate handling).
!
!     To avoid further prompted-for inputs, the merged output file is named
!  merged.dat (formatted) and the datapacking is POINT order.
!
!  Strategy:
!
!     Originally, with just two files in the picture, it was straightforward to
!  read the two headers, check for compatibility, then process one zone at a
!  time.  To generalize this, we need to scan all input file headers to count
!  variables (and auxiliaries) to determine the output header, and write it.
!  These input headers can be stored in an array of header data structures, but
!  we can't use an array of zone array data structures, so we kludge the storage
!  of zone dimensions.  We keep each file open on consecutive logical units.
!  Then we process one zone of all files at a time in an outer loop over all
!  zones and an inner loop over all files, using a common zone data structure
!  for the inputs.
!
!  History:
!
!     10/31/06  D.A.Saunders  Initial implementation.
!     04/21/25   "   "   "    Generalization after a Suman Muppidi request.
!
!  Author:  David Saunders, ELORET/NASA Ames Research Center, Moffett Field, CA
!           Subsequently with AMA, Inc. at NASA ARC.
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!