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
49
50
51
52
53
54
55
56
57
58
59
60
61
|
λ x : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
Interp-η
(λ var : Syntax.base_type → Type,
λ '(x13, x14, x12, x10, x8, x6, x4, x2)%core,
uint128_t x15 = (((uint128_t)(x8 + x13) * (x8 + x13)) - ((uint128_t)x8 * x8));
uint128_t x16 = ((((uint128_t)(x6 + x14) * (x8 + x13)) + ((uint128_t)(x8 + x13) * (x6 + x14))) - (((uint128_t)x6 * x8) + ((uint128_t)x8 * x6)));
uint128_t x17 = ((((uint128_t)(x4 + x12) * (x8 + x13)) + (((uint128_t)(x6 + x14) * (x6 + x14)) + ((uint128_t)(x8 + x13) * (x4 + x12)))) - (((uint128_t)x4 * x8) + (((uint128_t)x6 * x6) + ((uint128_t)x8 * x4))));
uint128_t x18 = ((((uint128_t)(x2 + x10) * (x8 + x13)) + (((uint128_t)(x4 + x12) * (x6 + x14)) + (((uint128_t)(x6 + x14) * (x4 + x12)) + ((uint128_t)(x8 + x13) * (x2 + x10))))) - (((uint128_t)x2 * x8) + (((uint128_t)x4 * x6) + (((uint128_t)x6 * x4) + ((uint128_t)x8 * x2)))));
uint128_t x19 = ((((uint128_t)(x2 + x10) * (x6 + x14)) + (((uint128_t)(x4 + x12) * (x4 + x12)) + ((uint128_t)(x6 + x14) * (x2 + x10)))) - (((uint128_t)x2 * x6) + (((uint128_t)x4 * x4) + ((uint128_t)x6 * x2))));
uint128_t x20 = ((((uint128_t)(x2 + x10) * (x4 + x12)) + ((uint128_t)(x4 + x12) * (x2 + x10))) - (((uint128_t)x2 * x4) + ((uint128_t)x4 * x2)));
uint128_t x21 = (((uint128_t)(x2 + x10) * (x2 + x10)) - ((uint128_t)x2 * x2));
uint128_t x22 = (((((uint128_t)x8 * x8) + ((uint128_t)x13 * x13)) + x19) + x15);
uint128_t x23 = ((((((uint128_t)x6 * x8) + ((uint128_t)x8 * x6)) + (((uint128_t)x14 * x13) + ((uint128_t)x13 * x14))) + x20) + x16);
uint128_t x24 = ((((((uint128_t)x4 * x8) + (((uint128_t)x6 * x6) + ((uint128_t)x8 * x4))) + (((uint128_t)x12 * x13) + (((uint128_t)x14 * x14) + ((uint128_t)x13 * x12)))) + x21) + x17);
uint128_t x25 = ((((uint128_t)x2 * x8) + (((uint128_t)x4 * x6) + (((uint128_t)x6 * x4) + ((uint128_t)x8 * x2)))) + (((uint128_t)x10 * x13) + (((uint128_t)x12 * x14) + (((uint128_t)x14 * x12) + ((uint128_t)x13 * x10)))));
uint128_t x26 = (((((uint128_t)x2 * x6) + (((uint128_t)x4 * x4) + ((uint128_t)x6 * x2))) + (((uint128_t)x10 * x14) + (((uint128_t)x12 * x12) + ((uint128_t)x14 * x10)))) + x15);
uint128_t x27 = (((((uint128_t)x2 * x4) + ((uint128_t)x4 * x2)) + (((uint128_t)x10 * x12) + ((uint128_t)x12 * x10))) + x16);
uint128_t x28 = ((((uint128_t)x2 * x2) + ((uint128_t)x10 * x10)) + x17);
uint64_t x29 = (uint64_t) (x25 >> 0x34);
uint64_t x30 = ((uint64_t)x25 & 0xfffffffffffff);
uint64_t x31 = (uint64_t) (x18 >> 0x34);
uint64_t x32 = ((uint64_t)x18 & 0xfffffffffffff);
uint128_t x33 = (((uint128_t)0x10000000000000 * x31) + x32);
uint64_t x34 = (uint64_t) (x33 >> 0x34);
uint64_t x35 = ((uint64_t)x33 & 0xfffffffffffff);
uint128_t x36 = ((x29 + x24) + x34);
uint64_t x37 = (uint64_t) (x36 >> 0x34);
uint64_t x38 = ((uint64_t)x36 & 0xfffffffffffff);
uint128_t x39 = (x28 + x34);
uint64_t x40 = (uint64_t) (x39 >> 0x34);
uint64_t x41 = ((uint64_t)x39 & 0xfffffffffffff);
uint128_t x42 = (x37 + x23);
uint64_t x43 = (uint64_t) (x42 >> 0x34);
uint64_t x44 = ((uint64_t)x42 & 0xfffffffffffff);
uint128_t x45 = (x40 + x27);
uint64_t x46 = (uint64_t) (x45 >> 0x34);
uint64_t x47 = ((uint64_t)x45 & 0xfffffffffffff);
uint128_t x48 = (x43 + x22);
uint64_t x49 = (uint64_t) (x48 >> 0x34);
uint64_t x50 = ((uint64_t)x48 & 0xfffffffffffff);
uint128_t x51 = (x46 + x26);
uint64_t x52 = (uint64_t) (x51 >> 0x34);
uint64_t x53 = ((uint64_t)x51 & 0xfffffffffffff);
uint64_t x54 = (x49 + x35);
uint64_t x55 = (x54 >> 0x34);
uint64_t x56 = (x54 & 0xfffffffffffff);
uint64_t x57 = (x52 + x30);
uint64_t x58 = (x57 >> 0x34);
uint64_t x59 = (x57 & 0xfffffffffffff);
uint64_t x60 = ((0x10000000000000 * x55) + x56);
uint64_t x61 = (x60 >> 0x34);
uint64_t x62 = (x60 & 0xfffffffffffff);
uint64_t x63 = ((x58 + x38) + x61);
uint64_t x64 = (x63 >> 0x34);
uint64_t x65 = (x63 & 0xfffffffffffff);
uint64_t x66 = (x41 + x61);
uint64_t x67 = (x66 >> 0x34);
uint64_t x68 = (x66 & 0xfffffffffffff);
return (Return x62, Return x50, (x64 + x44), Return x65, Return x59, Return x53, (x67 + x47), Return x68))
x
: 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)
|
