The fourier function computes the Fourier transform (F(w)) of expr (f(t)) with respect to t, using the definition

Expressions involving complex exponentials, polynomials, trigonometrics (sin, cos) and a variety of functions and other integral transforms can be transformed.

The fourier function recognizes derivatives (diff or Diff) and integrals (int or Int).

Users can add their own functions to fourier's internal lookup table with the function inttrans[addtable].

fourier  recognizes the Dirac-delta (or unit-impulse) function as Dirac(t) and Heaviside's unit step function as Heaviside(t).

The program first attempts to classify the function simply, from the lookup table.  Then it considers various cases, including a piecewise decomposition, products, powers, sums, and rational polynomials.  Finally, if all other methods fail, the program will resort to integration.  If the option opt is set to 'NO_INT', then the program will not integrate. This will increase the speed at which the transform will run.

The command with(inttrans,fourier) allows the use of the abbreviated form of this command.

For information on computing Fourier transforms on signal data, see Fourier Transforms in Maple.

with(inttrans):

assume(a>0):

fourier(3/(a^2 + t^2),t,w);

$\frac{3\mathrm{\pi }\left(\mathrm{Heaviside}\left(-w\right){\ⅇ}^{\mathrm{a~}w}+{\ⅇ}^{-\mathrm{a~}w}\mathrm{Heaviside}\left(w\right)\right)}{\mathrm{a~}}$

fourier(diff(f(x),x$4),x,w);

$w^4?$

F:= int(g(x)*h(t-x),x=-infinity..infinity):

fourier(3*F,t,w);

$3??$

fourier(t*exp(-3*t)*Heaviside(t),t,w);

$\frac{1}{{\left(3+\mathrm{I}w\right)}^2}$

fourier(1/(4 - I*t)^(1/3),t,2+w);

$\frac{\sqrt{3}\mathrm{\Gamma }\left(\frac{2}{3}\right){\ⅇ}^{-8-4w}\mathrm{Heaviside}\left(2+w\right)}{{\left(2+w\right)}^{\raisebox{1ex}{$2$}\!\left/ \!\raisebox{-1ex}{$3$}\right.}}$

fourier(diff(y(t), t$2)-y(t)=sin(a*t), t, s);

fourier(BesselJ(0,4*(t^2 + 1)^(1/2)), t, s);

$\frac{8{\ⅇ}^{\mathrm{I}s}\cos \left(s^2-16\right)\left(\mathrm{Heaviside}\left(s+4\right)-\mathrm{Heaviside}\left(s-4\right)\right)}{\sqrt{-s^2+16}}$

addtable(fourier,myfunc(t),Myfunc(s)/(1+s^2),t,s):

fourier(exp(3*I*t)*myfunc(2*t),t,w);

$\frac{2\mathrm{Myfunc}\left(\frac{w}{2}-\frac{3}{2}\right)}{w^2-6w+13}$

The inttrans[fourier] command was updated in Maple 2019.