/* XDS v2.51: Copyright (c) 1999-2003 Excelsior, LLC. All Rights Reserved. */
/* Generated by XDS Modula-2 to ANSI C v4.20 translator */

#ifndef LowLong_H_
#define LowLong_H_
#ifndef X2C_H_
#include "X2C.h"
#endif

#define LowLong_radix 2

#define LowLong_places 64

#define LowLong_expoMin (-1022)

#define LowLong_expoMax 1023

#define LowLong_large 1.7976931348623E308

#define LowLong_small 2.2250738585072E-308

#define LowLong_IEEE 1

#define LowLong_ISO 0

#define LowLong_rounds 1

#define LowLong_gUnderflow 0

#define LowLong_exception 1

#define LowLong_extend 1

#define LowLong_nModes 6

typedef X2C_CARD8 LowLong_Modes;

extern X2C_INT32 LowLong_exponent(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_fraction(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_sign(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_succ(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_ulp(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_pred(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_intpart(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_fractpart(X2C_LONGREAL);

extern X2C_LONGREAL LowLong_scale(X2C_LONGREAL, X2C_INT32);

extern X2C_LONGREAL LowLong_trunc(X2C_LONGREAL, X2C_INT32);

extern X2C_LONGREAL LowLong_round(X2C_LONGREAL, X2C_INT32);

extern X2C_LONGREAL LowLong_synthesize(X2C_INT32, X2C_LONGREAL);

extern void LowLong_setMode(X2C_CARD8);

extern X2C_CARD8 LowLong_currentMode(void);

extern X2C_BOOLEAN LowLong_IsLowException(void);


extern void LowLong_BEGIN(void);


#endif /* LowLong_H_ */
