mus_init_nernst_planck Subroutine

private subroutine mus_init_nernst_planck(me, tree, fac, field, iField, state, neigh, nElems, nSize, iLevel, nernstPlanck)

Initialize nernst planck from and .\n Equilibirium pdf (fEq) is calculated from and .

Arguments

TypeIntentOptionalAttributesName
type(mus_scheme_type), intent(in) :: me

Scheme type

type(treelmesh_type), intent(in) :: tree

tree type

type(mus_convertFac_type), intent(in) :: fac

Global parameters

type(mus_field_type), intent(inout) :: field

Field type

integer, intent(in) :: iField

Field index

real(kind=rk), intent(inout) :: state(:)

PDF

integer, intent(in) :: neigh(:)

Connectivity array

integer, intent(in) :: nElems

Number of local elements

integer, intent(in) :: nSize

number of elements as size

integer, intent(in) :: iLevel

Level index

type(mus_nernstPlanck_type), intent(in) :: nernstPlanck

Contins solvent information


Calls

proc~~mus_init_nernst_planck~~CallsGraph proc~mus_init_nernst_planck mus_init_nernst_planck interface~tem_spatial_for tem_spatial_for proc~mus_init_nernst_planck->interface~tem_spatial_for proc~tem_baryofid tem_BaryOfId proc~mus_init_nernst_planck->proc~tem_baryofid

Called by

proc~~mus_init_nernst_planck~~CalledByGraph proc~mus_init_nernst_planck mus_init_nernst_planck proc~mus_init_byic mus_init_byIC proc~mus_init_byic->proc~mus_init_nernst_planck proc~mus_init_flow mus_init_flow proc~mus_init_flow->proc~mus_init_byic proc~mus_initialize mus_initialize proc~mus_initialize->proc~mus_init_flow program~musubi musubi program~musubi->proc~mus_initialize

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iDir
integer, private :: iElem
real(kind=rk), private, allocatable:: moleDens(:)
real(kind=rk), private, allocatable:: xc(:,:)
real(kind=rk), private, allocatable:: vel(:,:)
integer, private :: iChunk
integer, private :: nChunks
integer, private :: chunkSize
integer, private :: nChunkElems
integer, private :: elemOff
integer, private :: elemPos
integer, private :: QQ
integer, private :: offset
real(kind=rk), private :: inv_v
real(kind=rk), private :: ucx
integer, private :: nScalars