1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
λ x x0 : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
Interp-η
(λ var : Syntax.base_type → Type,
λ '(x18, x19, x17, x15, x13, x11, x9, x7, x5, (x34, x35, x33, x31, x29, x27, x25, x23, x21))%core,
uint128_t x36 = ((uint128_t)(x5 * x34) + ((0x2 * (x7 * x35)) + ((x9 * x33) + ((0x2 * (x11 * x31)) + ((x13 * x29) + ((0x2 * (x15 * x27)) + ((x17 * x25) + ((0x2 * (x19 * x23)) + (x18 * x21)))))))));
uint128_t x37 = (((x5 * x35) + ((x7 * x33) + ((x9 * x31) + ((x11 * x29) + ((x13 * x27) + ((x15 * x25) + ((x17 * x23) + (x19 * x21)))))))) + ((uint128_t)0x1000003d1 * (x18 * x34)));
uint128_t x38 = (((x5 * x33) + ((0x2 * (x7 * x31)) + ((x9 * x29) + ((0x2 * (x11 * x27)) + ((x13 * x25) + ((0x2 * (x15 * x23)) + (x17 * x21))))))) + ((uint128_t)0x1000003d1 * ((0x2 * (x19 * x34)) + (0x2 * (x18 * x35)))));
uint128_t x39 = (((x5 * x31) + ((x7 * x29) + ((x9 * x27) + ((x11 * x25) + ((x13 * x23) + (x15 * x21)))))) + ((uint128_t)0x1000003d1 * ((x17 * x34) + ((0x2 * (x19 * x35)) + (x18 * x33)))));
uint128_t x40 = (((x5 * x29) + ((0x2 * (x7 * x27)) + ((x9 * x25) + ((0x2 * (x11 * x23)) + (x13 * x21))))) + ((uint128_t)0x1000003d1 * ((0x2 * (x15 * x34)) + ((0x2 * (x17 * x35)) + ((0x2 * (x19 * x33)) + (0x2 * (x18 * x31)))))));
uint128_t x41 = (((x5 * x27) + ((x7 * x25) + ((x9 * x23) + (x11 * x21)))) + ((uint128_t)0x1000003d1 * ((x13 * x34) + ((0x2 * (x15 * x35)) + ((x17 * x33) + ((0x2 * (x19 * x31)) + (x18 * x29)))))));
uint128_t x42 = (((x5 * x25) + ((0x2 * (x7 * x23)) + (x9 * x21))) + ((uint128_t)0x1000003d1 * ((0x2 * (x11 * x34)) + ((0x2 * (x13 * x35)) + ((0x2 * (x15 * x33)) + ((0x2 * (x17 * x31)) + ((0x2 * (x19 * x29)) + (0x2 * (x18 * x27)))))))));
uint128_t x43 = (((x5 * x23) + (x7 * x21)) + ((uint128_t)0x1000003d1 * ((x9 * x34) + ((0x2 * (x11 * x35)) + ((x13 * x33) + ((0x2 * (x15 * x31)) + ((x17 * x29) + ((0x2 * (x19 * x27)) + (x18 * x25)))))))));
uint128_t x44 = ((x5 * x21) + (0x1000003d1 * ((0x2 * (x7 * x34)) + ((uint128_t)(0x2 * (x9 * x35)) + ((0x2 * (x11 * x33)) + ((0x2 * (x13 * x31)) + ((0x2 * (x15 * x29)) + ((0x2 * (x17 * x27)) + ((0x2 * (x19 * x25)) + (0x2 * (x18 * x23)))))))))));
uint128_t x45 = (x44 >> 0x1d);
uint64_t x46 = ((uint64_t)x44 & 0x1fffffff);
uint128_t x47 = (x45 + x43);
uint128_t x48 = (x47 >> 0x1c);
uint64_t x49 = ((uint64_t)x47 & 0xfffffff);
uint128_t x50 = (x48 + x42);
uint128_t x51 = (x50 >> 0x1d);
uint64_t x52 = ((uint64_t)x50 & 0x1fffffff);
uint128_t x53 = (x51 + x41);
uint128_t x54 = (x53 >> 0x1c);
uint64_t x55 = ((uint64_t)x53 & 0xfffffff);
uint128_t x56 = (x54 + x40);
uint128_t x57 = (x56 >> 0x1d);
uint64_t x58 = ((uint64_t)x56 & 0x1fffffff);
uint128_t x59 = (x57 + x39);
uint128_t x60 = (x59 >> 0x1c);
uint64_t x61 = ((uint64_t)x59 & 0xfffffff);
uint128_t x62 = (x60 + x38);
uint128_t x63 = (x62 >> 0x1d);
uint64_t x64 = ((uint64_t)x62 & 0x1fffffff);
uint128_t x65 = (x63 + x37);
uint64_t x66 = (uint64_t) (x65 >> 0x1c);
uint64_t x67 = ((uint64_t)x65 & 0xfffffff);
uint128_t x68 = (x66 + x36);
uint64_t x69 = (uint64_t) (x68 >> 0x1c);
uint64_t x70 = ((uint64_t)x68 & 0xfffffff);
uint128_t x71 = (x46 + ((uint128_t)0x1000003d1 * x69));
uint64_t x72 = (uint64_t) (x71 >> 0x1d);
uint64_t x73 = ((uint64_t)x71 & 0x1fffffff);
uint64_t x74 = (x72 + x49);
uint64_t x75 = (x74 >> 0x1c);
uint64_t x76 = (x74 & 0xfffffff);
return (Return x70, Return x67, Return x64, Return x61, Return x58, Return x55, (x75 + x52), Return x76, Return x73))
(x, x0)%core
: word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 → word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t)
|
