fdist3d_000 Derived Type

  1. fdist3d_class.f03
  2. fdist3d_class
  3. fdist3d_000

type, public, extends(fdist3d) :: fdist3d_000


Inherits

type~~fdist3d_000~~InheritsGraph type~fdist3d_000 fdist3d_000 type~fdist3d fdist3d type~fdist3d_000->type~fdist3d type~parallel_pipe parallel_pipe type~fdist3d->type~parallel_pipe p type~perrors perrors type~fdist3d->type~perrors err type~spect3d spect3d type~fdist3d->type~spect3d sp type~parallel parallel type~parallel_pipe->type~parallel type~perrors->type~parallel p type~spect2d spect2d type~spect3d->type~spect2d type~spect2d->type~parallel_pipe p type~spect2d->type~perrors err

Contents

Variables

Type-Bound Procedures


Components

TypeVisibility AttributesNameInitial
class(spect3d), public, pointer:: sp=> null()
class(perrors), public, pointer:: err=> null()
class(parallel_pipe), public, pointer:: p=> null()
integer, private :: npx
integer, private :: npy
integer, private :: npz
real, private :: qm
real, private :: sigx
real, private :: sigy
real, private :: sigz
real, private :: bcx
real, private :: bcy
real, private :: bcz
real, private :: sigvx
real, private :: sigvy
real, private :: sigvz
real, private :: cx1
real, private :: cx2
real, private :: cx3
real, private :: cy1
real, private :: cy2
real, private :: cy3
real, private :: gamma
real, private :: np
logical, private :: quiet

Type-Bound Procedures

generic, public :: new => init_fdist3d

  • private subroutine init_fdist3d_000(this, input, i)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d_000), intent(inout) :: this
    type(input_json), intent(inout), pointer:: input
    integer, intent(in) :: i

generic, public :: del => end_fdist3d

  • private subroutine end_fdist3d(this)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d), intent(inout) :: this

generic, public :: dist => dist3d

  • private subroutine dist3d_000(this, part3d, npp, fd)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d_000), intent(inout) :: this
    real, intent(inout), dimension(:,:), pointer:: part3d
    integer, intent(inout) :: npp
    class(ufield3d), intent(in), pointer:: fd

procedure, public :: getnpmax

  • private function getnpmax(this)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d), intent(in) :: this

    Return Value integer

procedure, public :: getnpf

  • private function getnpf(this)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d), intent(in) :: this

    Return Value integer

procedure, private :: init_fdist3d => init_fdist3d_000

  • private subroutine init_fdist3d_000(this, input, i)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d_000), intent(inout) :: this
    type(input_json), intent(inout), pointer:: input
    integer, intent(in) :: i

procedure, private :: dist3d => dist3d_000

  • private subroutine dist3d_000(this, part3d, npp, fd)

    Arguments

    Type IntentOptional AttributesName
    class(fdist3d_000), intent(inout) :: this
    real, intent(inout), dimension(:,:), pointer:: part3d
    integer, intent(inout) :: npp
    class(ufield3d), intent(in), pointer:: fd