cannam@127: <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> cannam@127: <html> cannam@127: <!-- This manual is for FFTW cannam@127: (version 3.3.5, 30 July 2016). cannam@127: cannam@127: Copyright (C) 2003 Matteo Frigo. cannam@127: cannam@127: Copyright (C) 2003 Massachusetts Institute of Technology. cannam@127: cannam@127: Permission is granted to make and distribute verbatim copies of this cannam@127: manual provided the copyright notice and this permission notice are cannam@127: preserved on all copies. cannam@127: cannam@127: Permission is granted to copy and distribute modified versions of this cannam@127: manual under the conditions for verbatim copying, provided that the cannam@127: entire resulting derived work is distributed under the terms of a cannam@127: permission notice identical to this one. cannam@127: cannam@127: Permission is granted to copy and distribute translations of this manual cannam@127: into another language, under the above conditions for modified versions, cannam@127: except that this permission notice may be stated in a translation cannam@127: approved by the Free Software Foundation. --> cannam@127: <!-- Created by GNU Texinfo 5.2, http://www.gnu.org/software/texinfo/ --> cannam@127: <head> cannam@127: <title>FFTW 3.3.5: FFTW Constants in Fortran</title> cannam@127: cannam@127: <meta name="description" content="FFTW 3.3.5: FFTW Constants in Fortran"> cannam@127: <meta name="keywords" content="FFTW 3.3.5: FFTW Constants in Fortran"> cannam@127: <meta name="resource-type" content="document"> cannam@127: <meta name="distribution" content="global"> cannam@127: <meta name="Generator" content="makeinfo"> cannam@127: <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> cannam@127: <link href="index.html#Top" rel="start" title="Top"> cannam@127: <link href="Concept-Index.html#Concept-Index" rel="index" title="Concept Index"> cannam@127: <link href="index.html#SEC_Contents" rel="contents" title="Table of Contents"> cannam@127: <link href="Calling-FFTW-from-Legacy-Fortran.html#Calling-FFTW-from-Legacy-Fortran" rel="up" title="Calling FFTW from Legacy Fortran"> cannam@127: <link href="FFTW-Execution-in-Fortran.html#FFTW-Execution-in-Fortran" rel="next" title="FFTW Execution in Fortran"> cannam@127: <link href="Fortran_002dinterface-routines.html#Fortran_002dinterface-routines" rel="prev" title="Fortran-interface routines"> cannam@127: <style type="text/css"> cannam@127: <!-- cannam@127: a.summary-letter {text-decoration: none} cannam@127: blockquote.smallquotation {font-size: smaller} cannam@127: div.display {margin-left: 3.2em} cannam@127: div.example {margin-left: 3.2em} cannam@127: div.indentedblock {margin-left: 3.2em} cannam@127: div.lisp {margin-left: 3.2em} cannam@127: div.smalldisplay {margin-left: 3.2em} cannam@127: div.smallexample {margin-left: 3.2em} cannam@127: div.smallindentedblock {margin-left: 3.2em; font-size: smaller} cannam@127: div.smalllisp {margin-left: 3.2em} cannam@127: kbd {font-style:oblique} cannam@127: pre.display {font-family: inherit} cannam@127: pre.format {font-family: inherit} cannam@127: pre.menu-comment {font-family: serif} cannam@127: pre.menu-preformatted {font-family: serif} cannam@127: pre.smalldisplay {font-family: inherit; font-size: smaller} cannam@127: pre.smallexample {font-size: smaller} cannam@127: pre.smallformat {font-family: inherit; font-size: smaller} cannam@127: pre.smalllisp {font-size: smaller} cannam@127: span.nocodebreak {white-space:nowrap} cannam@127: span.nolinebreak {white-space:nowrap} cannam@127: span.roman {font-family:serif; font-weight:normal} cannam@127: span.sansserif {font-family:sans-serif; font-weight:normal} cannam@127: ul.no-bullet {list-style: none} cannam@127: --> cannam@127: </style> cannam@127: cannam@127: cannam@127: </head> cannam@127: cannam@127: <body lang="en" bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#800080" alink="#FF0000"> cannam@127: <a name="FFTW-Constants-in-Fortran"></a> cannam@127: <div class="header"> cannam@127: <p> cannam@127: Next: <a href="FFTW-Execution-in-Fortran.html#FFTW-Execution-in-Fortran" accesskey="n" rel="next">FFTW Execution in Fortran</a>, Previous: <a href="Fortran_002dinterface-routines.html#Fortran_002dinterface-routines" accesskey="p" rel="prev">Fortran-interface routines</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: </div> cannam@127: <hr> cannam@127: <a name="FFTW-Constants-in-Fortran-1"></a> cannam@127: <h3 class="section">8.2 FFTW Constants in Fortran</h3> cannam@127: cannam@127: <p>When creating plans in FFTW, a number of constants are used to specify cannam@127: options, such as <code>FFTW_MEASURE</code> or <code>FFTW_ESTIMATE</code>. The cannam@127: same constants must be used with the wrapper routines, but of course the cannam@127: C header files where the constants are defined can’t be incorporated cannam@127: directly into Fortran code. cannam@127: </p> cannam@127: <p>Instead, we have placed Fortran equivalents of the FFTW constant cannam@127: definitions in the file <code>fftw3.f</code>, which can be found in the same cannam@127: directory as <code>fftw3.h</code>. If your Fortran compiler supports a cannam@127: preprocessor of some sort, you should be able to <code>include</code> or cannam@127: <code>#include</code> this file; otherwise, you can paste it directly into cannam@127: your code. cannam@127: </p> cannam@127: <a name="index-flags-9"></a> cannam@127: <p>In C, you combine different flags (like <code>FFTW_PRESERVE_INPUT</code> and cannam@127: <code>FFTW_MEASURE</code>) using the ‘<samp><code>|</code></samp>’ operator; in Fortran cannam@127: you should just use ‘<samp><code>+</code></samp>’. (Take care not to add in the cannam@127: same flag more than once, though. Alternatively, you can use the cannam@127: <code>ior</code> intrinsic function standardized in Fortran 95.) cannam@127: </p> cannam@127: cannam@127: cannam@127: cannam@127: </body> cannam@127: </html>