1 FOURIER
        FOURIER

    This task computes the (complex) Fourier  transform  of  a   (real)   2D
    image.   It  does  not request the number of pixels to be powers of two,
    but the algorithm is of course much faster if they are.
2 Y_NAME$
        TASK\FILE "Input image" Y_NAME$

    The name of the input image.  This should be a 2D real image.
2 X_NAME$
        TASK\FILE "Output complex fourier transform" X_NAME$

    The name of the output image.  This will be 3D with the first  dimension
    equal to 2, and corresponding to the REAL-IMAGINARY axis.
2 SIGNE$
        TASK\INTEGER "Direct (+1) or inverse (-1) transform" SIGNE$

    +1 for direct transform, -1 for inverse transform.
2 RECENTER$
TASK\LOGICAL "Do you want to recenter the Fourier transform?" RECENTER$

    YES or NO whether you want TF recentering or not.
1 END










































