This version of the IMSL_INTFCN function computes Fourier sine or cosine transforms. To use this integration method, supply the Omega argument and one of the following keywords: SINE, or COSINE.

This routine requires an IDL Advanced Math and Stats license. For more information, contact your sales or technical support representative.

This method is a special-purpose integrator that uses a globally adaptive scheme to reduce the absolute error. It computes integrals whose integrands have the special form w (x) f (x), where w (x) is either cos (wx) or sin (wx). The integration interval is always semi-infinite of the form [a, infinity]. This method is based on the subroutine QAWF by Piessens et al. (1983).

If this method is used, the function should be coded to protect endpoint singularities if they exist.

Example

The value of:

is computed. Notice that the function is coded to protect for the singularity at zero.

.RUN
; Define the function to be integrated.
FUNCTION f, x
  IF (x EQ 0) THEN RETURN, x $
    ELSE RETURN, 1/SQRT(x)
END
ans = IMSL_INTFCN('f', 0, !Pi/2, /Cosine)
 
; Call IMSL_INTFCN with keyword Cosine set and a value 
; for the method specific parameter omega.
PM, 'Computed Answer:', ans

IDL prints:

Computed Answer:
  1.00000
  exact = 1.0
 
PM, 'Exact - Computed:', exact - ans

IDL prints:

Exact - Computed:
  -1.19209e-007

Errors

See IMSL_INTFCN Errors.

Syntax

Result = IMSL_INTFCN(F, A, Omega, /SINE | /COSINE [, MAX_MOMENTS=value] [, N_CYCLES=variable])

Return Value

The value of:

where the weight function w (ωx) is defined by the keywords below, is returned. If no value can be computed, the floating-point value NaN (Not a Number) is returned.

Arguments

F

A scalar string specifying the name of a user-supplied function to be integrated. The function f accepts one scalar parameter and returns a single scalar of the same type.

A

A scalar expression specifying the lower limit of integration.

Omega

A scalar expression specifying the frequency of the trigonometric weighting function.

Keywords

In addition to the global IMSL_INTFCN keywords, the following keywords are available:

SINE (optional)

Set this keyword to use sin (ωx) for the integration weight function. If SINE is supplied, COSINE must not be present.

COSINE (optional)

Set this keyword to use cos (ωx) for the integration weight function. IF COSINE is supplied, SINE must not be present.

MAX_MOMENTS (optional)

Set this keyword equal to a scalar expression specifying an upper bound on the number of Chebyshev moments that can be stored. Increasing (decreasing) this number may increase (decrease) execution speed and space used. The default is 21.

N_CYCLES (optional)

Set this keyword equal to a named variable that will contain the number of cycles.

Version History

6.4

Introduced

See Also

IMSL_INTFCN