1991-02-19 13:53:04 +00:00
|
|
|
/*
|
|
|
|
* (c) copyright 1989 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
|
|
* See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
|
|
*/
|
1994-06-24 11:31:16 +00:00
|
|
|
/* $Id$ */
|
1991-02-19 13:53:04 +00:00
|
|
|
|
2006-07-19 14:09:05 +00:00
|
|
|
#include "flt_arith.h"
|
1991-02-19 13:53:04 +00:00
|
|
|
|
|
|
|
/* some short-hands ... */
|
|
|
|
#define m1 flt_mantissa.flt_h_32
|
|
|
|
#define m2 flt_mantissa.flt_l_32
|
|
|
|
|
|
|
|
/* some constants */
|
|
|
|
#define EXT_MAX 16384 /* max exponent */
|
|
|
|
#define EXT_MIN (-16384) /* min exponent */
|
|
|
|
|
|
|
|
/* hiding of names: */
|
|
|
|
#define flt_nrm _flt_nrm
|
|
|
|
#define flt_chk _flt_chk
|
|
|
|
#define flt_b64_add _flt_64add
|
|
|
|
#define flt_split _flt_split
|
1993-10-21 12:50:58 +00:00
|
|
|
|
2016-11-05 20:24:18 +00:00
|
|
|
void flt_nrm(flt_arith *);
|
|
|
|
void flt_chk(flt_arith *);
|
|
|
|
int flt_b64_add(struct flt_mantissa *, struct flt_mantissa *);
|
|
|
|
void flt_split(flt_arith *, unsigned short *);
|