#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);