nro desplazar_nro_derecha (nro x)
{
    int i;

    for (i = 0; i <= (sizeof(x.n) / sizeof (*(x.n)))-1; i++)
    {
        x.n[i] = (unsigned short)(x.n[i]) >> 1;
        if ( ((x.n[i+1]) & (MASK1)) == 1 )
            x.n[i] |= MASK2;
    }
    x.n[i] = (unsigned short)(x.n[i]) >> 1;

    return x;
}