Developer Reference for Intel® oneAPI Math Kernel Library for Fortran
A newer version of this document is available. Customers should click here to go to the newest version.
Trigonometric Transform Implementation Details
Several aspects of the Intel® oneAPI Math Kernel Library (oneMKL) TT interface are platform-specific and language-specific. To promote portability across platforms and ease of use across different languages, Intel® oneAPI Math Kernel Library (oneMKL) provides you with the TT language-specific header file to include in your code:
mkl_trig_transforms.f90, to be used together with mkl_dfti.f90.
- Use of the Intel® oneAPI Math Kernel Library (oneMKL) TT software without including the above language-specific header files is not supported.
Intel® oneAPI Math Kernel Library (oneMKL) TT interface supports Fortran versions starting with Fortran 90.
Header File
The header file defines the following function prototypes:
SUBROUTINE D_INIT_TRIG_TRANSFORM(n, tt_type, ipar, dpar, stat)
INTEGER, INTENT(IN) :: n, tt_type
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(8), INTENT(INOUT) :: dpar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE D_INIT_TRIG_TRANSFORM
SUBROUTINE D_COMMIT_TRIG_TRANSFORM(f, handle, ipar, dpar, stat)
REAL(8), INTENT(INOUT) :: f(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(8), INTENT(INOUT) :: dpar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE D_COMMIT_TRIG_TRANSFORM
SUBROUTINE D_FORWARD_TRIG_TRANSFORM(f, handle, ipar, dpar, stat)
REAL(8), INTENT(INOUT) :: f(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(8), INTENT(INOUT) :: dpar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE D_FORWARD_TRIG_TRANSFORM
SUBROUTINE D_BACKWARD_TRIG_TRANSFORM(f, handle, ipar, dpar, stat)
REAL(8), INTENT(INOUT) :: f(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(8), INTENT(INOUT) :: dpar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE D_BACKWARD_TRIG_TRANSFORM
SUBROUTINE S_INIT_TRIG_TRANSFORM(n, tt_type, ipar, spar, stat)
INTEGER, INTENT(IN) :: n, tt_type
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(4), INTENT(INOUT) :: spar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE S_INIT_TRIG_TRANSFORM
SUBROUTINE S_COMMIT_TRIG_TRANSFORM(f, handle, ipar, spar, stat)
REAL(4), INTENT(INOUT) :: f(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(4), INTENT(INOUT) :: spar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE S_COMMIT_TRIG_TRANSFORM
SUBROUTINE S_FORWARD_TRIG_TRANSFORM(f, handle, ipar, spar, stat)
REAL(4), INTENT(INOUT) :: f(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(4), INTENT(INOUT) :: spar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE S_FORWARD_TRIG_TRANSFORM
SUBROUTINE S_BACKWARD_TRIG_TRANSFORM(f, handle, ipar, spar, stat)
REAL(4), INTENT(INOUT) :: f(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(INOUT) :: ipar(*)
REAL(4), INTENT(INOUT) :: spar(*)
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE S_BACKWARD_TRIG_TRANSFORM
SUBROUTINE FREE_TRIG_TRANSFORM(handle, ipar, stat)
INTEGER, INTENT(INOUT) :: ipar(*)
TYPE(DFTI_DESCRIPTOR), POINTER :: handle
INTEGER, INTENT(OUT) :: stat
END SUBROUTINE FREE_TRIG_TRANSFORM
Fortran specifics of the TT routines usage are similar for all Intel® oneAPI Math Kernel Library (oneMKL) PDE support tools and described in Calling PDE Support Routines from Fortran.