TPM_HICFFT Module

Uses

- iso_c_binding
- GROWING_ALLOCATOR_MOD
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.

Interfaces

public interface EXECUTE_DIR_FFT

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

Arguments

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

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

Arguments

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

public interface EXECUTE_INV_FFT

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

Arguments

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

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

Arguments

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

interface

public subroutine CLEAN_FFT(RESOL_ID) bind(C, NAME="clean_fft")

Arguments

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