#include "factor.h"
void primitive_arithmetic_type(void);
bool realp(CELL tagged);
void primitive_numberp(void);
bool zerop(CELL tagged);
bool onep(CELL tagged);