fft2d Derived Type

type, public :: fft2d

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)	::	ind
integer,	private		::	nrc
integer,	private,	dimension(:), pointer	::	mixup
complex,	private,	dimension(:), pointer	::	sct

Type-Bound Procedures

generic, public :: new => init_fft2d

private subroutine init_fft2d(this, pp, perr, psp, indx, indy, nrc)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	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)			::	indx
integer,	intent(in)			::	indy
integer,	intent(in)			::	nrc

generic, public :: del => end_fft2d

private subroutine end_fft2d(this)

Arguments

Type Intent Optional Attributes Name

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

generic, public :: fsst => iwpfsst2r

private subroutine iwpfsst2r(this, rspace, krspace, isign)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	rspace
class(ufield2d),	intent(inout)			::	krspace
integer,	intent(in)			::	isign

generic, public :: fcct => iwpfcct2r

private subroutine iwpfcct2r(this, rspace, krspace, isign)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	rspace
class(ufield2d),	intent(inout)			::	krspace
integer,	intent(in)			::	isign

generic, public :: fs3t => iwpfs3t2r

private subroutine iwpfs3t2r(this, rspace, krspace, isign)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	rspace
class(ufield2d),	intent(inout)			::	krspace
integer,	intent(in)			::	isign

generic, public :: divf => ipdivfd2

private subroutine ipdivfd2(this, krspace, kdspace)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	krspace
class(ufield2d),	intent(inout)			::	kdspace

generic, public :: gradf => ipgradfd2

private subroutine ipgradfd2(this, krspace, kdspace)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	krspace
class(ufield2d),	intent(inout)			::	kdspace

generic, public :: curlf => ipcurlfd2

private subroutine ipcurlfd2(this, krspace, kdspace)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	krspace
class(ufield2d),	intent(inout)			::	kdspace

procedure, private :: init_fft2d

private subroutine init_fft2d(this, pp, perr, psp, indx, indy, nrc)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	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)			::	indx
integer,	intent(in)			::	indy
integer,	intent(in)			::	nrc

procedure, private :: end_fft2d

private subroutine end_fft2d(this)

Arguments

Type Intent Optional Attributes Name

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

procedure, private :: iwpfs3t2r

private subroutine iwpfs3t2r(this, rspace, krspace, isign)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	rspace
class(ufield2d),	intent(inout)			::	krspace
integer,	intent(in)			::	isign

procedure, private :: iwpfcct2r

private subroutine iwpfcct2r(this, rspace, krspace, isign)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	rspace
class(ufield2d),	intent(inout)			::	krspace
integer,	intent(in)			::	isign

procedure, private :: iwpfsst2r

private subroutine iwpfsst2r(this, rspace, krspace, isign)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	rspace
class(ufield2d),	intent(inout)			::	krspace
integer,	intent(in)			::	isign

procedure, private :: ipcurlfd2

private subroutine ipcurlfd2(this, krspace, kdspace)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	krspace
class(ufield2d),	intent(inout)			::	kdspace

procedure, private :: ipgradfd2

private subroutine ipgradfd2(this, krspace, kdspace)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	krspace
class(ufield2d),	intent(inout)			::	kdspace

procedure, private :: ipdivfd2

private subroutine ipdivfd2(this, krspace, kdspace)

Arguments

Type	Intent	Optional	Attributes		Name
class(fft2d),	intent(in)			::	this
class(ufield2d),	intent(inout)			::	krspace
class(ufield2d),	intent(inout)			::	kdspace