fftw3_mkl.f 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  1. !===============================================================================
  2. ! Copyright 2005-2022 Intel Corporation.
  3. !
  4. ! This software and the related documents are Intel copyrighted materials, and
  5. ! your use of them is governed by the express license under which they were
  6. ! provided to you (License). Unless the License provides otherwise, you may not
  7. ! use, modify, copy, publish, distribute, disclose or transmit this software or
  8. ! the related documents without Intel's prior written permission.
  9. !
  10. ! This software and the related documents are provided as is, with no express
  11. ! or implied warranties, other than those that are expressly stated in the
  12. ! License.
  13. !===============================================================================
  14. !
  15. ! Additional constants for use with FFTW3 Fortran wrappers to
  16. ! Intel(R) oneAPI Math Kernel Library (Intel(R) oneMKL)
  17. !
  18. !*****************************************************************************
  19. INTEGER MKL_RODFT00
  20. PARAMETER (MKL_RODFT00=413)
  21. INTEGER MKL_MAXRANK
  22. PARAMETER (MKL_MAXRANK=7)
  23. external dfftw_plan_dft
  24. external dfftw_plan_dft_1d
  25. external dfftw_plan_dft_2d
  26. external dfftw_plan_dft_3d
  27. external dfftw_plan_dft_c2r
  28. external dfftw_plan_dft_c2r_1d
  29. external dfftw_plan_dft_c2r_2d
  30. external dfftw_plan_dft_c2r_3d
  31. external dfftw_plan_dft_r2c
  32. external dfftw_plan_dft_r2c_1d
  33. external dfftw_plan_dft_r2c_2d
  34. external dfftw_plan_dft_r2c_3d
  35. external dfftw_plan_guru_dft
  36. external dfftw_plan_guru_dft_r2c
  37. external dfftw_plan_guru_dft_c2r
  38. external dfftw_plan_guru_split_dft
  39. external dfftw_plan_guru_split_dft_c2r
  40. external dfftw_plan_guru_split_dft_r2c
  41. external dfftw_plan_many_dft
  42. external dfftw_plan_many_dft_r2c
  43. external dfftw_plan_many_dft_c2r
  44. external dfftw_plan_r2r
  45. external dfftw_plan_r2r_1d
  46. external dfftw_plan_r2r_2d
  47. external dfftw_plan_r2r_3d
  48. external dfftw_execute
  49. external dfftw_execute_dft
  50. external dfftw_execute_dft_c2r
  51. external dfftw_execute_dft_r2c
  52. external dfftw_execute_split_dft
  53. external dfftw_execute_split_dft_r2c
  54. external dfftw_execute_split_dft_c2r
  55. external dfftw_destroy_plan
  56. external sfftw_plan_dft
  57. external sfftw_plan_dft_1d
  58. external sfftw_plan_dft_2d
  59. external sfftw_plan_dft_3d
  60. external sfftw_plan_dft_c2r
  61. external sfftw_plan_dft_c2r_1d
  62. external sfftw_plan_dft_c2r_2d
  63. external sfftw_plan_dft_c2r_3d
  64. external sfftw_plan_dft_r2c
  65. external sfftw_plan_dft_r2c_1d
  66. external sfftw_plan_dft_r2c_2d
  67. external sfftw_plan_dft_r2c_3d
  68. external sfftw_plan_guru_dft
  69. external sfftw_plan_guru_dft_r2c
  70. external sfftw_plan_guru_dft_c2r
  71. external sfftw_plan_guru_split_dft
  72. external sfftw_plan_guru_split_dft_c2r
  73. external sfftw_plan_guru_split_dft_r2c
  74. external sfftw_plan_many_dft
  75. external sfftw_plan_many_dft_r2c
  76. external sfftw_plan_many_dft_c2r
  77. external sfftw_plan_r2r
  78. external sfftw_plan_r2r_1d
  79. external sfftw_plan_r2r_2d
  80. external sfftw_plan_r2r_3d
  81. external sfftw_execute
  82. external sfftw_execute_dft
  83. external sfftw_execute_dft_c2r
  84. external sfftw_execute_dft_r2c
  85. external sfftw_execute_split_dft
  86. external sfftw_execute_split_dft_r2c
  87. external sfftw_execute_split_dft_c2r
  88. external sfftw_destroy_plan