part3d Derived Type

type, public :: part3d

Inherits

Inherited by

Components

Type	Visibility	Attributes		Name		Initial
class(spect3d),	public,	pointer	::	sp	=>	null()
class(perrors),	public,	pointer	::	err	=>	null()
class(parallel_pipe),	public,	pointer	::	p	=>	null()
real,	private		::	qbm
real,	private		::	dt
real,	private		::	ci
integer,	private		::	npmax
integer,	private		::	nbmax
integer,	private		::	xdim
integer,	private		::	npp	=	0
real,	private,	dimension(:,:), pointer	::	part	=>	null()
real,	private,	dimension(:,:), pointer	::	pbuff	=>	null()

Type-Bound Procedures

generic, public :: new => init_part3d

private subroutine init_part3d(this, pp, perr, psp, pf, fd, qbm, dt, ci, xdim)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(parallel_pipe),	intent(in),		pointer	::	pp
class(perrors),	intent(in),		pointer	::	perr
class(spect3d),	intent(in),		pointer	::	psp
class(fdist3d),	intent(inout)			::	pf
class(ufield3d),	intent(in),		pointer	::	fd
real,	intent(in)			::	qbm
real,	intent(in)			::	dt
real,	intent(in)			::	ci
integer,	intent(in)			::	xdim

generic, public :: del => end_part3d

private subroutine end_part3d(this)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(inout) :: this

generic, public :: push => partpush

private subroutine partpush(this, ef, bf, dex, dez)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(ufield3d),	intent(in),		pointer	::	ef
class(ufield3d),	intent(in),		pointer	::	bf
real,	intent(in)			::	dex
real,	intent(in)			::	dez

generic, public :: pmv => pmove

private subroutine pmove(this, fd, rtag, stag, sid)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(ufield3d),	intent(in),		pointer	::	fd
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	sid

generic, public :: qdp => qdeposit

private subroutine qdeposit(this, q)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(in) :: this

class(ufield3d), intent(in), pointer :: q

generic, public :: wr => writehdf5_part3d

private subroutine writehdf5_part3d(this, file, dspl, delta, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(hdf5file),	intent(in)			::	file
integer,	intent(in)			::	dspl
real,	intent(in),		dimension(3)	::	delta
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

generic, public :: wrst => writerst_part3d

private subroutine writerst_part3d(this, file)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(inout) :: this

class(hdf5file), intent(in) :: file

generic, public :: rrst => readrst_part3d

private subroutine readrst_part3d(this, file)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(inout) :: this

class(hdf5file), intent(in) :: file

procedure, private :: init_part3d

private subroutine init_part3d(this, pp, perr, psp, pf, fd, qbm, dt, ci, xdim)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(parallel_pipe),	intent(in),		pointer	::	pp
class(perrors),	intent(in),		pointer	::	perr
class(spect3d),	intent(in),		pointer	::	psp
class(fdist3d),	intent(inout)			::	pf
class(ufield3d),	intent(in),		pointer	::	fd
real,	intent(in)			::	qbm
real,	intent(in)			::	dt
real,	intent(in)			::	ci
integer,	intent(in)			::	xdim

procedure, private :: end_part3d

private subroutine end_part3d(this)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(inout) :: this

procedure, private :: partpush

private subroutine partpush(this, ef, bf, dex, dez)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(ufield3d),	intent(in),		pointer	::	ef
class(ufield3d),	intent(in),		pointer	::	bf
real,	intent(in)			::	dex
real,	intent(in)			::	dez

procedure, private :: pmove

private subroutine pmove(this, fd, rtag, stag, sid)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(ufield3d),	intent(in),		pointer	::	fd
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	sid

procedure, private :: writehdf5_part3d

private subroutine writehdf5_part3d(this, file, dspl, delta, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(part3d),	intent(inout)			::	this
class(hdf5file),	intent(in)			::	file
integer,	intent(in)			::	dspl
real,	intent(in),		dimension(3)	::	delta
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

procedure, private :: qdeposit

private subroutine qdeposit(this, q)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(in) :: this

class(ufield3d), intent(in), pointer :: q

procedure, private :: readrst_part3d

private subroutine readrst_part3d(this, file)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(inout) :: this

class(hdf5file), intent(in) :: file

procedure, private :: writerst_part3d

private subroutine writerst_part3d(this, file)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(inout) :: this

class(hdf5file), intent(in) :: file

procedure, public :: getnpp

private function getnpp(this)

Arguments

Type Intent Optional Attributes Name

class(part3d), intent(in) :: this

Return Value integer