#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 45 of file photon_diffusion.cpp.

◆ OpBoundarySource

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

Definition at line 49 of file photon_diffusion.cpp.

◆ OpBoundaryTimeScalarField

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

Examples: photon_diffusion.cpp.

Definition at line 47 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 36 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 40 of file photon_diffusion.cpp.

◆ OpDomainMass

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

Examples: photon_diffusion.cpp.

Definition at line 34 of file photon_diffusion.cpp.

◆ OpDomainSource

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

Definition at line 42 of file photon_diffusion.cpp.

◆ OpDomainTimesScalarField

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

Examples: photon_diffusion.cpp.

Definition at line 38 of file photon_diffusion.cpp.

◆ OpPPMap

using OpPPMap = OpPostProcMapInMoab<SPACE_DIM, SPACE_DIM>

◆ PostProcEle

using PostProcEle = PostProcBrokenMeshInMoab<VolumeElementForcesAndSourcesCore>

Definition at line 25 of file photon_diffusion.cpp.

◆ PostProcFaceEle

using PostProcFaceEle = PostProcBrokenMeshInMoab<FaceElementForcesAndSourcesCore>

Definition at line 27 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[]
	)

Examples: photon_diffusion.cpp.

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;
 }