/*
	This C language subroutine computes an 8-point
	floating point complex (forward or inverse)
	Fast Fourier Transform (FFT) of its input.

	The Run Time Library for the C Language.

	Gordon A. Sterling	(617) 461 - 3076
	DSP Development Tools Engineering

	Created on 6/24/90
	Updated on 5/94 by AS

	#include <trans.h>				    	<Header>
	float *cfft8(float real_out[], float imag_out[], \  	<Prototype>
		     float real_in[], float imag_in[]);	    	<Prototype>
	float *ifft8(float real_out[], float imag_out[], \ 	<Prototype>
		     float real_in[], float imag_in[]);	    	<Prototype>
*/

#include "lib_glob.h"
#include "trn_glob.h"

.SEGMENT/CODE	Code_Space_Name;
.FILE	RTL_FILENAME;


.EXTERN		____cfftcore, ____ifftcore;
.EXTERN		____rfftcore, ____xcfftcore, ____xrfftcore;

.GLOBAL		_ifft8;
.GLOBAL		_cfft8, _rfft8;

_ifft8:		JUMP (PC, ____ifftcore) (DB);	/*Jump to core routine*/
		dm_ptr=8;			/*Pass length of fft*/
		dm_lnt=twids;		/*Point to twiddle factors*/

_cfft8:		JUMP (PC, ____cfftcore) (DB);	/*Jump to core forward fft*/
		dm_ptr=8;			/*Pass length of fft*/
		dm_lnt=twids;		/*Point to twiddle factos*/

_rfft8:         JUMP (PC, ____rfftcore) (DB); /*Jump to core forward fft*/
                dm_ptr=8;                   /*Pass length of fft*/
                dm_lnt=twids;               /*Point to twiddle factos*/

.ENDSEG;

.SEGMENT/PMDATA	PMData_Space_Name;

#include    "t8.h"

.ENDSEG;