fpois2d Derived Type

type, public :: fpois2d

Inherits

Inherited by

Components

Type	Visibility	Attributes		Name		Initial
class(spect2d),	public,	pointer	::	sp	=>	null()
class(perrors),	public,	pointer	::	err	=>	null()
class(parallel_pipe),	public,	pointer	::	p	=>	null()
integer,	private,	dimension(2)	::	nd
real,	private,	dimension(2)	::	a
real,	private		::	anorm
complex,	private,	dimension(:,:), pointer	::	ffc	=>	null()
real,	private,	dimension(:,:,:), pointer	::	ffg	=>	null()

Type-Bound Procedures

generic, public :: new => init_fpois2d

private subroutine init_fpois2d(this, pp, perr, psp, nx, ny, ax, ay, affp)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(inout)			::	this
class(parallel_pipe),	intent(in),		pointer	::	pp
class(perrors),	intent(in),		pointer	::	perr
class(spect2d),	intent(in),		pointer	::	psp
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
real,	intent(in)			::	ax
real,	intent(in)			::	ay
real,	intent(in)			::	affp

generic, public :: del => end_fpois2d

private subroutine end_fpois2d(this)

Arguments

Type Intent Optional Attributes Name

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

generic, public :: potential => ipotd2

private subroutine ipotd2(this, q, fx, we)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	q
class(ufield2d),	intent(inout)			::	fx
real,	intent(inout)			::	we

generic, public :: smoothf => ismoothfd2

private subroutine ismoothfd2(this, f, fs)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	f
class(ufield2d),	intent(inout)			::	fs

generic, public :: elfield => ippoisd23

private subroutine ippoisd23(this, q, fxy, we)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	q
class(ufield2d),	intent(inout)			::	fxy
real,	intent(inout)			::	we

generic, public :: bfield => ibfieldd2

private subroutine ibfieldd2(this, cu, bxy, ci, wm)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	cu
class(ufield2d),	intent(inout)			::	bxy
real,	intent(in)			::	ci
real,	intent(inout)			::	wm

generic, public :: bfield_qp => jpbpoisd23n_qp

private subroutine jpbpoisd23n_qp(this, cu, dcu, amu, bxy, ci, c, dex, wm)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	cu
class(ufield2d),	intent(inout)			::	dcu
class(ufield2d),	intent(inout)			::	amu
class(ufield2d),	intent(inout)			::	bxy
real,	intent(in)			::	ci
real,	intent(in)			::	c
real,	intent(in)			::	dex
real,	intent(inout)			::	wm

procedure, private :: init_fpois2d

private subroutine init_fpois2d(this, pp, perr, psp, nx, ny, ax, ay, affp)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(inout)			::	this
class(parallel_pipe),	intent(in),		pointer	::	pp
class(perrors),	intent(in),		pointer	::	perr
class(spect2d),	intent(in),		pointer	::	psp
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
real,	intent(in)			::	ax
real,	intent(in)			::	ay
real,	intent(in)			::	affp

procedure, private :: end_fpois2d

private subroutine end_fpois2d(this)

Arguments

Type Intent Optional Attributes Name

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

procedure, private :: ibfieldd2

private subroutine ibfieldd2(this, cu, bxy, ci, wm)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	cu
class(ufield2d),	intent(inout)			::	bxy
real,	intent(in)			::	ci
real,	intent(inout)			::	wm

procedure, private :: ippoisd23

private subroutine ippoisd23(this, q, fxy, we)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	q
class(ufield2d),	intent(inout)			::	fxy
real,	intent(inout)			::	we

procedure, private :: ismoothfd2

private subroutine ismoothfd2(this, f, fs)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	f
class(ufield2d),	intent(inout)			::	fs

procedure, private :: ipotd2

private subroutine ipotd2(this, q, fx, we)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	q
class(ufield2d),	intent(inout)			::	fx
real,	intent(inout)			::	we

procedure, private :: jpbpoisd23n_qp

private subroutine jpbpoisd23n_qp(this, cu, dcu, amu, bxy, ci, c, dex, wm)

Arguments

Type	Intent	Optional	Attributes		Name
class(fpois2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	cu
class(ufield2d),	intent(inout)			::	dcu
class(ufield2d),	intent(inout)			::	amu
class(ufield2d),	intent(inout)			::	bxy
real,	intent(in)			::	ci
real,	intent(in)			::	c
real,	intent(in)			::	dex
real,	intent(inout)			::	wm