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