Function threefry

src/backend/oneapi/kernel/random_engine_threefry.hpp:75–160

}

void threefry(uint k[2], uint c[2], uint X[2]) {
    uint ks[3];

    setSkeinParity(&ks[2]);
    ks[0] = k[0];
    X[0]  = c[0];
    ks[2] ^= k[0];
    ks[1] = k[1];
    X[1]  = c[1];
    ks[2] ^= k[1];

    X[0] += ks[0];
    X[1] += ks[1];

    X[0] += X[1];
    X[1] = rotL(X[1], R0);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R1);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R2);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R3);
    X[1] ^= X[0];

    /* InjectKey(r=1) */
    X[0] += ks[1];
    X[1] += ks[2];
    X[1] += 1; /* X[2-1] += r  */

    X[0] += X[1];
    X[1] = rotL(X[1], R4);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R5);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R6);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R7);
    X[1] ^= X[0];

    /* InjectKey(r=2) */
    X[0] += ks[2];
    X[1] += ks[0];
    X[1] += 2;

    X[0] += X[1];
    X[1] = rotL(X[1], R0);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R1);
    X[1] ^= X[0];
    X[0] += X[1];
    X[1] = rotL(X[1], R2);