#include <stdlib.h>
#include <cmath>
#include <BasicFiniteElements.hpp>

Classes
struct	ElementsAndOps< DIM >

struct	PhotonDiffusion

struct	PhotonDiffusion::CommonData

struct	PhotonDiffusion::OpCameraInteg

struct	PhotonDiffusion::OpGetScalarFieldGradientValuesOnSkin

struct	PhotonDiffusion::Monitor

Typedefs
using	DomainEle = VolumeElementForcesAndSourcesCore
	[Define dimension] More...

using	DomainEleOp = DomainEle::UserDataOperator

using	BoundaryEle = FaceElementForcesAndSourcesCore

using	BoundaryEleOp = BoundaryEle::UserDataOperator

using	PostProcEle = PostProcBrokenMeshInMoab< VolumeElementForcesAndSourcesCore >

using	PostProcFaceEle = PostProcBrokenMeshInMoab< FaceElementForcesAndSourcesCore >

using	OpPPMap = OpPostProcMapInMoab< SPACE_DIM, SPACE_DIM >

using	VolSideFe = VolumeElementForcesAndSourcesCoreOnSide

using	OpDomainMass = FormsIntegrators< DomainEleOp >::Assembly< PETSC >::BiLinearForm< GAUSS >::OpMass< 1, 1 >

using	OpDomainGradGrad = FormsIntegrators< DomainEleOp >::Assembly< PETSC >::BiLinearForm< GAUSS >::OpGradGrad< 1, 1, SPACE_DIM >

using	OpDomainTimesScalarField = FormsIntegrators< DomainEleOp >::Assembly< PETSC >::LinearForm< GAUSS >::OpBaseTimesScalar< 1 >

using	OpDomainGradTimesVec = FormsIntegrators< DomainEleOp >::Assembly< PETSC >::LinearForm< GAUSS >::OpGradTimesTensor< 1, 1, SPACE_DIM >

using	OpDomainSource = FormsIntegrators< DomainEleOp >::Assembly< PETSC >::LinearForm< GAUSS >::OpSource< 1, 1 >

using	OpBoundaryMass = FormsIntegrators< BoundaryEleOp >::Assembly< PETSC >::BiLinearForm< GAUSS >::OpMass< 1, 1 >

using	OpBoundaryTimeScalarField = FormsIntegrators< BoundaryEleOp >::Assembly< PETSC >::LinearForm< GAUSS >::OpBaseTimesScalar< 1 >

using	OpBoundarySource = FormsIntegrators< BoundaryEleOp >::Assembly< PETSC >::LinearForm< GAUSS >::OpSource< 1, 1 >

Functions
int	main (int argc, char *argv[])

Variables
static char	help [] = "...\n\n"

constexpr int	SPACE_DIM = 3
	[Define dimension] More...

const double	n = 1.44
	refractive index of diffusive medium More...

const double	c = 30.
	speed of light (cm/ns) More...

const double	v = c / n
	phase velocity of light in medium (cm/ns) More...

const double	inv_v = 1. / v

double	mu_a
	absorption coefficient (cm^-1) More...

double	mu_sp
	scattering coefficient (cm^-1) More...

double	D

double	A

double	h

PetscBool	from_initial = PETSC_TRUE

PetscBool	output_volume = PETSC_FALSE

PetscBool	output_camera = PETSC_FALSE

int	order = 2

int	save_every_nth_step = 1

char	init_data_file_name [255] = "init_file.dat"

int	numHoLevels = 1

Typedef Documentation

◆ BoundaryEle

using BoundaryEle = FaceElementForcesAndSourcesCore

Definition at line 23 of file photon_diffusion.cpp.

◆ BoundaryEleOp

using BoundaryEleOp = BoundaryEle::UserDataOperator

Definition at line 24 of file photon_diffusion.cpp.

◆ DomainEle

using DomainEle = VolumeElementForcesAndSourcesCore

[Define dimension]

Definition at line 21 of file photon_diffusion.cpp.

◆ DomainEleOp

using DomainEleOp = DomainEle::UserDataOperator

Definition at line 22 of file photon_diffusion.cpp.

◆ OpBoundaryMass

using OpBoundaryMass = FormsIntegrators<BoundaryEleOp>::Assembly< PETSC>::BiLinearForm<GAUSS>::OpMass<1, 1>

Examples: photon_diffusion.cpp.

Definition at line 44 of file photon_diffusion.cpp.

◆ OpBoundarySource

using OpBoundarySource = FormsIntegrators<BoundaryEleOp>::Assembly< PETSC>::LinearForm<GAUSS>::OpSource<1, 1>

Definition at line 48 of file photon_diffusion.cpp.

◆ OpBoundaryTimeScalarField

using OpBoundaryTimeScalarField = FormsIntegrators<BoundaryEleOp>::Assembly< PETSC>::LinearForm<GAUSS>::OpBaseTimesScalar<1>

Examples: photon_diffusion.cpp.

Definition at line 46 of file photon_diffusion.cpp.

◆ OpDomainGradGrad

using OpDomainGradGrad = FormsIntegrators<DomainEleOp>::Assembly< PETSC>::BiLinearForm<GAUSS>::OpGradGrad<1, 1, SPACE_DIM>

Examples: photon_diffusion.cpp.

Definition at line 35 of file photon_diffusion.cpp.

◆ OpDomainGradTimesVec

using OpDomainGradTimesVec = FormsIntegrators<DomainEleOp>::Assembly< PETSC>::LinearForm<GAUSS>::OpGradTimesTensor<1, 1, SPACE_DIM>

Examples: photon_diffusion.cpp.

Definition at line 39 of file photon_diffusion.cpp.

◆ OpDomainMass

using OpDomainMass = FormsIntegrators<DomainEleOp>::Assembly< PETSC>::BiLinearForm<GAUSS>::OpMass<1, 1>

Examples: photon_diffusion.cpp.

Definition at line 33 of file photon_diffusion.cpp.

◆ OpDomainSource

using OpDomainSource = FormsIntegrators<DomainEleOp>::Assembly< PETSC>::LinearForm<GAUSS>::OpSource<1, 1>

Definition at line 41 of file photon_diffusion.cpp.

◆ OpDomainTimesScalarField

using OpDomainTimesScalarField = FormsIntegrators<DomainEleOp>::Assembly< PETSC>::LinearForm<GAUSS>::OpBaseTimesScalar<1>

Examples: photon_diffusion.cpp.

Definition at line 37 of file photon_diffusion.cpp.

◆ OpPPMap

◆ PostProcEle

using PostProcEle = PostProcBrokenMeshInMoab<VolumeElementForcesAndSourcesCore>

Definition at line 25 of file photon_diffusion.cpp.

◆ PostProcFaceEle

using PostProcFaceEle = PostProcBrokenMeshInMoab<FaceElementForcesAndSourcesCore>

Definition at line 26 of file photon_diffusion.cpp.

◆ VolSideFe

using VolSideFe = VolumeElementForcesAndSourcesCoreOnSide

Definition at line 31 of file photon_diffusion.cpp.

Function Documentation

◆ main()

int main	(	int	argc,
		char *	argv[]
	)

Definition at line 658 of file photon_diffusion.cpp.

                                 {
 
  // Initialisation of MoFEM/PETSc and MOAB data structures
  const char param_file[] = "param_file.petsc";
  MoFEM::Core::Initialize(&argc, &argv, param_file, help);
 
  // Add logging channel for example
  auto core_log = logging::core::get();
  core_log->add_sink(
      LogManager::createSink(LogManager::getStrmWorld(), "PHOTON"));
  LogManager::setLog("PHOTON");
  MOFEM_LOG_TAG("PHOTON", "photon_diffusion")
 
  // Error handling
  try {
    // Register MoFEM discrete manager in PETSc
    DMType dm_name = "DMMOFEM";
    CHKERR DMRegister_MoFEM(dm_name);
 
    // Create MOAB instance
    moab::Core mb_instance;              // mesh database
    moab::Interface &moab = mb_instance; // mesh database interface
 
    // Create MoFEM instance
    MoFEM::Core core(moab);           // finite element database
    MoFEM::Interface &m_field = core; // finite element interface
 
    // Run the main analysis
    PhotonDiffusion heat_problem(m_field);
    CHKERR heat_problem.runProgram();
  }
  CATCH_ERRORS;
 
  // Finish work: cleaning memory, getting statistics, etc.
  MoFEM::Core::Finalize();
 
  return 0;
}