sub prev_power2 {
        return 2 ** int log($_[0]) / log 2;
    }