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
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
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 |