compute_physFlux_nonConst Subroutine

  1. atl_modg_maxwell_kernel_module.f90
  2. atl_modg_maxwell_kernel_module
  3. compute_physFlux_nonConst

private subroutine compute_physFlux_nonConst(nDofs, nScalars, nElems, state_der, state, rot, material, poly_proj, modalCoeffs, nodalPhysFlux, iElem)

Compute the physical flux in x direction.

For other directions a properly defined variable permutation can be used. This routine covers non-constant material parameters.

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: nDofs

dimensions
integer, intent(in) :: nScalars

dimensions
integer, intent(in) :: nElems

Number of elements.
real(kind=rk), intent(inout) :: state_der(nDofs,nScalars)

Array to store the fluxes in.
real(kind=rk), intent(in) :: state(nDofs,nScalars)

State to compute the fluxes from.
integer, intent(in) :: rot(6)

Rotationing to index the variables.
real(kind=rk), intent(in) :: material(nElems,nDofs,2)

Material parameters (mu, epsilon) for all elements
type(ply_poly_project_type) :: poly_proj

Data for projection method
real(kind=rk), intent(inout) :: modalCoeffs(poly_proj%body_3D%oversamp_dofs,size(state,2),1)

Working array for modal coefficients of the current element in the loop.
real(kind=rk), intent(inout) :: nodalPhysFlux(poly_proj%body_3D%nquadpoints,size(state,2),2)

Working array for nodal representation of the physical flux along the 3 spatial directions.
integer, intent(in) :: iElem

Current element index

Calls

proc~~compute_physflux_nonconst~~CallsGraph proc~compute_physflux_nonconst compute_physFlux_nonConst interface~ply_poly_project_n2m ply_poly_project_n2m proc~compute_physflux_nonconst->interface~ply_poly_project_n2m interface~ply_poly_project_m2n ply_poly_project_m2n proc~compute_physflux_nonconst->interface~ply_poly_project_m2n proc~ply_convert2oversample ply_convert2oversample proc~compute_physflux_nonconst->proc~ply_convert2oversample proc~atl_physfluxmaxwell atl_physFluxMaxwell proc~compute_physflux_nonconst->proc~atl_physfluxmaxwell proc~ply_convertfromoversample ply_convertFromOversample proc~compute_physflux_nonconst->proc~ply_convertfromoversample proc~ply_poly_project_n2m_multivar ply_poly_project_n2m_multiVar interface~ply_poly_project_n2m->proc~ply_poly_project_n2m_multivar proc~ply_poly_project_m2n_multivar ply_poly_project_m2n_multiVar interface~ply_poly_project_m2n->proc~ply_poly_project_m2n_multivar proc~ply_convert2oversample_2d ply_convert2oversample_2d proc~ply_convert2oversample->proc~ply_convert2oversample_2d proc~ply_convert2oversample_3d ply_convert2oversample_3d proc~ply_convert2oversample->proc~ply_convert2oversample_3d proc~ply_convert2oversample_1d ply_convert2oversample_1d proc~ply_convert2oversample->proc~ply_convert2oversample_1d proc~ply_convertfromoversample_3d ply_convertFromOversample_3d proc~ply_convertfromoversample->proc~ply_convertfromoversample_3d proc~ply_convertfromoversample_1d ply_convertFromOversample_1d proc~ply_convertfromoversample->proc~ply_convertfromoversample_1d proc~ply_convertfromoversample_2d ply_convertFromOversample_2d proc~ply_convertfromoversample->proc~ply_convertfromoversample_2d proc~ply_fxt_n2m_1d ply_fxt_n2m_1D proc~ply_poly_project_n2m_multivar->proc~ply_fxt_n2m_1d interface~ply_pnttoleg_2d ply_pntToLeg_2D proc~ply_poly_project_n2m_multivar->interface~ply_pnttoleg_2d proc~ply_l2p_trafo_2d ply_l2p_trafo_2D proc~ply_poly_project_n2m_multivar->proc~ply_l2p_trafo_2d proc~ply_fxt_n2m_3d ply_fxt_n2m_3D proc~ply_poly_project_n2m_multivar->proc~ply_fxt_n2m_3d proc~ply_fxt_n2m_2d ply_fxt_n2m_2D proc~ply_poly_project_n2m_multivar->proc~ply_fxt_n2m_2d proc~ply_l2p_trafo_1d ply_l2p_trafo_1D proc~ply_poly_project_n2m_multivar->proc~ply_l2p_trafo_1d proc~ply_l2p_trafo_3d ply_l2p_trafo_3D proc~ply_poly_project_n2m_multivar->proc~ply_l2p_trafo_3d interface~ply_pnttoleg_3d ply_pntToLeg_3D proc~ply_poly_project_n2m_multivar->interface~ply_pnttoleg_3d proc~ply_fxt_m2n_3d ply_fxt_m2n_3D proc~ply_poly_project_m2n_multivar->proc~ply_fxt_m2n_3d interface~ply_legtopnt_2d ply_legToPnt_2D proc~ply_poly_project_m2n_multivar->interface~ply_legtopnt_2d proc~ply_fxt_m2n_1d ply_fxt_m2n_1D proc~ply_poly_project_m2n_multivar->proc~ply_fxt_m2n_1d proc~ply_poly_project_m2n_multivar->proc~ply_l2p_trafo_2d proc~ply_fxt_m2n_2d ply_fxt_m2n_2D proc~ply_poly_project_m2n_multivar->proc~ply_fxt_m2n_2d proc~ply_poly_project_m2n_multivar->proc~ply_l2p_trafo_1d proc~ply_poly_project_m2n_multivar->proc~ply_l2p_trafo_3d interface~ply_legtopnt_3d ply_LegTopnt_3D proc~ply_poly_project_m2n_multivar->interface~ply_legtopnt_3d

Called by

proc~~compute_physflux_nonconst~~CalledByGraph proc~compute_physflux_nonconst compute_physFlux_nonConst proc~atl_modg_maxwell_physflux_nonconst atl_modg_maxwell_physFlux_NonConst proc~atl_modg_maxwell_physflux_nonconst->proc~compute_physflux_nonconst

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iPoint
integer, private :: nquadpoints