#include <vcl.h>

#include "Unit1.h"
#include "math.h"
#include "fixed_math.hpp"
#define MAXBITS 15

static  float invGain1;
static  float atanTable[MAXBITS];
static  float gain1Cordic();


void initCordic()
{
    /* must call this first to initialise

#include "Unit1.h"
#include "math.h"
#include "fixed_math.hpp"
#define

void cordic(x,y,fz);

long    constbl[CBIT];

/* CORDIC m=1, y-->0 */

void cordic(long *x, long *y, long *z)
{

        int i;
        long xx, yy, zz;

#include "Unit1.h"
#include "math.h"
#include "fixed_math.hpp"
#include "algorithm.h"
#define MBIT 0x4000
#define CBIT 16

long    constbl[CBIT];

void __fastcall TForm1::Button1Click(TObject *Sender)
{

        AnsiString buf;


        int i;
        long lx,ly, lz;