fiat_crypto/
p521_64.rs

1//! Autogenerated: 'src/ExtractionOCaml/unsaturated_solinas' --lang Rust --inline p521 64 '(auto)' '2^521 - 1' carry_mul carry_square carry add sub opp selectznz to_bytes from_bytes relax
2//! curve description: p521
3//! machine_wordsize = 64 (from "64")
4//! requested operations: carry_mul, carry_square, carry, add, sub, opp, selectznz, to_bytes, from_bytes, relax
5//! n = 9 (from "(auto)")
6//! s-c = 2^521 - [(1, 1)] (from "2^521 - 1")
7//! tight_bounds_multiplier = 1 (from "")
8//!
9//! Computed values:
10//!   carry_chain = [0, 1, 2, 3, 4, 5, 6, 7, 8, 0, 1]
11//!   eval z = z[0] + (z[1] << 58) + (z[2] << 116) + (z[3] << 174) + (z[4] << 232) + (z[5] << 0x122) + (z[6] << 0x15c) + (z[7] << 0x196) + (z[8] << 0x1d0)
12//!   bytes_eval z = z[0] + (z[1] << 8) + (z[2] << 16) + (z[3] << 24) + (z[4] << 32) + (z[5] << 40) + (z[6] << 48) + (z[7] << 56) + (z[8] << 64) + (z[9] << 72) + (z[10] << 80) + (z[11] << 88) + (z[12] << 96) + (z[13] << 104) + (z[14] << 112) + (z[15] << 120) + (z[16] << 128) + (z[17] << 136) + (z[18] << 144) + (z[19] << 152) + (z[20] << 160) + (z[21] << 168) + (z[22] << 176) + (z[23] << 184) + (z[24] << 192) + (z[25] << 200) + (z[26] << 208) + (z[27] << 216) + (z[28] << 224) + (z[29] << 232) + (z[30] << 240) + (z[31] << 248) + (z[32] << 256) + (z[33] << 0x108) + (z[34] << 0x110) + (z[35] << 0x118) + (z[36] << 0x120) + (z[37] << 0x128) + (z[38] << 0x130) + (z[39] << 0x138) + (z[40] << 0x140) + (z[41] << 0x148) + (z[42] << 0x150) + (z[43] << 0x158) + (z[44] << 0x160) + (z[45] << 0x168) + (z[46] << 0x170) + (z[47] << 0x178) + (z[48] << 0x180) + (z[49] << 0x188) + (z[50] << 0x190) + (z[51] << 0x198) + (z[52] << 0x1a0) + (z[53] << 0x1a8) + (z[54] << 0x1b0) + (z[55] << 0x1b8) + (z[56] << 0x1c0) + (z[57] << 0x1c8) + (z[58] << 0x1d0) + (z[59] << 0x1d8) + (z[60] << 0x1e0) + (z[61] << 0x1e8) + (z[62] << 0x1f0) + (z[63] << 0x1f8) + (z[64] << 2^9) + (z[65] << 0x208)
13//!   balance = [0x7fffffffffffffe, 0x7fffffffffffffe, 0x7fffffffffffffe, 0x7fffffffffffffe, 0x7fffffffffffffe, 0x7fffffffffffffe, 0x7fffffffffffffe, 0x7fffffffffffffe, 0x3fffffffffffffe]
14
15#![allow(unused_parens)]
16#![allow(non_camel_case_types)]
17
18/** fiat_p521_u1 represents values of 1 bits, stored in one byte. */
19pub type fiat_p521_u1 = u8;
20/** fiat_p521_i1 represents values of 1 bits, stored in one byte. */
21pub type fiat_p521_i1 = i8;
22/** fiat_p521_u2 represents values of 2 bits, stored in one byte. */
23pub type fiat_p521_u2 = u8;
24/** fiat_p521_i2 represents values of 2 bits, stored in one byte. */
25pub type fiat_p521_i2 = i8;
26
27/** The type fiat_p521_loose_field_element is a field element with loose bounds. */
28/** Bounds: [[0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0xc00000000000000], [0x0 ~> 0x600000000000000]] */
29#[derive(Clone, Copy)]
30pub struct fiat_p521_loose_field_element(pub [u64; 9]);
31
32impl core::ops::Index<usize> for fiat_p521_loose_field_element {
33    type Output = u64;
34    #[inline]
35    fn index(&self, index: usize) -> &Self::Output {
36        &self.0[index]
37    }
38}
39
40impl core::ops::IndexMut<usize> for fiat_p521_loose_field_element {
41    #[inline]
42    fn index_mut(&mut self, index: usize) -> &mut Self::Output {
43        &mut self.0[index]
44    }
45}
46
47/** The type fiat_p521_tight_field_element is a field element with tight bounds. */
48/** Bounds: [[0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x400000000000000], [0x0 ~> 0x200000000000000]] */
49#[derive(Clone, Copy)]
50pub struct fiat_p521_tight_field_element(pub [u64; 9]);
51
52impl core::ops::Index<usize> for fiat_p521_tight_field_element {
53    type Output = u64;
54    #[inline]
55    fn index(&self, index: usize) -> &Self::Output {
56        &self.0[index]
57    }
58}
59
60impl core::ops::IndexMut<usize> for fiat_p521_tight_field_element {
61    #[inline]
62    fn index_mut(&mut self, index: usize) -> &mut Self::Output {
63        &mut self.0[index]
64    }
65}
66
67
68/// The function fiat_p521_addcarryx_u58 is an addition with carry.
69///
70/// Postconditions:
71///   out1 = (arg1 + arg2 + arg3) mod 2^58
72///   out2 = ⌊(arg1 + arg2 + arg3) / 2^58⌋
73///
74/// Input Bounds:
75///   arg1: [0x0 ~> 0x1]
76///   arg2: [0x0 ~> 0x3ffffffffffffff]
77///   arg3: [0x0 ~> 0x3ffffffffffffff]
78/// Output Bounds:
79///   out1: [0x0 ~> 0x3ffffffffffffff]
80///   out2: [0x0 ~> 0x1]
81#[inline]
82pub fn fiat_p521_addcarryx_u58(out1: &mut u64, out2: &mut fiat_p521_u1, arg1: fiat_p521_u1, arg2: u64, arg3: u64) {
83  let x1: u64 = (((arg1 as u64) + arg2) + arg3);
84  let x2: u64 = (x1 & 0x3ffffffffffffff);
85  let x3: fiat_p521_u1 = ((x1 >> 58) as fiat_p521_u1);
86  *out1 = x2;
87  *out2 = x3;
88}
89
90/// The function fiat_p521_subborrowx_u58 is a subtraction with borrow.
91///
92/// Postconditions:
93///   out1 = (-arg1 + arg2 + -arg3) mod 2^58
94///   out2 = -⌊(-arg1 + arg2 + -arg3) / 2^58⌋
95///
96/// Input Bounds:
97///   arg1: [0x0 ~> 0x1]
98///   arg2: [0x0 ~> 0x3ffffffffffffff]
99///   arg3: [0x0 ~> 0x3ffffffffffffff]
100/// Output Bounds:
101///   out1: [0x0 ~> 0x3ffffffffffffff]
102///   out2: [0x0 ~> 0x1]
103#[inline]
104pub fn fiat_p521_subborrowx_u58(out1: &mut u64, out2: &mut fiat_p521_u1, arg1: fiat_p521_u1, arg2: u64, arg3: u64) {
105  let x1: i64 = ((((((arg2 as i128) - (arg1 as i128)) as i64) as i128) - (arg3 as i128)) as i64);
106  let x2: fiat_p521_i1 = ((x1 >> 58) as fiat_p521_i1);
107  let x3: u64 = (((x1 as i128) & (0x3ffffffffffffff as i128)) as u64);
108  *out1 = x3;
109  *out2 = (((0x0 as fiat_p521_i2) - (x2 as fiat_p521_i2)) as fiat_p521_u1);
110}
111
112/// The function fiat_p521_addcarryx_u57 is an addition with carry.
113///
114/// Postconditions:
115///   out1 = (arg1 + arg2 + arg3) mod 2^57
116///   out2 = ⌊(arg1 + arg2 + arg3) / 2^57⌋
117///
118/// Input Bounds:
119///   arg1: [0x0 ~> 0x1]
120///   arg2: [0x0 ~> 0x1ffffffffffffff]
121///   arg3: [0x0 ~> 0x1ffffffffffffff]
122/// Output Bounds:
123///   out1: [0x0 ~> 0x1ffffffffffffff]
124///   out2: [0x0 ~> 0x1]
125#[inline]
126pub fn fiat_p521_addcarryx_u57(out1: &mut u64, out2: &mut fiat_p521_u1, arg1: fiat_p521_u1, arg2: u64, arg3: u64) {
127  let x1: u64 = (((arg1 as u64) + arg2) + arg3);
128  let x2: u64 = (x1 & 0x1ffffffffffffff);
129  let x3: fiat_p521_u1 = ((x1 >> 57) as fiat_p521_u1);
130  *out1 = x2;
131  *out2 = x3;
132}
133
134/// The function fiat_p521_subborrowx_u57 is a subtraction with borrow.
135///
136/// Postconditions:
137///   out1 = (-arg1 + arg2 + -arg3) mod 2^57
138///   out2 = -⌊(-arg1 + arg2 + -arg3) / 2^57⌋
139///
140/// Input Bounds:
141///   arg1: [0x0 ~> 0x1]
142///   arg2: [0x0 ~> 0x1ffffffffffffff]
143///   arg3: [0x0 ~> 0x1ffffffffffffff]
144/// Output Bounds:
145///   out1: [0x0 ~> 0x1ffffffffffffff]
146///   out2: [0x0 ~> 0x1]
147#[inline]
148pub fn fiat_p521_subborrowx_u57(out1: &mut u64, out2: &mut fiat_p521_u1, arg1: fiat_p521_u1, arg2: u64, arg3: u64) {
149  let x1: i64 = ((((((arg2 as i128) - (arg1 as i128)) as i64) as i128) - (arg3 as i128)) as i64);
150  let x2: fiat_p521_i1 = ((x1 >> 57) as fiat_p521_i1);
151  let x3: u64 = (((x1 as i128) & (0x1ffffffffffffff as i128)) as u64);
152  *out1 = x3;
153  *out2 = (((0x0 as fiat_p521_i2) - (x2 as fiat_p521_i2)) as fiat_p521_u1);
154}
155
156/// The function fiat_p521_cmovznz_u64 is a single-word conditional move.
157///
158/// Postconditions:
159///   out1 = (if arg1 = 0 then arg2 else arg3)
160///
161/// Input Bounds:
162///   arg1: [0x0 ~> 0x1]
163///   arg2: [0x0 ~> 0xffffffffffffffff]
164///   arg3: [0x0 ~> 0xffffffffffffffff]
165/// Output Bounds:
166///   out1: [0x0 ~> 0xffffffffffffffff]
167#[inline]
168pub fn fiat_p521_cmovznz_u64(out1: &mut u64, arg1: fiat_p521_u1, arg2: u64, arg3: u64) {
169  let x1: fiat_p521_u1 = (!(!arg1));
170  let x2: u64 = ((((((0x0 as fiat_p521_i2) - (x1 as fiat_p521_i2)) as fiat_p521_i1) as i128) & (0xffffffffffffffff as i128)) as u64);
171  let x3: u64 = ((x2 & arg3) | ((!x2) & arg2));
172  *out1 = x3;
173}
174
175/// The function fiat_p521_carry_mul multiplies two field elements and reduces the result.
176///
177/// Postconditions:
178///   eval out1 mod m = (eval arg1 * eval arg2) mod m
179///
180#[inline]
181pub fn fiat_p521_carry_mul(out1: &mut fiat_p521_tight_field_element, arg1: &fiat_p521_loose_field_element, arg2: &fiat_p521_loose_field_element) {
182  let x1: u128 = (((arg1[8]) as u128) * (((arg2[8]) * 0x2) as u128));
183  let x2: u128 = (((arg1[8]) as u128) * (((arg2[7]) * 0x2) as u128));
184  let x3: u128 = (((arg1[8]) as u128) * (((arg2[6]) * 0x2) as u128));
185  let x4: u128 = (((arg1[8]) as u128) * (((arg2[5]) * 0x2) as u128));
186  let x5: u128 = (((arg1[8]) as u128) * (((arg2[4]) * 0x2) as u128));
187  let x6: u128 = (((arg1[8]) as u128) * (((arg2[3]) * 0x2) as u128));
188  let x7: u128 = (((arg1[8]) as u128) * (((arg2[2]) * 0x2) as u128));
189  let x8: u128 = (((arg1[8]) as u128) * (((arg2[1]) * 0x2) as u128));
190  let x9: u128 = (((arg1[7]) as u128) * (((arg2[8]) * 0x2) as u128));
191  let x10: u128 = (((arg1[7]) as u128) * (((arg2[7]) * 0x2) as u128));
192  let x11: u128 = (((arg1[7]) as u128) * (((arg2[6]) * 0x2) as u128));
193  let x12: u128 = (((arg1[7]) as u128) * (((arg2[5]) * 0x2) as u128));
194  let x13: u128 = (((arg1[7]) as u128) * (((arg2[4]) * 0x2) as u128));
195  let x14: u128 = (((arg1[7]) as u128) * (((arg2[3]) * 0x2) as u128));
196  let x15: u128 = (((arg1[7]) as u128) * (((arg2[2]) * 0x2) as u128));
197  let x16: u128 = (((arg1[6]) as u128) * (((arg2[8]) * 0x2) as u128));
198  let x17: u128 = (((arg1[6]) as u128) * (((arg2[7]) * 0x2) as u128));
199  let x18: u128 = (((arg1[6]) as u128) * (((arg2[6]) * 0x2) as u128));
200  let x19: u128 = (((arg1[6]) as u128) * (((arg2[5]) * 0x2) as u128));
201  let x20: u128 = (((arg1[6]) as u128) * (((arg2[4]) * 0x2) as u128));
202  let x21: u128 = (((arg1[6]) as u128) * (((arg2[3]) * 0x2) as u128));
203  let x22: u128 = (((arg1[5]) as u128) * (((arg2[8]) * 0x2) as u128));
204  let x23: u128 = (((arg1[5]) as u128) * (((arg2[7]) * 0x2) as u128));
205  let x24: u128 = (((arg1[5]) as u128) * (((arg2[6]) * 0x2) as u128));
206  let x25: u128 = (((arg1[5]) as u128) * (((arg2[5]) * 0x2) as u128));
207  let x26: u128 = (((arg1[5]) as u128) * (((arg2[4]) * 0x2) as u128));
208  let x27: u128 = (((arg1[4]) as u128) * (((arg2[8]) * 0x2) as u128));
209  let x28: u128 = (((arg1[4]) as u128) * (((arg2[7]) * 0x2) as u128));
210  let x29: u128 = (((arg1[4]) as u128) * (((arg2[6]) * 0x2) as u128));
211  let x30: u128 = (((arg1[4]) as u128) * (((arg2[5]) * 0x2) as u128));
212  let x31: u128 = (((arg1[3]) as u128) * (((arg2[8]) * 0x2) as u128));
213  let x32: u128 = (((arg1[3]) as u128) * (((arg2[7]) * 0x2) as u128));
214  let x33: u128 = (((arg1[3]) as u128) * (((arg2[6]) * 0x2) as u128));
215  let x34: u128 = (((arg1[2]) as u128) * (((arg2[8]) * 0x2) as u128));
216  let x35: u128 = (((arg1[2]) as u128) * (((arg2[7]) * 0x2) as u128));
217  let x36: u128 = (((arg1[1]) as u128) * (((arg2[8]) * 0x2) as u128));
218  let x37: u128 = (((arg1[8]) as u128) * ((arg2[0]) as u128));
219  let x38: u128 = (((arg1[7]) as u128) * ((arg2[1]) as u128));
220  let x39: u128 = (((arg1[7]) as u128) * ((arg2[0]) as u128));
221  let x40: u128 = (((arg1[6]) as u128) * ((arg2[2]) as u128));
222  let x41: u128 = (((arg1[6]) as u128) * ((arg2[1]) as u128));
223  let x42: u128 = (((arg1[6]) as u128) * ((arg2[0]) as u128));
224  let x43: u128 = (((arg1[5]) as u128) * ((arg2[3]) as u128));
225  let x44: u128 = (((arg1[5]) as u128) * ((arg2[2]) as u128));
226  let x45: u128 = (((arg1[5]) as u128) * ((arg2[1]) as u128));
227  let x46: u128 = (((arg1[5]) as u128) * ((arg2[0]) as u128));
228  let x47: u128 = (((arg1[4]) as u128) * ((arg2[4]) as u128));
229  let x48: u128 = (((arg1[4]) as u128) * ((arg2[3]) as u128));
230  let x49: u128 = (((arg1[4]) as u128) * ((arg2[2]) as u128));
231  let x50: u128 = (((arg1[4]) as u128) * ((arg2[1]) as u128));
232  let x51: u128 = (((arg1[4]) as u128) * ((arg2[0]) as u128));
233  let x52: u128 = (((arg1[3]) as u128) * ((arg2[5]) as u128));
234  let x53: u128 = (((arg1[3]) as u128) * ((arg2[4]) as u128));
235  let x54: u128 = (((arg1[3]) as u128) * ((arg2[3]) as u128));
236  let x55: u128 = (((arg1[3]) as u128) * ((arg2[2]) as u128));
237  let x56: u128 = (((arg1[3]) as u128) * ((arg2[1]) as u128));
238  let x57: u128 = (((arg1[3]) as u128) * ((arg2[0]) as u128));
239  let x58: u128 = (((arg1[2]) as u128) * ((arg2[6]) as u128));
240  let x59: u128 = (((arg1[2]) as u128) * ((arg2[5]) as u128));
241  let x60: u128 = (((arg1[2]) as u128) * ((arg2[4]) as u128));
242  let x61: u128 = (((arg1[2]) as u128) * ((arg2[3]) as u128));
243  let x62: u128 = (((arg1[2]) as u128) * ((arg2[2]) as u128));
244  let x63: u128 = (((arg1[2]) as u128) * ((arg2[1]) as u128));
245  let x64: u128 = (((arg1[2]) as u128) * ((arg2[0]) as u128));
246  let x65: u128 = (((arg1[1]) as u128) * ((arg2[7]) as u128));
247  let x66: u128 = (((arg1[1]) as u128) * ((arg2[6]) as u128));
248  let x67: u128 = (((arg1[1]) as u128) * ((arg2[5]) as u128));
249  let x68: u128 = (((arg1[1]) as u128) * ((arg2[4]) as u128));
250  let x69: u128 = (((arg1[1]) as u128) * ((arg2[3]) as u128));
251  let x70: u128 = (((arg1[1]) as u128) * ((arg2[2]) as u128));
252  let x71: u128 = (((arg1[1]) as u128) * ((arg2[1]) as u128));
253  let x72: u128 = (((arg1[1]) as u128) * ((arg2[0]) as u128));
254  let x73: u128 = (((arg1[0]) as u128) * ((arg2[8]) as u128));
255  let x74: u128 = (((arg1[0]) as u128) * ((arg2[7]) as u128));
256  let x75: u128 = (((arg1[0]) as u128) * ((arg2[6]) as u128));
257  let x76: u128 = (((arg1[0]) as u128) * ((arg2[5]) as u128));
258  let x77: u128 = (((arg1[0]) as u128) * ((arg2[4]) as u128));
259  let x78: u128 = (((arg1[0]) as u128) * ((arg2[3]) as u128));
260  let x79: u128 = (((arg1[0]) as u128) * ((arg2[2]) as u128));
261  let x80: u128 = (((arg1[0]) as u128) * ((arg2[1]) as u128));
262  let x81: u128 = (((arg1[0]) as u128) * ((arg2[0]) as u128));
263  let x82: u128 = (x81 + (x36 + (x35 + (x33 + (x30 + (x26 + (x21 + (x15 + x8))))))));
264  let x83: u128 = (x82 >> 58);
265  let x84: u64 = ((x82 & (0x3ffffffffffffff as u128)) as u64);
266  let x85: u128 = (x73 + (x65 + (x58 + (x52 + (x47 + (x43 + (x40 + (x38 + x37))))))));
267  let x86: u128 = (x74 + (x66 + (x59 + (x53 + (x48 + (x44 + (x41 + (x39 + x1))))))));
268  let x87: u128 = (x75 + (x67 + (x60 + (x54 + (x49 + (x45 + (x42 + (x9 + x2))))))));
269  let x88: u128 = (x76 + (x68 + (x61 + (x55 + (x50 + (x46 + (x16 + (x10 + x3))))))));
270  let x89: u128 = (x77 + (x69 + (x62 + (x56 + (x51 + (x22 + (x17 + (x11 + x4))))))));
271  let x90: u128 = (x78 + (x70 + (x63 + (x57 + (x27 + (x23 + (x18 + (x12 + x5))))))));
272  let x91: u128 = (x79 + (x71 + (x64 + (x31 + (x28 + (x24 + (x19 + (x13 + x6))))))));
273  let x92: u128 = (x80 + (x72 + (x34 + (x32 + (x29 + (x25 + (x20 + (x14 + x7))))))));
274  let x93: u128 = (x83 + x92);
275  let x94: u128 = (x93 >> 58);
276  let x95: u64 = ((x93 & (0x3ffffffffffffff as u128)) as u64);
277  let x96: u128 = (x94 + x91);
278  let x97: u128 = (x96 >> 58);
279  let x98: u64 = ((x96 & (0x3ffffffffffffff as u128)) as u64);
280  let x99: u128 = (x97 + x90);
281  let x100: u128 = (x99 >> 58);
282  let x101: u64 = ((x99 & (0x3ffffffffffffff as u128)) as u64);
283  let x102: u128 = (x100 + x89);
284  let x103: u128 = (x102 >> 58);
285  let x104: u64 = ((x102 & (0x3ffffffffffffff as u128)) as u64);
286  let x105: u128 = (x103 + x88);
287  let x106: u128 = (x105 >> 58);
288  let x107: u64 = ((x105 & (0x3ffffffffffffff as u128)) as u64);
289  let x108: u128 = (x106 + x87);
290  let x109: u128 = (x108 >> 58);
291  let x110: u64 = ((x108 & (0x3ffffffffffffff as u128)) as u64);
292  let x111: u128 = (x109 + x86);
293  let x112: u128 = (x111 >> 58);
294  let x113: u64 = ((x111 & (0x3ffffffffffffff as u128)) as u64);
295  let x114: u128 = (x112 + x85);
296  let x115: u128 = (x114 >> 57);
297  let x116: u64 = ((x114 & (0x1ffffffffffffff as u128)) as u64);
298  let x117: u128 = ((x84 as u128) + x115);
299  let x118: u64 = ((x117 >> 58) as u64);
300  let x119: u64 = ((x117 & (0x3ffffffffffffff as u128)) as u64);
301  let x120: u64 = (x118 + x95);
302  let x121: fiat_p521_u1 = ((x120 >> 58) as fiat_p521_u1);
303  let x122: u64 = (x120 & 0x3ffffffffffffff);
304  let x123: u64 = ((x121 as u64) + x98);
305  out1[0] = x119;
306  out1[1] = x122;
307  out1[2] = x123;
308  out1[3] = x101;
309  out1[4] = x104;
310  out1[5] = x107;
311  out1[6] = x110;
312  out1[7] = x113;
313  out1[8] = x116;
314}
315
316/// The function fiat_p521_carry_square squares a field element and reduces the result.
317///
318/// Postconditions:
319///   eval out1 mod m = (eval arg1 * eval arg1) mod m
320///
321#[inline]
322pub fn fiat_p521_carry_square(out1: &mut fiat_p521_tight_field_element, arg1: &fiat_p521_loose_field_element) {
323  let x1: u64 = (arg1[8]);
324  let x2: u64 = (x1 * 0x2);
325  let x3: u64 = ((arg1[8]) * 0x2);
326  let x4: u64 = (arg1[7]);
327  let x5: u64 = (x4 * 0x2);
328  let x6: u64 = ((arg1[7]) * 0x2);
329  let x7: u64 = (arg1[6]);
330  let x8: u64 = (x7 * 0x2);
331  let x9: u64 = ((arg1[6]) * 0x2);
332  let x10: u64 = (arg1[5]);
333  let x11: u64 = (x10 * 0x2);
334  let x12: u64 = ((arg1[5]) * 0x2);
335  let x13: u64 = ((arg1[4]) * 0x2);
336  let x14: u64 = ((arg1[3]) * 0x2);
337  let x15: u64 = ((arg1[2]) * 0x2);
338  let x16: u64 = ((arg1[1]) * 0x2);
339  let x17: u128 = (((arg1[8]) as u128) * ((x1 * 0x2) as u128));
340  let x18: u128 = (((arg1[7]) as u128) * ((x2 * 0x2) as u128));
341  let x19: u128 = (((arg1[7]) as u128) * ((x4 * 0x2) as u128));
342  let x20: u128 = (((arg1[6]) as u128) * ((x2 * 0x2) as u128));
343  let x21: u128 = (((arg1[6]) as u128) * ((x5 * 0x2) as u128));
344  let x22: u128 = (((arg1[6]) as u128) * ((x7 * 0x2) as u128));
345  let x23: u128 = (((arg1[5]) as u128) * ((x2 * 0x2) as u128));
346  let x24: u128 = (((arg1[5]) as u128) * ((x5 * 0x2) as u128));
347  let x25: u128 = (((arg1[5]) as u128) * ((x8 * 0x2) as u128));
348  let x26: u128 = (((arg1[5]) as u128) * ((x10 * 0x2) as u128));
349  let x27: u128 = (((arg1[4]) as u128) * ((x2 * 0x2) as u128));
350  let x28: u128 = (((arg1[4]) as u128) * ((x5 * 0x2) as u128));
351  let x29: u128 = (((arg1[4]) as u128) * ((x8 * 0x2) as u128));
352  let x30: u128 = (((arg1[4]) as u128) * ((x11 * 0x2) as u128));
353  let x31: u128 = (((arg1[4]) as u128) * ((arg1[4]) as u128));
354  let x32: u128 = (((arg1[3]) as u128) * ((x2 * 0x2) as u128));
355  let x33: u128 = (((arg1[3]) as u128) * ((x5 * 0x2) as u128));
356  let x34: u128 = (((arg1[3]) as u128) * ((x8 * 0x2) as u128));
357  let x35: u128 = (((arg1[3]) as u128) * (x12 as u128));
358  let x36: u128 = (((arg1[3]) as u128) * (x13 as u128));
359  let x37: u128 = (((arg1[3]) as u128) * ((arg1[3]) as u128));
360  let x38: u128 = (((arg1[2]) as u128) * ((x2 * 0x2) as u128));
361  let x39: u128 = (((arg1[2]) as u128) * ((x5 * 0x2) as u128));
362  let x40: u128 = (((arg1[2]) as u128) * (x9 as u128));
363  let x41: u128 = (((arg1[2]) as u128) * (x12 as u128));
364  let x42: u128 = (((arg1[2]) as u128) * (x13 as u128));
365  let x43: u128 = (((arg1[2]) as u128) * (x14 as u128));
366  let x44: u128 = (((arg1[2]) as u128) * ((arg1[2]) as u128));
367  let x45: u128 = (((arg1[1]) as u128) * ((x2 * 0x2) as u128));
368  let x46: u128 = (((arg1[1]) as u128) * (x6 as u128));
369  let x47: u128 = (((arg1[1]) as u128) * (x9 as u128));
370  let x48: u128 = (((arg1[1]) as u128) * (x12 as u128));
371  let x49: u128 = (((arg1[1]) as u128) * (x13 as u128));
372  let x50: u128 = (((arg1[1]) as u128) * (x14 as u128));
373  let x51: u128 = (((arg1[1]) as u128) * (x15 as u128));
374  let x52: u128 = (((arg1[1]) as u128) * ((arg1[1]) as u128));
375  let x53: u128 = (((arg1[0]) as u128) * (x3 as u128));
376  let x54: u128 = (((arg1[0]) as u128) * (x6 as u128));
377  let x55: u128 = (((arg1[0]) as u128) * (x9 as u128));
378  let x56: u128 = (((arg1[0]) as u128) * (x12 as u128));
379  let x57: u128 = (((arg1[0]) as u128) * (x13 as u128));
380  let x58: u128 = (((arg1[0]) as u128) * (x14 as u128));
381  let x59: u128 = (((arg1[0]) as u128) * (x15 as u128));
382  let x60: u128 = (((arg1[0]) as u128) * (x16 as u128));
383  let x61: u128 = (((arg1[0]) as u128) * ((arg1[0]) as u128));
384  let x62: u128 = (x61 + (x45 + (x39 + (x34 + x30))));
385  let x63: u128 = (x62 >> 58);
386  let x64: u64 = ((x62 & (0x3ffffffffffffff as u128)) as u64);
387  let x65: u128 = (x53 + (x46 + (x40 + (x35 + x31))));
388  let x66: u128 = (x54 + (x47 + (x41 + (x36 + x17))));
389  let x67: u128 = (x55 + (x48 + (x42 + (x37 + x18))));
390  let x68: u128 = (x56 + (x49 + (x43 + (x20 + x19))));
391  let x69: u128 = (x57 + (x50 + (x44 + (x23 + x21))));
392  let x70: u128 = (x58 + (x51 + (x27 + (x24 + x22))));
393  let x71: u128 = (x59 + (x52 + (x32 + (x28 + x25))));
394  let x72: u128 = (x60 + (x38 + (x33 + (x29 + x26))));
395  let x73: u128 = (x63 + x72);
396  let x74: u128 = (x73 >> 58);
397  let x75: u64 = ((x73 & (0x3ffffffffffffff as u128)) as u64);
398  let x76: u128 = (x74 + x71);
399  let x77: u128 = (x76 >> 58);
400  let x78: u64 = ((x76 & (0x3ffffffffffffff as u128)) as u64);
401  let x79: u128 = (x77 + x70);
402  let x80: u128 = (x79 >> 58);
403  let x81: u64 = ((x79 & (0x3ffffffffffffff as u128)) as u64);
404  let x82: u128 = (x80 + x69);
405  let x83: u128 = (x82 >> 58);
406  let x84: u64 = ((x82 & (0x3ffffffffffffff as u128)) as u64);
407  let x85: u128 = (x83 + x68);
408  let x86: u128 = (x85 >> 58);
409  let x87: u64 = ((x85 & (0x3ffffffffffffff as u128)) as u64);
410  let x88: u128 = (x86 + x67);
411  let x89: u128 = (x88 >> 58);
412  let x90: u64 = ((x88 & (0x3ffffffffffffff as u128)) as u64);
413  let x91: u128 = (x89 + x66);
414  let x92: u128 = (x91 >> 58);
415  let x93: u64 = ((x91 & (0x3ffffffffffffff as u128)) as u64);
416  let x94: u128 = (x92 + x65);
417  let x95: u128 = (x94 >> 57);
418  let x96: u64 = ((x94 & (0x1ffffffffffffff as u128)) as u64);
419  let x97: u128 = ((x64 as u128) + x95);
420  let x98: u64 = ((x97 >> 58) as u64);
421  let x99: u64 = ((x97 & (0x3ffffffffffffff as u128)) as u64);
422  let x100: u64 = (x98 + x75);
423  let x101: fiat_p521_u1 = ((x100 >> 58) as fiat_p521_u1);
424  let x102: u64 = (x100 & 0x3ffffffffffffff);
425  let x103: u64 = ((x101 as u64) + x78);
426  out1[0] = x99;
427  out1[1] = x102;
428  out1[2] = x103;
429  out1[3] = x81;
430  out1[4] = x84;
431  out1[5] = x87;
432  out1[6] = x90;
433  out1[7] = x93;
434  out1[8] = x96;
435}
436
437/// The function fiat_p521_carry reduces a field element.
438///
439/// Postconditions:
440///   eval out1 mod m = eval arg1 mod m
441///
442#[inline]
443pub fn fiat_p521_carry(out1: &mut fiat_p521_tight_field_element, arg1: &fiat_p521_loose_field_element) {
444  let x1: u64 = (arg1[0]);
445  let x2: u64 = ((x1 >> 58) + (arg1[1]));
446  let x3: u64 = ((x2 >> 58) + (arg1[2]));
447  let x4: u64 = ((x3 >> 58) + (arg1[3]));
448  let x5: u64 = ((x4 >> 58) + (arg1[4]));
449  let x6: u64 = ((x5 >> 58) + (arg1[5]));
450  let x7: u64 = ((x6 >> 58) + (arg1[6]));
451  let x8: u64 = ((x7 >> 58) + (arg1[7]));
452  let x9: u64 = ((x8 >> 58) + (arg1[8]));
453  let x10: u64 = ((x1 & 0x3ffffffffffffff) + (x9 >> 57));
454  let x11: u64 = ((((x10 >> 58) as fiat_p521_u1) as u64) + (x2 & 0x3ffffffffffffff));
455  let x12: u64 = (x10 & 0x3ffffffffffffff);
456  let x13: u64 = (x11 & 0x3ffffffffffffff);
457  let x14: u64 = ((((x11 >> 58) as fiat_p521_u1) as u64) + (x3 & 0x3ffffffffffffff));
458  let x15: u64 = (x4 & 0x3ffffffffffffff);
459  let x16: u64 = (x5 & 0x3ffffffffffffff);
460  let x17: u64 = (x6 & 0x3ffffffffffffff);
461  let x18: u64 = (x7 & 0x3ffffffffffffff);
462  let x19: u64 = (x8 & 0x3ffffffffffffff);
463  let x20: u64 = (x9 & 0x1ffffffffffffff);
464  out1[0] = x12;
465  out1[1] = x13;
466  out1[2] = x14;
467  out1[3] = x15;
468  out1[4] = x16;
469  out1[5] = x17;
470  out1[6] = x18;
471  out1[7] = x19;
472  out1[8] = x20;
473}
474
475/// The function fiat_p521_add adds two field elements.
476///
477/// Postconditions:
478///   eval out1 mod m = (eval arg1 + eval arg2) mod m
479///
480#[inline]
481pub fn fiat_p521_add(out1: &mut fiat_p521_loose_field_element, arg1: &fiat_p521_tight_field_element, arg2: &fiat_p521_tight_field_element) {
482  let x1: u64 = ((arg1[0]) + (arg2[0]));
483  let x2: u64 = ((arg1[1]) + (arg2[1]));
484  let x3: u64 = ((arg1[2]) + (arg2[2]));
485  let x4: u64 = ((arg1[3]) + (arg2[3]));
486  let x5: u64 = ((arg1[4]) + (arg2[4]));
487  let x6: u64 = ((arg1[5]) + (arg2[5]));
488  let x7: u64 = ((arg1[6]) + (arg2[6]));
489  let x8: u64 = ((arg1[7]) + (arg2[7]));
490  let x9: u64 = ((arg1[8]) + (arg2[8]));
491  out1[0] = x1;
492  out1[1] = x2;
493  out1[2] = x3;
494  out1[3] = x4;
495  out1[4] = x5;
496  out1[5] = x6;
497  out1[6] = x7;
498  out1[7] = x8;
499  out1[8] = x9;
500}
501
502/// The function fiat_p521_sub subtracts two field elements.
503///
504/// Postconditions:
505///   eval out1 mod m = (eval arg1 - eval arg2) mod m
506///
507#[inline]
508pub fn fiat_p521_sub(out1: &mut fiat_p521_loose_field_element, arg1: &fiat_p521_tight_field_element, arg2: &fiat_p521_tight_field_element) {
509  let x1: u64 = ((0x7fffffffffffffe + (arg1[0])) - (arg2[0]));
510  let x2: u64 = ((0x7fffffffffffffe + (arg1[1])) - (arg2[1]));
511  let x3: u64 = ((0x7fffffffffffffe + (arg1[2])) - (arg2[2]));
512  let x4: u64 = ((0x7fffffffffffffe + (arg1[3])) - (arg2[3]));
513  let x5: u64 = ((0x7fffffffffffffe + (arg1[4])) - (arg2[4]));
514  let x6: u64 = ((0x7fffffffffffffe + (arg1[5])) - (arg2[5]));
515  let x7: u64 = ((0x7fffffffffffffe + (arg1[6])) - (arg2[6]));
516  let x8: u64 = ((0x7fffffffffffffe + (arg1[7])) - (arg2[7]));
517  let x9: u64 = ((0x3fffffffffffffe + (arg1[8])) - (arg2[8]));
518  out1[0] = x1;
519  out1[1] = x2;
520  out1[2] = x3;
521  out1[3] = x4;
522  out1[4] = x5;
523  out1[5] = x6;
524  out1[6] = x7;
525  out1[7] = x8;
526  out1[8] = x9;
527}
528
529/// The function fiat_p521_opp negates a field element.
530///
531/// Postconditions:
532///   eval out1 mod m = -eval arg1 mod m
533///
534#[inline]
535pub fn fiat_p521_opp(out1: &mut fiat_p521_loose_field_element, arg1: &fiat_p521_tight_field_element) {
536  let x1: u64 = (0x7fffffffffffffe - (arg1[0]));
537  let x2: u64 = (0x7fffffffffffffe - (arg1[1]));
538  let x3: u64 = (0x7fffffffffffffe - (arg1[2]));
539  let x4: u64 = (0x7fffffffffffffe - (arg1[3]));
540  let x5: u64 = (0x7fffffffffffffe - (arg1[4]));
541  let x6: u64 = (0x7fffffffffffffe - (arg1[5]));
542  let x7: u64 = (0x7fffffffffffffe - (arg1[6]));
543  let x8: u64 = (0x7fffffffffffffe - (arg1[7]));
544  let x9: u64 = (0x3fffffffffffffe - (arg1[8]));
545  out1[0] = x1;
546  out1[1] = x2;
547  out1[2] = x3;
548  out1[3] = x4;
549  out1[4] = x5;
550  out1[5] = x6;
551  out1[6] = x7;
552  out1[7] = x8;
553  out1[8] = x9;
554}
555
556/// The function fiat_p521_selectznz is a multi-limb conditional select.
557///
558/// Postconditions:
559///   out1 = (if arg1 = 0 then arg2 else arg3)
560///
561/// Input Bounds:
562///   arg1: [0x0 ~> 0x1]
563///   arg2: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
564///   arg3: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
565/// Output Bounds:
566///   out1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
567#[inline]
568pub fn fiat_p521_selectznz(out1: &mut [u64; 9], arg1: fiat_p521_u1, arg2: &[u64; 9], arg3: &[u64; 9]) {
569  let mut x1: u64 = 0;
570  fiat_p521_cmovznz_u64(&mut x1, arg1, (arg2[0]), (arg3[0]));
571  let mut x2: u64 = 0;
572  fiat_p521_cmovznz_u64(&mut x2, arg1, (arg2[1]), (arg3[1]));
573  let mut x3: u64 = 0;
574  fiat_p521_cmovznz_u64(&mut x3, arg1, (arg2[2]), (arg3[2]));
575  let mut x4: u64 = 0;
576  fiat_p521_cmovznz_u64(&mut x4, arg1, (arg2[3]), (arg3[3]));
577  let mut x5: u64 = 0;
578  fiat_p521_cmovznz_u64(&mut x5, arg1, (arg2[4]), (arg3[4]));
579  let mut x6: u64 = 0;
580  fiat_p521_cmovznz_u64(&mut x6, arg1, (arg2[5]), (arg3[5]));
581  let mut x7: u64 = 0;
582  fiat_p521_cmovznz_u64(&mut x7, arg1, (arg2[6]), (arg3[6]));
583  let mut x8: u64 = 0;
584  fiat_p521_cmovznz_u64(&mut x8, arg1, (arg2[7]), (arg3[7]));
585  let mut x9: u64 = 0;
586  fiat_p521_cmovznz_u64(&mut x9, arg1, (arg2[8]), (arg3[8]));
587  out1[0] = x1;
588  out1[1] = x2;
589  out1[2] = x3;
590  out1[3] = x4;
591  out1[4] = x5;
592  out1[5] = x6;
593  out1[6] = x7;
594  out1[7] = x8;
595  out1[8] = x9;
596}
597
598/// The function fiat_p521_to_bytes serializes a field element to bytes in little-endian order.
599///
600/// Postconditions:
601///   out1 = map (λ x, ⌊((eval arg1 mod m) mod 2^(8 * (x + 1))) / 2^(8 * x)⌋) [0..65]
602///
603/// Output Bounds:
604///   out1: [[0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0x1]]
605#[inline]
606pub fn fiat_p521_to_bytes(out1: &mut [u8; 66], arg1: &fiat_p521_tight_field_element) {
607  let mut x1: u64 = 0;
608  let mut x2: fiat_p521_u1 = 0;
609  fiat_p521_subborrowx_u58(&mut x1, &mut x2, 0x0, (arg1[0]), 0x3ffffffffffffff);
610  let mut x3: u64 = 0;
611  let mut x4: fiat_p521_u1 = 0;
612  fiat_p521_subborrowx_u58(&mut x3, &mut x4, x2, (arg1[1]), 0x3ffffffffffffff);
613  let mut x5: u64 = 0;
614  let mut x6: fiat_p521_u1 = 0;
615  fiat_p521_subborrowx_u58(&mut x5, &mut x6, x4, (arg1[2]), 0x3ffffffffffffff);
616  let mut x7: u64 = 0;
617  let mut x8: fiat_p521_u1 = 0;
618  fiat_p521_subborrowx_u58(&mut x7, &mut x8, x6, (arg1[3]), 0x3ffffffffffffff);
619  let mut x9: u64 = 0;
620  let mut x10: fiat_p521_u1 = 0;
621  fiat_p521_subborrowx_u58(&mut x9, &mut x10, x8, (arg1[4]), 0x3ffffffffffffff);
622  let mut x11: u64 = 0;
623  let mut x12: fiat_p521_u1 = 0;
624  fiat_p521_subborrowx_u58(&mut x11, &mut x12, x10, (arg1[5]), 0x3ffffffffffffff);
625  let mut x13: u64 = 0;
626  let mut x14: fiat_p521_u1 = 0;
627  fiat_p521_subborrowx_u58(&mut x13, &mut x14, x12, (arg1[6]), 0x3ffffffffffffff);
628  let mut x15: u64 = 0;
629  let mut x16: fiat_p521_u1 = 0;
630  fiat_p521_subborrowx_u58(&mut x15, &mut x16, x14, (arg1[7]), 0x3ffffffffffffff);
631  let mut x17: u64 = 0;
632  let mut x18: fiat_p521_u1 = 0;
633  fiat_p521_subborrowx_u57(&mut x17, &mut x18, x16, (arg1[8]), 0x1ffffffffffffff);
634  let mut x19: u64 = 0;
635  fiat_p521_cmovznz_u64(&mut x19, x18, (0x0 as u64), 0xffffffffffffffff);
636  let mut x20: u64 = 0;
637  let mut x21: fiat_p521_u1 = 0;
638  fiat_p521_addcarryx_u58(&mut x20, &mut x21, 0x0, x1, (x19 & 0x3ffffffffffffff));
639  let mut x22: u64 = 0;
640  let mut x23: fiat_p521_u1 = 0;
641  fiat_p521_addcarryx_u58(&mut x22, &mut x23, x21, x3, (x19 & 0x3ffffffffffffff));
642  let mut x24: u64 = 0;
643  let mut x25: fiat_p521_u1 = 0;
644  fiat_p521_addcarryx_u58(&mut x24, &mut x25, x23, x5, (x19 & 0x3ffffffffffffff));
645  let mut x26: u64 = 0;
646  let mut x27: fiat_p521_u1 = 0;
647  fiat_p521_addcarryx_u58(&mut x26, &mut x27, x25, x7, (x19 & 0x3ffffffffffffff));
648  let mut x28: u64 = 0;
649  let mut x29: fiat_p521_u1 = 0;
650  fiat_p521_addcarryx_u58(&mut x28, &mut x29, x27, x9, (x19 & 0x3ffffffffffffff));
651  let mut x30: u64 = 0;
652  let mut x31: fiat_p521_u1 = 0;
653  fiat_p521_addcarryx_u58(&mut x30, &mut x31, x29, x11, (x19 & 0x3ffffffffffffff));
654  let mut x32: u64 = 0;
655  let mut x33: fiat_p521_u1 = 0;
656  fiat_p521_addcarryx_u58(&mut x32, &mut x33, x31, x13, (x19 & 0x3ffffffffffffff));
657  let mut x34: u64 = 0;
658  let mut x35: fiat_p521_u1 = 0;
659  fiat_p521_addcarryx_u58(&mut x34, &mut x35, x33, x15, (x19 & 0x3ffffffffffffff));
660  let mut x36: u64 = 0;
661  let mut x37: fiat_p521_u1 = 0;
662  fiat_p521_addcarryx_u57(&mut x36, &mut x37, x35, x17, (x19 & 0x1ffffffffffffff));
663  let x38: u64 = (x34 << 6);
664  let x39: u64 = (x32 << 4);
665  let x40: u64 = (x30 << 2);
666  let x41: u64 = (x26 << 6);
667  let x42: u64 = (x24 << 4);
668  let x43: u64 = (x22 << 2);
669  let x44: u8 = ((x20 & (0xff as u64)) as u8);
670  let x45: u64 = (x20 >> 8);
671  let x46: u8 = ((x45 & (0xff as u64)) as u8);
672  let x47: u64 = (x45 >> 8);
673  let x48: u8 = ((x47 & (0xff as u64)) as u8);
674  let x49: u64 = (x47 >> 8);
675  let x50: u8 = ((x49 & (0xff as u64)) as u8);
676  let x51: u64 = (x49 >> 8);
677  let x52: u8 = ((x51 & (0xff as u64)) as u8);
678  let x53: u64 = (x51 >> 8);
679  let x54: u8 = ((x53 & (0xff as u64)) as u8);
680  let x55: u64 = (x53 >> 8);
681  let x56: u8 = ((x55 & (0xff as u64)) as u8);
682  let x57: u8 = ((x55 >> 8) as u8);
683  let x58: u64 = (x43 + (x57 as u64));
684  let x59: u8 = ((x58 & (0xff as u64)) as u8);
685  let x60: u64 = (x58 >> 8);
686  let x61: u8 = ((x60 & (0xff as u64)) as u8);
687  let x62: u64 = (x60 >> 8);
688  let x63: u8 = ((x62 & (0xff as u64)) as u8);
689  let x64: u64 = (x62 >> 8);
690  let x65: u8 = ((x64 & (0xff as u64)) as u8);
691  let x66: u64 = (x64 >> 8);
692  let x67: u8 = ((x66 & (0xff as u64)) as u8);
693  let x68: u64 = (x66 >> 8);
694  let x69: u8 = ((x68 & (0xff as u64)) as u8);
695  let x70: u64 = (x68 >> 8);
696  let x71: u8 = ((x70 & (0xff as u64)) as u8);
697  let x72: u8 = ((x70 >> 8) as u8);
698  let x73: u64 = (x42 + (x72 as u64));
699  let x74: u8 = ((x73 & (0xff as u64)) as u8);
700  let x75: u64 = (x73 >> 8);
701  let x76: u8 = ((x75 & (0xff as u64)) as u8);
702  let x77: u64 = (x75 >> 8);
703  let x78: u8 = ((x77 & (0xff as u64)) as u8);
704  let x79: u64 = (x77 >> 8);
705  let x80: u8 = ((x79 & (0xff as u64)) as u8);
706  let x81: u64 = (x79 >> 8);
707  let x82: u8 = ((x81 & (0xff as u64)) as u8);
708  let x83: u64 = (x81 >> 8);
709  let x84: u8 = ((x83 & (0xff as u64)) as u8);
710  let x85: u64 = (x83 >> 8);
711  let x86: u8 = ((x85 & (0xff as u64)) as u8);
712  let x87: u8 = ((x85 >> 8) as u8);
713  let x88: u64 = (x41 + (x87 as u64));
714  let x89: u8 = ((x88 & (0xff as u64)) as u8);
715  let x90: u64 = (x88 >> 8);
716  let x91: u8 = ((x90 & (0xff as u64)) as u8);
717  let x92: u64 = (x90 >> 8);
718  let x93: u8 = ((x92 & (0xff as u64)) as u8);
719  let x94: u64 = (x92 >> 8);
720  let x95: u8 = ((x94 & (0xff as u64)) as u8);
721  let x96: u64 = (x94 >> 8);
722  let x97: u8 = ((x96 & (0xff as u64)) as u8);
723  let x98: u64 = (x96 >> 8);
724  let x99: u8 = ((x98 & (0xff as u64)) as u8);
725  let x100: u64 = (x98 >> 8);
726  let x101: u8 = ((x100 & (0xff as u64)) as u8);
727  let x102: u8 = ((x100 >> 8) as u8);
728  let x103: u8 = ((x28 & (0xff as u64)) as u8);
729  let x104: u64 = (x28 >> 8);
730  let x105: u8 = ((x104 & (0xff as u64)) as u8);
731  let x106: u64 = (x104 >> 8);
732  let x107: u8 = ((x106 & (0xff as u64)) as u8);
733  let x108: u64 = (x106 >> 8);
734  let x109: u8 = ((x108 & (0xff as u64)) as u8);
735  let x110: u64 = (x108 >> 8);
736  let x111: u8 = ((x110 & (0xff as u64)) as u8);
737  let x112: u64 = (x110 >> 8);
738  let x113: u8 = ((x112 & (0xff as u64)) as u8);
739  let x114: u64 = (x112 >> 8);
740  let x115: u8 = ((x114 & (0xff as u64)) as u8);
741  let x116: u8 = ((x114 >> 8) as u8);
742  let x117: u64 = (x40 + (x116 as u64));
743  let x118: u8 = ((x117 & (0xff as u64)) as u8);
744  let x119: u64 = (x117 >> 8);
745  let x120: u8 = ((x119 & (0xff as u64)) as u8);
746  let x121: u64 = (x119 >> 8);
747  let x122: u8 = ((x121 & (0xff as u64)) as u8);
748  let x123: u64 = (x121 >> 8);
749  let x124: u8 = ((x123 & (0xff as u64)) as u8);
750  let x125: u64 = (x123 >> 8);
751  let x126: u8 = ((x125 & (0xff as u64)) as u8);
752  let x127: u64 = (x125 >> 8);
753  let x128: u8 = ((x127 & (0xff as u64)) as u8);
754  let x129: u64 = (x127 >> 8);
755  let x130: u8 = ((x129 & (0xff as u64)) as u8);
756  let x131: u8 = ((x129 >> 8) as u8);
757  let x132: u64 = (x39 + (x131 as u64));
758  let x133: u8 = ((x132 & (0xff as u64)) as u8);
759  let x134: u64 = (x132 >> 8);
760  let x135: u8 = ((x134 & (0xff as u64)) as u8);
761  let x136: u64 = (x134 >> 8);
762  let x137: u8 = ((x136 & (0xff as u64)) as u8);
763  let x138: u64 = (x136 >> 8);
764  let x139: u8 = ((x138 & (0xff as u64)) as u8);
765  let x140: u64 = (x138 >> 8);
766  let x141: u8 = ((x140 & (0xff as u64)) as u8);
767  let x142: u64 = (x140 >> 8);
768  let x143: u8 = ((x142 & (0xff as u64)) as u8);
769  let x144: u64 = (x142 >> 8);
770  let x145: u8 = ((x144 & (0xff as u64)) as u8);
771  let x146: u8 = ((x144 >> 8) as u8);
772  let x147: u64 = (x38 + (x146 as u64));
773  let x148: u8 = ((x147 & (0xff as u64)) as u8);
774  let x149: u64 = (x147 >> 8);
775  let x150: u8 = ((x149 & (0xff as u64)) as u8);
776  let x151: u64 = (x149 >> 8);
777  let x152: u8 = ((x151 & (0xff as u64)) as u8);
778  let x153: u64 = (x151 >> 8);
779  let x154: u8 = ((x153 & (0xff as u64)) as u8);
780  let x155: u64 = (x153 >> 8);
781  let x156: u8 = ((x155 & (0xff as u64)) as u8);
782  let x157: u64 = (x155 >> 8);
783  let x158: u8 = ((x157 & (0xff as u64)) as u8);
784  let x159: u64 = (x157 >> 8);
785  let x160: u8 = ((x159 & (0xff as u64)) as u8);
786  let x161: u8 = ((x159 >> 8) as u8);
787  let x162: u8 = ((x36 & (0xff as u64)) as u8);
788  let x163: u64 = (x36 >> 8);
789  let x164: u8 = ((x163 & (0xff as u64)) as u8);
790  let x165: u64 = (x163 >> 8);
791  let x166: u8 = ((x165 & (0xff as u64)) as u8);
792  let x167: u64 = (x165 >> 8);
793  let x168: u8 = ((x167 & (0xff as u64)) as u8);
794  let x169: u64 = (x167 >> 8);
795  let x170: u8 = ((x169 & (0xff as u64)) as u8);
796  let x171: u64 = (x169 >> 8);
797  let x172: u8 = ((x171 & (0xff as u64)) as u8);
798  let x173: u64 = (x171 >> 8);
799  let x174: u8 = ((x173 & (0xff as u64)) as u8);
800  let x175: fiat_p521_u1 = ((x173 >> 8) as fiat_p521_u1);
801  out1[0] = x44;
802  out1[1] = x46;
803  out1[2] = x48;
804  out1[3] = x50;
805  out1[4] = x52;
806  out1[5] = x54;
807  out1[6] = x56;
808  out1[7] = x59;
809  out1[8] = x61;
810  out1[9] = x63;
811  out1[10] = x65;
812  out1[11] = x67;
813  out1[12] = x69;
814  out1[13] = x71;
815  out1[14] = x74;
816  out1[15] = x76;
817  out1[16] = x78;
818  out1[17] = x80;
819  out1[18] = x82;
820  out1[19] = x84;
821  out1[20] = x86;
822  out1[21] = x89;
823  out1[22] = x91;
824  out1[23] = x93;
825  out1[24] = x95;
826  out1[25] = x97;
827  out1[26] = x99;
828  out1[27] = x101;
829  out1[28] = x102;
830  out1[29] = x103;
831  out1[30] = x105;
832  out1[31] = x107;
833  out1[32] = x109;
834  out1[33] = x111;
835  out1[34] = x113;
836  out1[35] = x115;
837  out1[36] = x118;
838  out1[37] = x120;
839  out1[38] = x122;
840  out1[39] = x124;
841  out1[40] = x126;
842  out1[41] = x128;
843  out1[42] = x130;
844  out1[43] = x133;
845  out1[44] = x135;
846  out1[45] = x137;
847  out1[46] = x139;
848  out1[47] = x141;
849  out1[48] = x143;
850  out1[49] = x145;
851  out1[50] = x148;
852  out1[51] = x150;
853  out1[52] = x152;
854  out1[53] = x154;
855  out1[54] = x156;
856  out1[55] = x158;
857  out1[56] = x160;
858  out1[57] = x161;
859  out1[58] = x162;
860  out1[59] = x164;
861  out1[60] = x166;
862  out1[61] = x168;
863  out1[62] = x170;
864  out1[63] = x172;
865  out1[64] = x174;
866  out1[65] = (x175 as u8);
867}
868
869/// The function fiat_p521_from_bytes deserializes a field element from bytes in little-endian order.
870///
871/// Postconditions:
872///   eval out1 mod m = bytes_eval arg1 mod m
873///
874/// Input Bounds:
875///   arg1: [[0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0xff], [0x0 ~> 0x1]]
876#[inline]
877pub fn fiat_p521_from_bytes(out1: &mut fiat_p521_tight_field_element, arg1: &[u8; 66]) {
878  let x1: u64 = ((((arg1[65]) as fiat_p521_u1) as u64) << 56);
879  let x2: u64 = (((arg1[64]) as u64) << 48);
880  let x3: u64 = (((arg1[63]) as u64) << 40);
881  let x4: u64 = (((arg1[62]) as u64) << 32);
882  let x5: u64 = (((arg1[61]) as u64) << 24);
883  let x6: u64 = (((arg1[60]) as u64) << 16);
884  let x7: u64 = (((arg1[59]) as u64) << 8);
885  let x8: u8 = (arg1[58]);
886  let x9: u64 = (((arg1[57]) as u64) << 50);
887  let x10: u64 = (((arg1[56]) as u64) << 42);
888  let x11: u64 = (((arg1[55]) as u64) << 34);
889  let x12: u64 = (((arg1[54]) as u64) << 26);
890  let x13: u64 = (((arg1[53]) as u64) << 18);
891  let x14: u64 = (((arg1[52]) as u64) << 10);
892  let x15: u64 = (((arg1[51]) as u64) << 2);
893  let x16: u64 = (((arg1[50]) as u64) << 52);
894  let x17: u64 = (((arg1[49]) as u64) << 44);
895  let x18: u64 = (((arg1[48]) as u64) << 36);
896  let x19: u64 = (((arg1[47]) as u64) << 28);
897  let x20: u64 = (((arg1[46]) as u64) << 20);
898  let x21: u64 = (((arg1[45]) as u64) << 12);
899  let x22: u64 = (((arg1[44]) as u64) << 4);
900  let x23: u64 = (((arg1[43]) as u64) << 54);
901  let x24: u64 = (((arg1[42]) as u64) << 46);
902  let x25: u64 = (((arg1[41]) as u64) << 38);
903  let x26: u64 = (((arg1[40]) as u64) << 30);
904  let x27: u64 = (((arg1[39]) as u64) << 22);
905  let x28: u64 = (((arg1[38]) as u64) << 14);
906  let x29: u64 = (((arg1[37]) as u64) << 6);
907  let x30: u64 = (((arg1[36]) as u64) << 56);
908  let x31: u64 = (((arg1[35]) as u64) << 48);
909  let x32: u64 = (((arg1[34]) as u64) << 40);
910  let x33: u64 = (((arg1[33]) as u64) << 32);
911  let x34: u64 = (((arg1[32]) as u64) << 24);
912  let x35: u64 = (((arg1[31]) as u64) << 16);
913  let x36: u64 = (((arg1[30]) as u64) << 8);
914  let x37: u8 = (arg1[29]);
915  let x38: u64 = (((arg1[28]) as u64) << 50);
916  let x39: u64 = (((arg1[27]) as u64) << 42);
917  let x40: u64 = (((arg1[26]) as u64) << 34);
918  let x41: u64 = (((arg1[25]) as u64) << 26);
919  let x42: u64 = (((arg1[24]) as u64) << 18);
920  let x43: u64 = (((arg1[23]) as u64) << 10);
921  let x44: u64 = (((arg1[22]) as u64) << 2);
922  let x45: u64 = (((arg1[21]) as u64) << 52);
923  let x46: u64 = (((arg1[20]) as u64) << 44);
924  let x47: u64 = (((arg1[19]) as u64) << 36);
925  let x48: u64 = (((arg1[18]) as u64) << 28);
926  let x49: u64 = (((arg1[17]) as u64) << 20);
927  let x50: u64 = (((arg1[16]) as u64) << 12);
928  let x51: u64 = (((arg1[15]) as u64) << 4);
929  let x52: u64 = (((arg1[14]) as u64) << 54);
930  let x53: u64 = (((arg1[13]) as u64) << 46);
931  let x54: u64 = (((arg1[12]) as u64) << 38);
932  let x55: u64 = (((arg1[11]) as u64) << 30);
933  let x56: u64 = (((arg1[10]) as u64) << 22);
934  let x57: u64 = (((arg1[9]) as u64) << 14);
935  let x58: u64 = (((arg1[8]) as u64) << 6);
936  let x59: u64 = (((arg1[7]) as u64) << 56);
937  let x60: u64 = (((arg1[6]) as u64) << 48);
938  let x61: u64 = (((arg1[5]) as u64) << 40);
939  let x62: u64 = (((arg1[4]) as u64) << 32);
940  let x63: u64 = (((arg1[3]) as u64) << 24);
941  let x64: u64 = (((arg1[2]) as u64) << 16);
942  let x65: u64 = (((arg1[1]) as u64) << 8);
943  let x66: u8 = (arg1[0]);
944  let x67: u64 = (x65 + (x66 as u64));
945  let x68: u64 = (x64 + x67);
946  let x69: u64 = (x63 + x68);
947  let x70: u64 = (x62 + x69);
948  let x71: u64 = (x61 + x70);
949  let x72: u64 = (x60 + x71);
950  let x73: u64 = (x59 + x72);
951  let x74: u64 = (x73 & 0x3ffffffffffffff);
952  let x75: u8 = ((x73 >> 58) as u8);
953  let x76: u64 = (x58 + (x75 as u64));
954  let x77: u64 = (x57 + x76);
955  let x78: u64 = (x56 + x77);
956  let x79: u64 = (x55 + x78);
957  let x80: u64 = (x54 + x79);
958  let x81: u64 = (x53 + x80);
959  let x82: u64 = (x52 + x81);
960  let x83: u64 = (x82 & 0x3ffffffffffffff);
961  let x84: u8 = ((x82 >> 58) as u8);
962  let x85: u64 = (x51 + (x84 as u64));
963  let x86: u64 = (x50 + x85);
964  let x87: u64 = (x49 + x86);
965  let x88: u64 = (x48 + x87);
966  let x89: u64 = (x47 + x88);
967  let x90: u64 = (x46 + x89);
968  let x91: u64 = (x45 + x90);
969  let x92: u64 = (x91 & 0x3ffffffffffffff);
970  let x93: u8 = ((x91 >> 58) as u8);
971  let x94: u64 = (x44 + (x93 as u64));
972  let x95: u64 = (x43 + x94);
973  let x96: u64 = (x42 + x95);
974  let x97: u64 = (x41 + x96);
975  let x98: u64 = (x40 + x97);
976  let x99: u64 = (x39 + x98);
977  let x100: u64 = (x38 + x99);
978  let x101: u64 = (x36 + (x37 as u64));
979  let x102: u64 = (x35 + x101);
980  let x103: u64 = (x34 + x102);
981  let x104: u64 = (x33 + x103);
982  let x105: u64 = (x32 + x104);
983  let x106: u64 = (x31 + x105);
984  let x107: u64 = (x30 + x106);
985  let x108: u64 = (x107 & 0x3ffffffffffffff);
986  let x109: u8 = ((x107 >> 58) as u8);
987  let x110: u64 = (x29 + (x109 as u64));
988  let x111: u64 = (x28 + x110);
989  let x112: u64 = (x27 + x111);
990  let x113: u64 = (x26 + x112);
991  let x114: u64 = (x25 + x113);
992  let x115: u64 = (x24 + x114);
993  let x116: u64 = (x23 + x115);
994  let x117: u64 = (x116 & 0x3ffffffffffffff);
995  let x118: u8 = ((x116 >> 58) as u8);
996  let x119: u64 = (x22 + (x118 as u64));
997  let x120: u64 = (x21 + x119);
998  let x121: u64 = (x20 + x120);
999  let x122: u64 = (x19 + x121);
1000  let x123: u64 = (x18 + x122);
1001  let x124: u64 = (x17 + x123);
1002  let x125: u64 = (x16 + x124);
1003  let x126: u64 = (x125 & 0x3ffffffffffffff);
1004  let x127: u8 = ((x125 >> 58) as u8);
1005  let x128: u64 = (x15 + (x127 as u64));
1006  let x129: u64 = (x14 + x128);
1007  let x130: u64 = (x13 + x129);
1008  let x131: u64 = (x12 + x130);
1009  let x132: u64 = (x11 + x131);
1010  let x133: u64 = (x10 + x132);
1011  let x134: u64 = (x9 + x133);
1012  let x135: u64 = (x7 + (x8 as u64));
1013  let x136: u64 = (x6 + x135);
1014  let x137: u64 = (x5 + x136);
1015  let x138: u64 = (x4 + x137);
1016  let x139: u64 = (x3 + x138);
1017  let x140: u64 = (x2 + x139);
1018  let x141: u64 = (x1 + x140);
1019  out1[0] = x74;
1020  out1[1] = x83;
1021  out1[2] = x92;
1022  out1[3] = x100;
1023  out1[4] = x108;
1024  out1[5] = x117;
1025  out1[6] = x126;
1026  out1[7] = x134;
1027  out1[8] = x141;
1028}
1029
1030/// The function fiat_p521_relax is the identity function converting from tight field elements to loose field elements.
1031///
1032/// Postconditions:
1033///   out1 = arg1
1034///
1035#[inline]
1036pub fn fiat_p521_relax(out1: &mut fiat_p521_loose_field_element, arg1: &fiat_p521_tight_field_element) {
1037  let x1: u64 = (arg1[0]);
1038  let x2: u64 = (arg1[1]);
1039  let x3: u64 = (arg1[2]);
1040  let x4: u64 = (arg1[3]);
1041  let x5: u64 = (arg1[4]);
1042  let x6: u64 = (arg1[5]);
1043  let x7: u64 = (arg1[6]);
1044  let x8: u64 = (arg1[7]);
1045  let x9: u64 = (arg1[8]);
1046  out1[0] = x1;
1047  out1[1] = x2;
1048  out1[2] = x3;
1049  out1[3] = x4;
1050  out1[4] = x5;
1051  out1[5] = x6;
1052  out1[6] = x7;
1053  out1[7] = x8;
1054  out1[8] = x9;
1055}