field3d Derived Type

type, public :: field3d

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()
class(ufield3d),	private,	pointer	::	rs	=>	null()
integer,	private		::	gcells

Type-Bound Procedures

generic, public :: new => init_field3d

private subroutine init_field3d(this, pp, perr, psp, dim)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(parallel_pipe),	intent(in),		pointer	::	pp
class(perrors),	intent(in),		pointer	::	perr
class(spect3d),	intent(in),		pointer	::	psp
integer,	intent(in)			::	dim

generic, public :: del => end_field3d

private subroutine end_field3d(this)

Arguments

Type Intent Optional Attributes Name

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

generic, public :: pcg => pipecg_field3d

private subroutine pipecg_field3d(this, rtag, stag, rid, sid)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	rid
integer,	intent(inout)			::	sid

generic, public :: ag => acopyguard_field3d

private subroutine acopyguard_field3d(this, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

generic, public :: wr => writehdf5_3d, writehdf5_2dslice

private subroutine writehdf5_3d(this, file, dim, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(hdf5file),	intent(in)			::	file
integer,	intent(in)			::	dim
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

private subroutine writehdf5_2dslice(this, file, dim, slice, spos, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(hdf5file),	intent(in)			::	file
integer,	intent(in)			::	dim
integer,	intent(in)			::	slice
integer,	intent(in)			::	spos
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

generic, public :: as => asc, asa

private subroutine asc(this, value)

Arguments

Type Intent Optional Attributes Name

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

real, intent(in) :: value
private subroutine asa(this, that)

Arguments

Type Intent Optional Attributes Name

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

class(field3d), intent(inout) :: that

generic, public :: add => sum

private subroutine sum(this, a1, a2)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(field3d),	intent(in)			::	a1
class(field3d),	intent(in)			::	a2

generic, public :: sub => minus

private subroutine minus(this, a1, a2)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(field3d),	intent(in)			::	a1
class(field3d),	intent(in)			::	a2

generic, public :: mult => multiply

private subroutine multiply(this, a1, value)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(field3d),	intent(in)			::	a1
real,	intent(in)			::	value

procedure, private :: init_field3d

private subroutine init_field3d(this, pp, perr, psp, dim)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(parallel_pipe),	intent(in),		pointer	::	pp
class(perrors),	intent(in),		pointer	::	perr
class(spect3d),	intent(in),		pointer	::	psp
integer,	intent(in)			::	dim

procedure, private :: end_field3d

private subroutine end_field3d(this)

Arguments

Type Intent Optional Attributes Name

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

procedure, private :: acopyguard_field3d

private subroutine acopyguard_field3d(this, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

procedure, private :: pipecg_field3d

private subroutine pipecg_field3d(this, rtag, stag, rid, sid)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	rid
integer,	intent(inout)			::	sid

procedure, private :: writehdf5_2dslice

private subroutine writehdf5_2dslice(this, file, dim, slice, spos, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(hdf5file),	intent(in)			::	file
integer,	intent(in)			::	dim
integer,	intent(in)			::	slice
integer,	intent(in)			::	spos
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

procedure, private :: writehdf5_3d

private subroutine writehdf5_3d(this, file, dim, rtag, stag, id)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(hdf5file),	intent(in)			::	file
integer,	intent(in)			::	dim
integer,	intent(in)			::	rtag
integer,	intent(in)			::	stag
integer,	intent(inout)			::	id

procedure, private :: multiply

private subroutine multiply(this, a1, value)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(field3d),	intent(in)			::	a1
real,	intent(in)			::	value

procedure, private :: minus

private subroutine minus(this, a1, a2)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(field3d),	intent(in)			::	a1
class(field3d),	intent(in)			::	a2

procedure, private :: sum

private subroutine sum(this, a1, a2)

Arguments

Type	Intent	Optional	Attributes		Name
class(field3d),	intent(inout)			::	this
class(field3d),	intent(in)			::	a1
class(field3d),	intent(in)			::	a2

procedure, private :: asa

private subroutine asa(this, that)

Arguments

Type Intent Optional Attributes Name

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

class(field3d), intent(inout) :: that

procedure, private :: asc

private subroutine asc(this, value)

Arguments

Type Intent Optional Attributes Name

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

real, intent(in) :: value

procedure, public :: getrs

private function getrs(this)

Arguments

Type Intent Optional Attributes Name

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

Return Value class(ufield3d), pointer

procedure, public :: getgcells

private function getgcells(this)

Arguments

Type Intent Optional Attributes Name

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

Return Value integer