Data Types
type	slice

type	liftdist

Functions/Subroutines
subroutine	addparaslice (sliceName, pt, normal, dir_vec, use_dir, famList, n)

subroutine	addabsslice (sliceName, pt, normal, dir_vec, use_dir, famList, n)

subroutine	addliftdistribution (nSegments, normal, normal_ind, distName, famList, n)

subroutine	writetecplot (sliceFile, writeSlices, liftFile, writeLift, surfFile, writeSurf, famList, nFamList)

subroutine	writeslicesfile (fileName, nodalValues)

subroutine	writeliftdistributionfile (fileName, nodalValues)

subroutine	writeliftdistributions (sps, fileID, nodalValues)

subroutine	writetecplotsurfacefile (fileName, famList)

subroutine	initializeliftdistributiondata

subroutine	computesurfaceoutputnodaldata (exch, zipper, includeTractions, nodalValues)

subroutine	createslice (pts, conn, elemFam, slc, pt, normal, dir_vec, use_dir, sliceName, famList)

subroutine	destroyslice (slc)

subroutine	integrateslice (lSlc, gSlc, nodalValues, nFields, doConnectivity)

subroutine	writeslice (slc, fileID, nFields)

Variables
character(len=maxstringlen)	sci6 = "(ES14.6)"

logical	liftdistinitialized = .False.

integer(kind=inttype), dimension(16, 5)	mscon1

integer(kind=inttype), dimension(4, 2)	mscon2

integer(kind=inttype), parameter	nslicemax = 1000

integer(kind=inttype)	nparaslices = 0

integer(kind=inttype)	nabsslices = 0

type(slice), dimension(:, :), allocatable	paraslices

type(slice), dimension(:, :), allocatable	absslices

integer(kind=inttype), parameter	nliftdistmax = 100

integer(kind=inttype)	nliftdists = 0

type(liftdist), dimension(nliftdistmax), target	liftdists

character(len=maxcgnsnamelen), dimension(:), allocatable	liftdistname

integer(kind=inttype), parameter	nliftdistvar = 26

Function/Subroutine Documentation

◆ addabsslice()

subroutine tecplotio::addabsslice	(	character(len=*), intent(in)	sliceName,
		real(kind=realtype), dimension(3), intent(in)	pt,
		real(kind=realtype), dimension(3), intent(in)	normal,
		real(kind=realtype), dimension(3), intent(in)	dir_vec,
		logical, intent(in)	use_dir,
		integer(kind=inttype), dimension(n), intent(in)	famList,
		integer(kind=inttype), intent(in)	n
	)

Definition at line 134 of file tecplotIO.F90.

References absslices, surfacefamilies::bcfamgroups, createslice(), surfaceutils::getsurfaceconnectivity(), surfaceutils::getsurfacefamily(), surfaceutils::getsurfacepoints(), surfaceutils::getsurfacesize(), constants::ibcgroupwalls, nabsslices, nslicemax, and inputtimespectral::ntimeintervalsspectral.

Here is the call graph for this function:

◆ addliftdistribution()

subroutine tecplotio::addliftdistribution	(	integer(kind=inttype), intent(in)	nSegments,
		real(kind=realtype), dimension(3)	normal,
		integer(kind=inttype), intent(in)	normal_ind,
		character(len=*), intent(in)	distName,
		integer(kind=inttype), dimension(n), intent(in)	famList,
		integer(kind=inttype), intent(in)	n
	)

Definition at line 186 of file tecplotIO.F90.

References liftdists, nliftdistmax, and nliftdists.

◆ addparaslice()

subroutine tecplotio::addparaslice	(	character(len=*), intent(in)	sliceName,
		real(kind=realtype), dimension(3), intent(in)	pt,
		real(kind=realtype), dimension(3), intent(in)	normal,
		real(kind=realtype), dimension(3), intent(in)	dir_vec,
		logical, intent(in)	use_dir,
		integer(kind=inttype), dimension(n), intent(in)	famList,
		integer(kind=inttype), intent(in)	n
	)

Definition at line 77 of file tecplotIO.F90.

References surfacefamilies::bcfamgroups, createslice(), surfaceutils::getsurfaceconnectivity(), surfaceutils::getsurfacefamily(), surfaceutils::getsurfacepoints(), surfaceutils::getsurfacesize(), constants::ibcgroupwalls, nparaslices, nslicemax, inputtimespectral::ntimeintervalsspectral, and paraslices.

Here is the call graph for this function:

◆ computesurfaceoutputnodaldata()

subroutine tecplotio::computesurfaceoutputnodaldata	(	type(familyexchange)	exch,
		type(zippermesh)	zipper,
		logical	includeTractions,
		real(kind=realtype), dimension(:, :), intent(inout)	nodalValues
	)

Definition at line 1309 of file tecplotIO.F90.

References blockpointers::bcfaceid, surfacefamilies::bcfamgroups, blockpointers::bctype, computenodaltractions(), utils::echk(), sorting::faminlist(), surfaceutils::getsurfacepoints(), surfaceutils::getsurfacesize(), blockpointers::ibegor, constants::imax, constants::imin, blockpointers::jbegor, constants::jmax, constants::jmin, blockpointers::kbegor, constants::kmax, constants::kmin, communication::myid, blockpointers::nbocos, constants::nswalladiabatic, constants::nswallisothermal, outputmod::numberofsurfsolvariables(), constants::one, utils::setpointers(), outputmod::storesurfsolinbuffer(), outputmod::surfsolnames(), and constants::zero.

Referenced by writetecplot(), and writetecplotsurfacefile().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ createslice()

subroutine tecplotio::createslice	(	real(kind=realtype), dimension(:, :), intent(in)	pts,
		integer(kind=inttype), dimension(:, :), intent(in)	conn,
		integer(kind=inttype), dimension(:), intent(in)	elemFam,
		type(slice), intent(inout)	slc,
		real(kind=realtype), dimension(3), intent(in)	pt,
		real(kind=realtype), dimension(3), intent(in)	normal,
		real(kind=realtype), dimension(3), intent(in)	dir_vec,
		logical, intent(in)	use_dir,
		character(len=*), intent(in)	sliceName,
		integer(kind=inttype), dimension(:), intent(in)	famList
	)

Definition at line 1665 of file tecplotIO.F90.

References sorting::faminlist(), mscon1, mscon2, constants::one, utils::pointreduce(), utils::reallocateinteger2(), utils::reallocatereal2(), and constants::zero.

Referenced by addabsslice(), addparaslice(), writeliftdistributions(), and writeslicesfile().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ destroyslice()

subroutine tecplotio::destroyslice ( type(slice), intent(inout) slc )

Definition at line 1837 of file tecplotIO.F90.

Referenced by writeliftdistributions(), and writeslicesfile().

Here is the caller graph for this function:

◆ initializeliftdistributiondata()

subroutine tecplotio::initializeliftdistributiondata

Definition at line 1262 of file tecplotIO.F90.

References liftdistinitialized, mscon1, and mscon2.

◆ integrateslice()

subroutine tecplotio::integrateslice	(	type(slice)	lSlc,
		type(slice)	gSlc,
		real(kind=realtype), dimension(:, :), intent(in)	nodalValues,
		integer(kind=inttype), intent(in)	nFields,
		logical, intent(in)	doConnectivity
	)

Definition at line 1871 of file tecplotIO.F90.

References communication::adflow_comm_world, inputphysics::dragdirection, utils::echk(), flowvarrefstate::gammainf, constants::half, inputphysics::lengthref, inputphysics::liftdirection, flowvarrefstate::lref, inputphysics::machcoef, communication::myid, communication::nproc, constants::one, constants::pi, flowvarrefstate::pinf, flowvarrefstate::pref, constants::two, and constants::zero.

Referenced by writeliftdistributions(), and writeslicesfile().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ writeliftdistributionfile()

subroutine tecplotio::writeliftdistributionfile	(	character(len=*), intent(in)	fileName,
		real(kind=realtype), dimension(:, :, :), allocatable	nodalValues
	)

Definition at line 417 of file tecplotIO.F90.

References inputphysics::equationmode, communication::myid, nliftdists, inputtimespectral::ntimeintervalsspectral, inputiteration::printiterations, constants::timespectral, and writeliftdistributions().

Referenced by solvers::checkwriteunsteadyinloop(), and writetecplot().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ writeliftdistributions()

subroutine tecplotio::writeliftdistributions	(	integer(kind=inttype), intent(in)	sps,
		integer(kind=inttype), intent(in)	fileID,
		real(kind=realtype), dimension(:, :), intent(in)	nodalValues
	)

Definition at line 487 of file tecplotIO.F90.

References communication::adflow_comm_world, surfacefamilies::bcfamexchange, surfacefamilies::bcfamgroups, cgnsnames::cgnscoorx, cgnsnames::cgnscoory, cgnsnames::cgnscoorz, createslice(), destroyslice(), utils::echk(), sorting::faminlist(), constants::four, surfaceutils::getsurfaceconnectivity(), surfaceutils::getsurfacefamily(), surfaceutils::getsurfacepoints(), surfaceutils::getsurfacesize(), constants::half, constants::ibcgroupwalls, integrateslice(), liftdists, communication::myid, nliftdists, nliftdistvar, constants::one, constants::pi, sci6, and constants::zero.

Referenced by writeliftdistributionfile().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ writeslice()

subroutine tecplotio::writeslice	(	type(slice), intent(in)	slc,
		integer(kind=inttype), intent(in)	fileID,
		integer(kind=inttype), intent(in)	nFields
	)

Definition at line 2250 of file tecplotIO.F90.

References commonformats::int5, sci6, and constants::zero.

Referenced by writeslicesfile().

Here is the caller graph for this function:

◆ writeslicesfile()

subroutine tecplotio::writeslicesfile	(	character(len=*), intent(in)	fileName,
		real(kind=realtype), dimension(:, :, :), intent(inout)	nodalValues
	)

Definition at line 277 of file tecplotIO.F90.

References absslices, communication::adflow_comm_world, surfacefamilies::bcfamgroups, createslice(), destroyslice(), utils::echk(), inputphysics::equationmode, surfaceutils::getsurfaceconnectivity(), surfaceutils::getsurfacefamily(), surfaceutils::getsurfacepoints(), surfaceutils::getsurfacesize(), constants::ibcgroupwalls, integrateslice(), communication::myid, nabsslices, nparaslices, inputtimespectral::ntimeintervalsspectral, outputmod::numberofsurfsolvariables(), paraslices, inputiteration::printiterations, outputmod::surfsolnames(), constants::timespectral, and writeslice().

Referenced by solvers::checkwriteunsteadyinloop(), and writetecplot().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ writetecplot()

subroutine tecplotio::writetecplot	(	character(len=*), intent(in)	sliceFile,
		logical, intent(in)	writeSlices,
		character(len=*), intent(in)	liftFile,
		logical, intent(in)	writeLift,
		character(len=*), intent(in)	surfFile,
		logical, intent(in)	writeSurf,
		integer(kind=inttype), dimension(nfamlist), intent(in)	famList,
		integer(kind=inttype), intent(in)	nFamList
	)