#include <stdlib.h>
#include <cmath>
#include <MoFEM.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]

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]

const double	n = 1.44
	refractive index of diffusive medium

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

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

const double	inv_v = 1. / v

double	mu_a
	absorption coefficient (cm^-1)

double	mu_sp
	scattering coefficient (cm^-1)

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: mofem/tutorials/scl-10/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: mofem/tutorials/scl-10/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: mofem/tutorials/scl-10/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: mofem/tutorials/scl-10/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: mofem/tutorials/scl-10/initial_diffusion.cpp, and mofem/tutorials/scl-10/photon_diffusion.cpp.

Definition at line 33 of file photon_diffusion.cpp.

◆ OpDomainSource

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

Examples: mofem/tutorials/scl-10/initial_diffusion.cpp.

Definition at line 41 of file photon_diffusion.cpp.

◆ OpDomainTimesScalarField

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

Examples: mofem/tutorials/scl-10/photon_diffusion.cpp.

Definition at line 37 of file photon_diffusion.cpp.

◆ OpPPMap

using OpPPMap = OpPostProcMapInMoab<SPACE_DIM, SPACE_DIM>

Examples: mofem/atom_tests/operators_tests.cpp, mofem/atom_tests/scalar_check_approximation.cpp, mofem/atom_tests/tensor_divergence_operator.cpp, mofem/atom_tests/test_broken_space.cpp, mofem/tutorials/adv-0/plastic.cpp, mofem/tutorials/adv-0/src/PlasticOpsMonitor.hpp, mofem/tutorials/adv-2/thermo_elastic.cpp, mofem/tutorials/adv-3/level_set.cpp, mofem/tutorials/adv-4/dynamic_first_order_con_law.cpp, mofem/tutorials/adv-5/seepage.cpp, mofem/tutorials/clx-0/helmholtz.cpp, mofem/tutorials/cor-0to1/src/UnsaturatedFlow.hpp, mofem/tutorials/cor-10/navier_stokes.cpp, mofem/tutorials/cor-2to5/src/PoissonOperators.hpp, mofem/tutorials/cor-6/simple_elasticity.cpp, mofem/tutorials/cor-7/elasticity_mixed_formulation.cpp, mofem/tutorials/cor-9/reaction_diffusion.cpp, mofem/tutorials/fun-2/plot_base.cpp, mofem/tutorials/max-0/src/MagneticElement.hpp, mofem/tutorials/mix-0/mixed_poisson.cpp, mofem/tutorials/mix-1/phase.cpp, mofem/tutorials/scl-0/approximaton.cpp, mofem/tutorials/scl-1/poisson_2d_homogeneous.cpp, mofem/tutorials/scl-10/initial_diffusion.cpp, mofem/tutorials/scl-10/photon_diffusion.cpp, mofem/tutorials/scl-11/poisson_2d_dis_galerkin.cpp, mofem/tutorials/scl-12/electrostatics.cpp, mofem/tutorials/scl-6/heat_equation.cpp, mofem/tutorials/scl-7/wave_equation.cpp, mofem/tutorials/scl-8/radiation.cpp, mofem/tutorials/scl-9/heat_method.cpp, mofem/tutorials/vec-1/eigen_elastic.cpp, mofem/tutorials/vec-2/src/NonlinearElasticExample.hpp, mofem/tutorials/vec-3/nonlinear_dynamic_elastic.cpp, mofem/tutorials/vec-4/approx_sphere.cpp, mofem/tutorials/vec-4/shallow_wave.cpp, mofem/tutorials/vec-5/free_surface.cpp, mofem/tutorials/vec-6/plate.cpp, mofem/tutorials/vec-7/adjoint.cpp, mofem/tutorials/vec-9/src/ArcLengthExample.hpp, and mofem/users_modules/eshelbian_plasticity/src/impl/EshelbianPlasticity.cpp.

Definition at line 29 of file photon_diffusion.cpp.

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