| cannam@127 | 1 <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> | 
| cannam@127 | 2 <html> | 
| cannam@127 | 3 <!-- This manual is for FFTW | 
| cannam@127 | 4 (version 3.3.5, 30 July 2016). | 
| cannam@127 | 5 | 
| cannam@127 | 6 Copyright (C) 2003 Matteo Frigo. | 
| cannam@127 | 7 | 
| cannam@127 | 8 Copyright (C) 2003 Massachusetts Institute of Technology. | 
| cannam@127 | 9 | 
| cannam@127 | 10 Permission is granted to make and distribute verbatim copies of this | 
| cannam@127 | 11 manual provided the copyright notice and this permission notice are | 
| cannam@127 | 12 preserved on all copies. | 
| cannam@127 | 13 | 
| cannam@127 | 14 Permission is granted to copy and distribute modified versions of this | 
| cannam@127 | 15 manual under the conditions for verbatim copying, provided that the | 
| cannam@127 | 16 entire resulting derived work is distributed under the terms of a | 
| cannam@127 | 17 permission notice identical to this one. | 
| cannam@127 | 18 | 
| cannam@127 | 19 Permission is granted to copy and distribute translations of this manual | 
| cannam@127 | 20 into another language, under the above conditions for modified versions, | 
| cannam@127 | 21 except that this permission notice may be stated in a translation | 
| cannam@127 | 22 approved by the Free Software Foundation. --> | 
| cannam@127 | 23 <!-- Created by GNU Texinfo 5.2, http://www.gnu.org/software/texinfo/ --> | 
| cannam@127 | 24 <head> | 
| cannam@127 | 25 <title>FFTW 3.3.5: FFTW Execution in Fortran</title> | 
| cannam@127 | 26 | 
| cannam@127 | 27 <meta name="description" content="FFTW 3.3.5: FFTW Execution in Fortran"> | 
| cannam@127 | 28 <meta name="keywords" content="FFTW 3.3.5: FFTW Execution in Fortran"> | 
| cannam@127 | 29 <meta name="resource-type" content="document"> | 
| cannam@127 | 30 <meta name="distribution" content="global"> | 
| cannam@127 | 31 <meta name="Generator" content="makeinfo"> | 
| cannam@127 | 32 <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> | 
| cannam@127 | 33 <link href="index.html#Top" rel="start" title="Top"> | 
| cannam@127 | 34 <link href="Concept-Index.html#Concept-Index" rel="index" title="Concept Index"> | 
| cannam@127 | 35 <link href="index.html#SEC_Contents" rel="contents" title="Table of Contents"> | 
| cannam@127 | 36 <link href="Calling-FFTW-from-Legacy-Fortran.html#Calling-FFTW-from-Legacy-Fortran" rel="up" title="Calling FFTW from Legacy Fortran"> | 
| cannam@127 | 37 <link href="Fortran-Examples.html#Fortran-Examples" rel="next" title="Fortran Examples"> | 
| cannam@127 | 38 <link href="FFTW-Constants-in-Fortran.html#FFTW-Constants-in-Fortran" rel="prev" title="FFTW Constants in Fortran"> | 
| cannam@127 | 39 <style type="text/css"> | 
| cannam@127 | 40 <!-- | 
| cannam@127 | 41 a.summary-letter {text-decoration: none} | 
| cannam@127 | 42 blockquote.smallquotation {font-size: smaller} | 
| cannam@127 | 43 div.display {margin-left: 3.2em} | 
| cannam@127 | 44 div.example {margin-left: 3.2em} | 
| cannam@127 | 45 div.indentedblock {margin-left: 3.2em} | 
| cannam@127 | 46 div.lisp {margin-left: 3.2em} | 
| cannam@127 | 47 div.smalldisplay {margin-left: 3.2em} | 
| cannam@127 | 48 div.smallexample {margin-left: 3.2em} | 
| cannam@127 | 49 div.smallindentedblock {margin-left: 3.2em; font-size: smaller} | 
| cannam@127 | 50 div.smalllisp {margin-left: 3.2em} | 
| cannam@127 | 51 kbd {font-style:oblique} | 
| cannam@127 | 52 pre.display {font-family: inherit} | 
| cannam@127 | 53 pre.format {font-family: inherit} | 
| cannam@127 | 54 pre.menu-comment {font-family: serif} | 
| cannam@127 | 55 pre.menu-preformatted {font-family: serif} | 
| cannam@127 | 56 pre.smalldisplay {font-family: inherit; font-size: smaller} | 
| cannam@127 | 57 pre.smallexample {font-size: smaller} | 
| cannam@127 | 58 pre.smallformat {font-family: inherit; font-size: smaller} | 
| cannam@127 | 59 pre.smalllisp {font-size: smaller} | 
| cannam@127 | 60 span.nocodebreak {white-space:nowrap} | 
| cannam@127 | 61 span.nolinebreak {white-space:nowrap} | 
| cannam@127 | 62 span.roman {font-family:serif; font-weight:normal} | 
| cannam@127 | 63 span.sansserif {font-family:sans-serif; font-weight:normal} | 
| cannam@127 | 64 ul.no-bullet {list-style: none} | 
| cannam@127 | 65 --> | 
| cannam@127 | 66 </style> | 
| cannam@127 | 67 | 
| cannam@127 | 68 | 
| cannam@127 | 69 </head> | 
| cannam@127 | 70 | 
| cannam@127 | 71 <body lang="en" bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#800080" alink="#FF0000"> | 
| cannam@127 | 72 <a name="FFTW-Execution-in-Fortran"></a> | 
| cannam@127 | 73 <div class="header"> | 
| cannam@127 | 74 <p> | 
| cannam@127 | 75 Next: <a href="Fortran-Examples.html#Fortran-Examples" accesskey="n" rel="next">Fortran Examples</a>, Previous: <a href="FFTW-Constants-in-Fortran.html#FFTW-Constants-in-Fortran" accesskey="p" rel="prev">FFTW Constants in Fortran</a>, Up: <a href="Calling-FFTW-from-Legacy-Fortran.html#Calling-FFTW-from-Legacy-Fortran" accesskey="u" rel="up">Calling FFTW from Legacy Fortran</a>   [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Concept-Index.html#Concept-Index" title="Index" rel="index">Index</a>]</p> | 
| cannam@127 | 76 </div> | 
| cannam@127 | 77 <hr> | 
| cannam@127 | 78 <a name="FFTW-Execution-in-Fortran-1"></a> | 
| cannam@127 | 79 <h3 class="section">8.3 FFTW Execution in Fortran</h3> | 
| cannam@127 | 80 | 
| cannam@127 | 81 <p>In C, in order to use a plan, one normally calls <code>fftw_execute</code>, | 
| cannam@127 | 82 which executes the plan to perform the transform on the input/output | 
| cannam@127 | 83 arrays passed when the plan was created (see <a href="Using-Plans.html#Using-Plans">Using Plans</a>).  The | 
| cannam@127 | 84 corresponding subroutine call in legacy Fortran is: | 
| cannam@127 | 85 </p><div class="example"> | 
| cannam@127 | 86 <pre class="example">        call dfftw_execute(plan) | 
| cannam@127 | 87 </pre></div> | 
| cannam@127 | 88 <a name="index-dfftw_005fexecute"></a> | 
| cannam@127 | 89 | 
| cannam@127 | 90 <p>However, we have had reports that this causes problems with some | 
| cannam@127 | 91 recent optimizing Fortran compilers.  The problem is, because the | 
| cannam@127 | 92 input/output arrays are not passed as explicit arguments to | 
| cannam@127 | 93 <code>dfftw_execute</code>, the semantics of Fortran (unlike C) allow the | 
| cannam@127 | 94 compiler to assume that the input/output arrays are not changed by | 
| cannam@127 | 95 <code>dfftw_execute</code>.  As a consequence, certain compilers end up | 
| cannam@127 | 96 optimizing out or repositioning the call to <code>dfftw_execute</code>, | 
| cannam@127 | 97 assuming incorrectly that it does nothing. | 
| cannam@127 | 98 </p> | 
| cannam@127 | 99 <p>There are various workarounds to this, but the safest and simplest | 
| cannam@127 | 100 thing is to not use <code>dfftw_execute</code> in Fortran.  Instead, use the | 
| cannam@127 | 101 functions described in <a href="New_002darray-Execute-Functions.html#New_002darray-Execute-Functions">New-array Execute Functions</a>, which take | 
| cannam@127 | 102 the input/output arrays as explicit arguments.  For example, if the | 
| cannam@127 | 103 plan is for a complex-data DFT and was created for the arrays | 
| cannam@127 | 104 <code>in</code> and <code>out</code>, you would do: | 
| cannam@127 | 105 </p><div class="example"> | 
| cannam@127 | 106 <pre class="example">        call dfftw_execute_dft(plan, in, out) | 
| cannam@127 | 107 </pre></div> | 
| cannam@127 | 108 <a name="index-dfftw_005fexecute_005fdft"></a> | 
| cannam@127 | 109 | 
| cannam@127 | 110 <p>There are a few things to be careful of, however: | 
| cannam@127 | 111 </p> | 
| cannam@127 | 112 <ul> | 
| cannam@127 | 113 <li> You must use the correct type of execute function, matching the way | 
| cannam@127 | 114 the plan was created.  Complex DFT plans should use | 
| cannam@127 | 115 <code>dfftw_execute_dft</code>, Real-input (r2c) DFT plans should use use | 
| cannam@127 | 116 <code>dfftw_execute_dft_r2c</code>, and real-output (c2r) DFT plans should | 
| cannam@127 | 117 use <code>dfftw_execute_dft_c2r</code>.  The various r2r plans should use | 
| cannam@127 | 118 <code>dfftw_execute_r2r</code>. | 
| cannam@127 | 119 | 
| cannam@127 | 120 </li><li> You should normally pass the same input/output arrays that were used when | 
| cannam@127 | 121 creating the plan.  This is always safe. | 
| cannam@127 | 122 | 
| cannam@127 | 123 </li><li> <em>If</em> you pass <em>different</em> input/output arrays compared to | 
| cannam@127 | 124 those used when creating the plan, you must abide by all the | 
| cannam@127 | 125 restrictions of the new-array execute functions (see <a href="New_002darray-Execute-Functions.html#New_002darray-Execute-Functions">New-array Execute Functions</a>).  The most difficult of these, in Fortran, is the | 
| cannam@127 | 126 requirement that the new arrays have the same alignment as the | 
| cannam@127 | 127 original arrays, because there seems to be no way in legacy Fortran to obtain | 
| cannam@127 | 128 guaranteed-aligned arrays (analogous to <code>fftw_malloc</code> in C).  You | 
| cannam@127 | 129 can, of course, use the <code>FFTW_UNALIGNED</code> flag when creating the | 
| cannam@127 | 130 plan, in which case the plan does not depend on the alignment, but | 
| cannam@127 | 131 this may sacrifice substantial performance on architectures (like x86) | 
| cannam@127 | 132 with SIMD instructions (see <a href="SIMD-alignment-and-fftw_005fmalloc.html#SIMD-alignment-and-fftw_005fmalloc">SIMD alignment and fftw_malloc</a>). | 
| cannam@127 | 133 <a name="index-FFTW_005fUNALIGNED-3"></a> | 
| cannam@127 | 134 | 
| cannam@127 | 135 </li></ul> | 
| cannam@127 | 136 | 
| cannam@127 | 137 <hr> | 
| cannam@127 | 138 <div class="header"> | 
| cannam@127 | 139 <p> | 
| cannam@127 | 140 Next: <a href="Fortran-Examples.html#Fortran-Examples" accesskey="n" rel="next">Fortran Examples</a>, Previous: <a href="FFTW-Constants-in-Fortran.html#FFTW-Constants-in-Fortran" accesskey="p" rel="prev">FFTW Constants in Fortran</a>, Up: <a href="Calling-FFTW-from-Legacy-Fortran.html#Calling-FFTW-from-Legacy-Fortran" accesskey="u" rel="up">Calling FFTW from Legacy Fortran</a>   [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Concept-Index.html#Concept-Index" title="Index" rel="index">Index</a>]</p> | 
| cannam@127 | 141 </div> | 
| cannam@127 | 142 | 
| cannam@127 | 143 | 
| cannam@127 | 144 | 
| cannam@127 | 145 </body> | 
| cannam@127 | 146 </html> |