#define numlen(x) (x > 0 ? floor(log10(abs(x))) + 1 : 0)