diffusion_prep Subroutine

public pure subroutine diffusion_prep(isp, x, lambda, betacoeff, ns, T, A, B, C, D, E, Tn, Teinf)

COMPUTE COEFFICIENTS IN DIFFUSION EQUATIONS AND LOAD UP GHOST CELLS

Note: done on a per species basis. This is never called over the full grid

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: isp
type(curvmesh), intent(in) :: x
real(kind=wp), intent(in), dimension(:,:,:):: lambda
real(kind=wp), intent(in), dimension(:,:,:):: betacoeff
real(kind=wp), intent(in), dimension(-1:,-1:,-1:):: ns
real(kind=wp), intent(inout), dimension(-1:,-1:,-1:):: T
real(kind=wp), intent(out), dimension(1:size(ns,1)-4,1:size(ns,2)-4,1:size(ns,3)-4):: A
real(kind=wp), intent(out), dimension(1:size(ns,1)-4,1:size(ns,2)-4,1:size(ns,3)-4):: B
real(kind=wp), intent(out), dimension(1:size(ns,1)-4,1:size(ns,2)-4,1:size(ns,3)-4):: C
real(kind=wp), intent(out), dimension(1:size(ns,1)-4,1:size(ns,2)-4,1:size(ns,3)-4):: D
real(kind=wp), intent(out), dimension(1:size(ns,1)-4,1:size(ns,2)-4,1:size(ns,3)-4):: E
real(kind=wp), intent(in), dimension(:,:,:):: Tn
real(kind=wp), intent(in) :: Teinf

Contents

None