1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
Interp-η
(λ var : Syntax.base_type → Type,
λ '(x23, x24, x22, x20, x18, x16, x14, x12, x10, x8, x6, x4, x2)%core,
uint32_t x25 = (x24 | x23);
uint32_t x26 = (x22 | x25);
uint32_t x27 = (x20 | x26);
uint32_t x28 = (x18 | x27);
uint32_t x29 = (x16 | x28);
uint32_t x30 = (x14 | x29);
uint32_t x31 = (x12 | x30);
uint32_t x32 = (x10 | x31);
uint32_t x33 = (x8 | x32);
uint32_t x34 = (x6 | x33);
uint32_t x35 = (x4 | x34);
uint32_t x36 = (x2 | x35);
return x36)
x
: word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType uint32_t
|
