TPM_HICFFT Module

Uses

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Variables

Type	Visibility	Attributes		Name		Initial
type(HICFFT_TYPE),	public,	ALLOCATABLE, TARGET	::	HICFFT_RESOL(:)
type(HICFFT_TYPE),	public,	POINTER	::	HICT

Interfaces

public interface EXECUTE_DIR_FFT

private subroutine EXECUTE_DIR_FFT_FLOAT(PREEL_REAL, PREEL_COMPLEX, KFIELD, LOENS, OFFSETS, ALLOC)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=C_FLOAT),	intent(in)			::	PREEL_REAL(:)
real(kind=C_FLOAT),	intent(out)			::	PREEL_COMPLEX(:)
integer(kind=JPIM),	intent(in)			::	KFIELD
integer(kind=JPIM),	intent(in)			::	LOENS(:)
integer(kind=JPIM),	intent(in)			::	OFFSETS(:)
type(GROWING_ALLOCATION_TYPE),	intent(in)			::	ALLOC

private subroutine EXECUTE_DIR_FFT_DOUBLE(PREEL_REAL, PREEL_COMPLEX, KFIELD, LOENS, OFFSETS, ALLOC)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=C_DOUBLE),	intent(in)			::	PREEL_REAL(:)
real(kind=C_DOUBLE),	intent(out)			::	PREEL_COMPLEX(:)
integer(kind=JPIM),	intent(in)			::	KFIELD
integer(kind=JPIM),	intent(in)			::	LOENS(:)
integer(kind=JPIM),	intent(in)			::	OFFSETS(:)
type(GROWING_ALLOCATION_TYPE),	intent(in)			::	ALLOC

public interface EXECUTE_INV_FFT

private subroutine EXECUTE_INV_FFT_FLOAT(PREEL_COMPLEX, PREEL_REAL, KFIELD, LOENS, OFFSETS, ALLOC)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=C_FLOAT),	intent(in)			::	PREEL_COMPLEX(:)
real(kind=C_FLOAT),	intent(out)			::	PREEL_REAL(:)
integer(kind=JPIM),	intent(in)			::	KFIELD
integer(kind=JPIM),	intent(in)			::	LOENS(:)
integer(kind=JPIM),	intent(in)			::	OFFSETS(:)
type(GROWING_ALLOCATION_TYPE),	intent(in)			::	ALLOC

private subroutine EXECUTE_INV_FFT_DOUBLE(PREEL_COMPLEX, PREEL_REAL, KFIELD, LOENS, OFFSETS, ALLOC)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=C_DOUBLE),	intent(in)			::	PREEL_COMPLEX(:)
real(kind=C_DOUBLE),	intent(out)			::	PREEL_REAL(:)
integer(kind=JPIM),	intent(in)			::	KFIELD
integer(kind=JPIM),	intent(in)			::	LOENS(:)
integer(kind=JPIM),	intent(in)			::	OFFSETS(:)
type(GROWING_ALLOCATION_TYPE),	intent(in)			::	ALLOC

Subroutines

public subroutine INIT_PLANS_FFT(KDLON)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=C_INT),	intent(in)			::	KDLON

public subroutine CREATE_PLAN_FFT(KPLAN, KTYPE, KN, KLOT, KSTRIDE)

$OMP CRITICAL $OMP END CRITICAL

Arguments

Type	Intent	Optional	Attributes		Name
type(C_PTR),	intent(out)			::	KPLAN
integer(kind=C_INT),	intent(in)			::	KTYPE
integer(kind=C_INT),	intent(in)			::	KN
integer(kind=C_INT),	intent(in)			::	KLOT
integer(kind=C_INT),	intent(in)			::	KSTRIDE

public subroutine DESTROY_PLAN_FFT(KPLAN)

Arguments

Type	Intent	Optional	Attributes		Name
type(C_PTR),	intent(in)			::	KPLAN

public subroutine DESTROY_ALL_PLANS_FFT()

Arguments

None

public subroutine EXECUTE_PLAN_FFT(KN, N, X_IN, X_OUT, PLAN_PTR)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=C_INT)				::	KN
integer(kind=C_INT)				::	N
real(kind=JPRBT),			TARGET	::	X_IN
real(kind=JPRBT),			TARGET	::	X_OUT
type(C_PTR)				::	PLAN_PTR