-rw-r--r-- 683 lib25519-20240928/crypto_nP/montgomery25519/amd64-avx2-ns10l-maa4/fe25519_from_10l.c raw
// linker define fe25519_from_10l

#include "fe25519.h"

void fe25519_from_10l(fe25519 *r, const fe25519_10l *x) {
  
        r->l[0] = ((x->l[0] & 0x0000000003FFFFFF))       | ((x->l[1] & 0x0000000001FFFFFF) << 26) | ((x->l[2] & 0x0000000000001FFF) << 51);
        r->l[1] = ((x->l[2] & 0x0000000003FFE000) >> 13) | ((x->l[3] & 0x0000000001FFFFFF) << 13) | ((x->l[4] & 0x0000000003FFFFFF) << 38);
        r->l[2] = ((x->l[5] & 0x0000000001FFFFFF))       | ((x->l[6] & 0x0000000003FFFFFF) << 25) | ((x->l[7] & 0x0000000000001FFF) << 51);
        r->l[3] = ((x->l[7] & 0x0000000001FFE000) >> 13) | ((x->l[8] & 0x0000000003FFFFFF) << 12) | ((x->l[9] & 0x0000000001FFFFFF) << 38);   
}