typedef anon?1 1;

typedef unsigned int streamsize;

typedef struct _GdkVisual GdkVisual;

typedef struct _GtkTooltips GtkTooltips;

typedef struct _GSList GSList;

typedef struct _GdkGLContext GdkGLContext;

typedef struct _GdkGLPixmap GdkGLPixmap;

typedef struct _GtkGLArea GtkGLArea;

typedef struct _GtkGLAreaClass GtkGLAreaClass;

typedef struct complex Cpx;

typedef struct orpol Opol;

unsigned short m_sgn = 0 x8000;

unsigned short m_exp = 0 x7fff;

short bias = 16383;

int itt_div = 2;

int k_tanh = 5;

int ms_exp = 21;

int ms_hyp = 25;

int ms_trg = 31;

short max_p = 16 * XDIM;

short k_lin = - 8 * XDIM;

short d_bias = 15360;

short d_max = 2047;

short d_lex = 12;

double hypot(double a,double b)

double erf(double x)

not in standard file

double erfc(double x)

not in standard file

int isnan(double x)

not in standard file

int isinf(double x)

not in standard file

long nrand48(unsigned short *)

double erand48(unsigned short *)

Single pass data operations

gint gdk_gl_query(void)

gchar * gdk_gl_get_info(void)

GdkVisual * gdk_gl_choose_visual(int * attrlist)

int gdk_gl_get_config(GdkVisual * visual,int attrib)

GdkGLContext * gdk_gl_context_new(GdkVisual * visual)

GdkGLContext * gdk_gl_context_share_new(GdkVisual * visual,GdkGLContext * sharelist,gint direct)

GdkGLContext * gdk_gl_context_attrlist_share_new(int * attrlist,GdkGLContext * sharelist,gint direct)

GdkGLContext * gdk_gl_context_ref(GdkGLContext * context)

void gdk_gl_context_unref(GdkGLContext * context)

gint gdk_gl_make_current(GdkDrawable * drawable,GdkGLContext * context)

void gdk_gl_swap_buffers(GdkDrawable * drawable)

void gdk_gl_wait_gdk(void)

void gdk_gl_wait_gl(void)

GdkGLPixmap * gdk_gl_pixmap_new(GdkVisual * visual,GdkPixmap * pixmap)

GdkGLPixmap * gdk_gl_pixmap_ref(GdkGLPixmap * glpixmap)

void gdk_gl_pixmap_unref(GdkGLPixmap * glpixmap)

gint gdk_gl_pixmap_make_current(GdkGLPixmap * glpixmap,GdkGLContext * context)

void gdk_gl_use_gdk_font(GdkFont * font,int first,int count,int list_base)

GtkType gtk_gl_area_get_type(void)

GtkWidget * gtk_gl_area_new(int * attrList)

GtkWidget * gtk_gl_area_share_new(int * attrList,GtkGLArea * share)

GtkWidget * gtk_gl_area_new_vargs(GtkGLArea * share,...)

gint gtk_gl_area_make_current(GtkGLArea * glarea)

gint gtk_gl_area_begingl(GtkGLArea * glarea)

void gtk_gl_area_endgl(GtkGLArea * glarea)

void gtk_gl_area_swapbuffers(GtkGLArea * glarea)

void gtk_gl_area_swap_buffers(GtkGLArea * glarea)

void gtk_gl_area_size(GtkGLArea * glarea,gint width,gint height)

void fmatprt(FILE * fp,double * a,int n,int m,char * fmt)

void house(double * a,double * d,double * ud,int n)

void housev(double * a,double * d,double * ud,int n)

int qreval(double * eval,double * ud,int n)

int qrevec(double * eval,double * evec,double * dp,int n)

int qrbdi(double * d,double * e,int n)

int qrbdv(double * d,double * e,double * u,int m,double * v,int n)

int qrbdu1(double * d,double * e,double * u,int m,double * v,int n)

void ldumat(double * a,double * u,int m,int n)

void ldvmat(double * a,double * v,int n)

void atou1(double * a,int m,int n)

void atovm(double * v,int n)

int cminv(Cpx * a,int n)

int csolv(Cpx * a,Cpx * b,int n)

void heigvec(Cpx * a,double * eval,int n)

void heigval(Cpx * a,double * eval,int n)

double hevmax(Cpx * a,Cpx * u,int n)

void cmmul(Cpx * c,Cpx * a,Cpx * b,int n)

void cmmult(Cpx * c,Cpx * a,Cpx * b,int m,int k,int n)

void cvmul(Cpx * vp,Cpx * mat,Cpx * v,int n)

Cpx cvnrm(Cpx * u,Cpx * v,int n)

void cmprt(Cpx * a,int n,int m,char * fmt)

void trncm(Cpx * a,int n)

void hconj(Cpx * u,int n)

void cmattr(Cpx * a,Cpx * b,int m,int n)

void utrncm(Cpx * at,Cpx * u,Cpx * a,int n)

void utrnhm(Cpx * ht,Cpx * u,Cpx * h0,int n)

void cmcpy(Cpx * a,Cpx * b,int n)

void unitary(Cpx * u,int n)

void hmgen(Cpx * h,double * eval,Cpx * u,int n)

void chouse(Cpx * a,double * d,double * ud,int n)

void chousv(Cpx * a,double * d,double * ud,int n)

void qrecvc(double * eval,Cpx * evec,double * ud,int n)

void crossp(double * h,double * u,double * v)

double dotp(double * u,double * v,int m)

double metpr(double * u,double * a,double * v,int n)

void scalv(double * r,double s,int n)

void trvec(double * c,double * a,double * b,int n)

double leng(double * a,double * b,int n)

void rotax(double * v,double az,double pa,double ang,int k)

void euler(double * pv,int m,double a,double b,double c)

void trgsas(double a,double g,double b,double * ans)

int trgasa(double a,double ss,double b,double * asn)

double trgarea(double a,double b,double c)

int trgsss(double a,double b,double c,double * ang)

int trgssa(double a,double b,double ba,double * an)

void stgsas(double a,double g,double b,double * ang)

int stgasa(double a,double c,double b,double * ang)

int stgsss(double a,double b,double c,double * ang)

int stgaaa(double a,double b,double c,double * ang)

double stgarea(double a,double b,double c)

void htgsas(double a,double g,double b,double * an)

int htgasa(double a,double cc,double b,double * ans)

int htgsss(double a,double b,double c,double * ang)

int htgaaa(double a,double b,double c,double * as)

double htgarea(double a,double b,double c)

double fintg(double a,double b,int n,double te,double (*func)() )

double chintg(double * a,int m,double (*func)() )

double fchb(double x,double * a,int m)

int deqsy(double * y,int n,double a,double b,int nd,double te,int (*fsys)() )

int optmiz(double * x,int n,double (*func)() ,double de,double test,int max)

double optsch(double (*func)() ,double a,double b,double test)

int plrt(double * cof,int n,struct complex * root,double ra,double rb)

struct complex polyc(struct complex z,double * cof,int n)

double secrt(double (*func)() ,double x,double dx,double test)

void chcof(double * c,int m,double (*func)(double) )

int qrbdbv(double * d,double * e,double * b,double * v,int n)

double seqlsq(double * x,double * y,int n,double * par,double * var,int m,double de,double (*func)(double,double *) ,int kf)

double gnlsq(double * x,double * y,int n,double * par,double * var,int m,double de,double (*func)(double,double *) )

double fitval(double x,double * s,double * par,double (*fun)(double,double *) ,double * v,int n)

void fft2(struct complex * ft,int m,int inv)

void fft2_d(struct complex * a,int m,int n,int f)

void fftgc(struct complex ** pc,struct complex * ft,int n,int * kk,int inv)

void fftgr(double * x,struct complex * ft,int n,int * kk,int inv)

void ftuns(struct complex ** pt,int n)

int pfac(int n,int * kk,int fe)

void pshuf(Cpx ** pa,Cpx ** pb,int * kk,int n)

int pwspec(double * x,int n,int m)

void smoo(double * x,int n,int m)

double * autcor(double * x,int n,int lag)

int * hist(double * x,int n,double xmin,double xmax,int kbin,double * bin)

unsigned int lran1()

void setlran1(unsigned int seed)

unsigned int lrand()

void setlrand(unsigned int seed)

int bran(int n)

void setbran(unsigned int seed)

int bran2(int n)

void setbran2(unsigned int seed)

double unfl()

void setunfl(unsigned int seed)

double unfl2()

void setunfl2(unsigned int seed)

double nrml()

void setnrml(unsigned int seed)

void norm(double * err)

void setnorm(unsigned int seed)

void norm2(double * err)

void setnorm2(unsigned int seed)

void sampl(void ** s,int n,void ** d,int m)

void shuffl(void ** s,int n)

unsigned int lrana(unsigned int s)

unsigned int lranb(unsigned int s)

int batdel(char * kin,struct tnode * hd)

struct tnode * batins(char * kin,struct tnode * hd)

struct tnode * btsearch(char * kin,struct tnode * hd)

void btsort(struct tnode * hd,struct tnode ** ar)

void prbtree(struct tnode * hd,int m)

int btdel(char * kin,struct tnode * hd)

struct tnode * btins(char * kin,struct tnode * hd)

struct tnode * tsearch(char * kin,struct tnode * hd)

void tsort(struct tnode * hd,struct tnode ** ar)

void prtree(struct tnode * hd,int m)

int hashdel(char * kin,struct tabl * harr[],int mh)

struct tabl * hashins(char * kin,struct tabl * harr[],int mh)

struct tabl * hfind(char * kin,struct tabl * harr[],int mh)

int hval(char * key,int mh)

struct llst * msort(struct llst * st,int dim,int (*comp)() )

void qsrt(void * v,int i,int j,int (*comp)() )

void hsort(void * v,int n,int (*comp)() )

void ssort(void * v,int n,int (*comp)() )

int dubcmp(double * x,double * y)

int intcmp(int * x,int * y)

int unicmp(unsigned * x,unsigned * y)

double qnorm(double x)

double pctn(double pc)

double qgama(double x,double a)

double pctg(double pc,double a)

double qbeta(double x,double a,double b)

double pctb(double pc,double a,double b)

double qgnc(double x,double a,double d)

double pctgn(double pc,double a,double d)

double qbnc(double x,double a,double b,double d)

double pctbn(double pc,double a,double b,double d)

double nome(double k,double * pk,double * pkp)

double amelp(double u,double k)

double theta(double u,int n)

void stheta(double k)

double felp(double an,double k,double * pk,double * pz,double * ph)

double gelp(double an,double k,double as,double bs,double ds,double * pg,double * pf,double * pk)

double g2elp(double an,double bn,double k,double as,double bs,double ds)

double jbes(double v,double x)

double ibes(double v,double x)

double kbes(double v,double x)

double nbes(double v,double x)

double drbes(double x,double v,int f,double * p)

double rcbes()

void setrcb(double u,double y,int fl,int dr,double * pf,double * ph)

double jspbes(int n,double x)

double kspbes(int n,double x)

double yspbes(int n,double x)

double drspbes(double x,int n,int f,double * p)

double rcspbs()

void setrcsb(int n,double y,int fl,int dr,double * pf,double * ph)

double airy(double x,int df)

double biry(double x,int df)

double gaml(double x)

double psi(int m)

double psih(double v)

double gsng(double * pa,double * pb,double * pc,double b,double an)

double gsng2(double * pa,double * pb,double * pc,double b,double an,double bn)

struct complex cmul(struct complex s,struct complex t)

struct complex cdiv(struct complex s,struct complex t)

struct complex cadd(struct complex s,struct complex t)

struct complex csub(struct complex s,struct complex t)

struct complex crmu(double a,struct complex z)

struct complex cimu(double b,struct complex z)

struct complex ccng(struct complex z)

struct complex cdef(double r,double i)

double cabs(struct complex c)

double cnrm(struct complex z)

struct complex cexp(struct complex z)

struct complex clog(struct complex z)

struct complex csinh(struct complex z)

struct complex ccosh(struct complex z)

struct complex ctanh(struct complex z)

struct complex casinh(struct complex z)

struct complex cacosh(struct complex z)

struct complex catanh(struct complex z)

struct complex casin(struct complex z)

struct complex cacos(struct complex z)

struct complex catan(struct complex z)

struct complex csqrt(struct complex z)

struct complex csin(struct complex z)

struct complex ccos(struct complex z)

struct complex ctan(struct complex z)

double sarma(double er)

void setsim(int k)

double parma(double * x,double * e)

double evfmod(struct fmod y)

void setevf(int k)

double drfmod(struct fmod y,double * dr)

void setdrf(int k)

double seqtsf(struct fmod * x,int n,double * var,int kf)

double fixtsf(struct fmod * x,int n,double * var,double * cr)

double evmod(double y)

void setev(int k)

double drmod(double y,double * dr)

void setdr(int k)

double seqts(double * x,int n,double * var,int kf)

double fixts(double * x,int n,double * var,double * cr)

int resid(double * x,int n,int lag,double ** pau,int nbin,double xa,double xb,int ** phs,int * cks)

int sany(double * x,int n,double * pm,double * cd,double * ci,int nd,int ms,int lag)

double sdiff(double y,int nd,int k)

double sintg(double y,int nd,int k)

double xmean(double * x,int n)

struct xpr xadd(struct xpr s,struct xpr t,int f)

struct xpr xmul(struct xpr s,struct xpr t)

struct xpr xdiv(struct xpr s,struct xpr t)

double xtodub(struct xpr s)

struct xpr dubtox(double y)

struct xpr inttox(int n)

int xprcmp(struct xpr * pa,struct xpr * pb)

struct xpr xneg(struct xpr s)

struct xpr xabs(struct xpr s)

int xex(struct xpr * ps)

int neg(struct xpr * ps)

struct xpr xfrex(struct xpr s,int * p)

struct xpr xfmod(struct xpr s,struct xpr t,int * p)

struct xpr xsqrt(struct xpr z)

struct xpr xexp(struct xpr z)

struct xpr xlog(struct xpr z)

struct xpr xpwr(struct xpr s,int n)

struct xpr xpr2(struct xpr s,int m)

struct xpr xtan(struct xpr z)

struct xpr xcos(struct xpr z)

struct xpr xsin(struct xpr z)

struct xpr xatan(struct xpr z)

struct xpr xasin(struct xpr z)

struct xpr xacos(struct xpr z)

struct xpr xtanh(struct xpr z)

struct xpr xsinh(struct xpr z)

struct xpr xcosh(struct xpr z)

struct xpr atox(char * s)

void prxpr(struct xpr u,int lim)

void xprint(struct xpr x)

void xchcof(struct xpr * cf,int m,struct xpr (*xfunc)() )

struct xpr xevtch(struct xpr z,struct xpr * a,int m)

struct xpr sfmod(struct xpr s,int * p)

void lshift(int n,unsigned short * pm,int m)

void rshift(int n,unsigned short * pm,int m)

unsigned short bset(unsigned short x,unsigned short n)

int bget(unsigned short x,unsigned short n)

int bcnt(unsigned short x)

unsigned int lbset(unsigned int x,int n)

int lbget(unsigned int x,int n)

int lbcnt(unsigned int x)

void bitpc(unsigned char x)

void bitps(unsigned short x)

void bitpl(unsigned int x)

void bitpf(float x)

void bitpd(double x)

void bpatx(struct xpr x)

double pwr(double y,int n)