#include "factor.h"
DLLEXPORT CELL arithmetic_type(CELL obj1, CELL obj2);
void primitive_arithmetic_type(void);
bool realp(CELL tagged);
void primitive_numberp(void);
bool zerop(CELL tagged);
bool onep(CELL tagged);