nombre strtonb(char *s)
{
    nombre r;
    int i;
    char *ptr;
    r = init(0);
    ptr = s;
    while (*ptr != '\0')
	ptr++;
    i = 0;
    do  {
        ptr--;
	r[i] = *ptr - '0';
	i++;
    } while ( s != ptr );
    return r;
}