fiat_crypto/
p224_64.rs

1//! Autogenerated: 'src/ExtractionOCaml/word_by_word_montgomery' --lang Rust --inline p224 64 '2^224 - 2^96 + 1' mul square add sub opp from_montgomery to_montgomery nonzero selectznz to_bytes from_bytes one msat divstep divstep_precomp
2//! curve description: p224
3//! machine_wordsize = 64 (from "64")
4//! requested operations: mul, square, add, sub, opp, from_montgomery, to_montgomery, nonzero, selectznz, to_bytes, from_bytes, one, msat, divstep, divstep_precomp
5//! m = 0xffffffffffffffffffffffffffffffff000000000000000000000001 (from "2^224 - 2^96 + 1")
6//!
7//! NOTE: In addition to the bounds specified above each function, all
8//!   functions synthesized for this Montgomery arithmetic require the
9//!   input to be strictly less than the prime modulus (m), and also
10//!   require the input to be in the unique saturated representation.
11//!   All functions also ensure that these two properties are true of
12//!   return values.
13//!
14//! Computed values:
15//!   eval z = z[0] + (z[1] << 64) + (z[2] << 128) + (z[3] << 192)
16//!   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)
17//!   twos_complement_eval z = let x1 := z[0] + (z[1] << 64) + (z[2] << 128) + (z[3] << 192) in
18//!                            if x1 & (2^256-1) < 2^255 then x1 & (2^256-1) else (x1 & (2^256-1)) - 2^256
19
20#![allow(unused_parens)]
21#![allow(non_camel_case_types)]
22
23/** fiat_p224_u1 represents values of 1 bits, stored in one byte. */
24pub type fiat_p224_u1 = u8;
25/** fiat_p224_i1 represents values of 1 bits, stored in one byte. */
26pub type fiat_p224_i1 = i8;
27/** fiat_p224_u2 represents values of 2 bits, stored in one byte. */
28pub type fiat_p224_u2 = u8;
29/** fiat_p224_i2 represents values of 2 bits, stored in one byte. */
30pub type fiat_p224_i2 = i8;
31
32/** The type fiat_p224_montgomery_domain_field_element is a field element in the Montgomery domain. */
33/** Bounds: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]] */
34#[derive(Clone, Copy)]
35pub struct fiat_p224_montgomery_domain_field_element(pub [u64; 4]);
36
37impl core::ops::Index<usize> for fiat_p224_montgomery_domain_field_element {
38    type Output = u64;
39    #[inline]
40    fn index(&self, index: usize) -> &Self::Output {
41        &self.0[index]
42    }
43}
44
45impl core::ops::IndexMut<usize> for fiat_p224_montgomery_domain_field_element {
46    #[inline]
47    fn index_mut(&mut self, index: usize) -> &mut Self::Output {
48        &mut self.0[index]
49    }
50}
51
52/** The type fiat_p224_non_montgomery_domain_field_element is a field element NOT in the Montgomery domain. */
53/** Bounds: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]] */
54#[derive(Clone, Copy)]
55pub struct fiat_p224_non_montgomery_domain_field_element(pub [u64; 4]);
56
57impl core::ops::Index<usize> for fiat_p224_non_montgomery_domain_field_element {
58    type Output = u64;
59    #[inline]
60    fn index(&self, index: usize) -> &Self::Output {
61        &self.0[index]
62    }
63}
64
65impl core::ops::IndexMut<usize> for fiat_p224_non_montgomery_domain_field_element {
66    #[inline]
67    fn index_mut(&mut self, index: usize) -> &mut Self::Output {
68        &mut self.0[index]
69    }
70}
71
72
73/// The function fiat_p224_addcarryx_u64 is an addition with carry.
74///
75/// Postconditions:
76///   out1 = (arg1 + arg2 + arg3) mod 2^64
77///   out2 = ⌊(arg1 + arg2 + arg3) / 2^64⌋
78///
79/// Input Bounds:
80///   arg1: [0x0 ~> 0x1]
81///   arg2: [0x0 ~> 0xffffffffffffffff]
82///   arg3: [0x0 ~> 0xffffffffffffffff]
83/// Output Bounds:
84///   out1: [0x0 ~> 0xffffffffffffffff]
85///   out2: [0x0 ~> 0x1]
86#[inline]
87pub fn fiat_p224_addcarryx_u64(out1: &mut u64, out2: &mut fiat_p224_u1, arg1: fiat_p224_u1, arg2: u64, arg3: u64) {
88  let x1: u128 = (((arg1 as u128) + (arg2 as u128)) + (arg3 as u128));
89  let x2: u64 = ((x1 & (0xffffffffffffffff as u128)) as u64);
90  let x3: fiat_p224_u1 = ((x1 >> 64) as fiat_p224_u1);
91  *out1 = x2;
92  *out2 = x3;
93}
94
95/// The function fiat_p224_subborrowx_u64 is a subtraction with borrow.
96///
97/// Postconditions:
98///   out1 = (-arg1 + arg2 + -arg3) mod 2^64
99///   out2 = -⌊(-arg1 + arg2 + -arg3) / 2^64⌋
100///
101/// Input Bounds:
102///   arg1: [0x0 ~> 0x1]
103///   arg2: [0x0 ~> 0xffffffffffffffff]
104///   arg3: [0x0 ~> 0xffffffffffffffff]
105/// Output Bounds:
106///   out1: [0x0 ~> 0xffffffffffffffff]
107///   out2: [0x0 ~> 0x1]
108#[inline]
109pub fn fiat_p224_subborrowx_u64(out1: &mut u64, out2: &mut fiat_p224_u1, arg1: fiat_p224_u1, arg2: u64, arg3: u64) {
110  let x1: i128 = (((arg2 as i128) - (arg1 as i128)) - (arg3 as i128));
111  let x2: fiat_p224_i1 = ((x1 >> 64) as fiat_p224_i1);
112  let x3: u64 = ((x1 & (0xffffffffffffffff as i128)) as u64);
113  *out1 = x3;
114  *out2 = (((0x0 as fiat_p224_i2) - (x2 as fiat_p224_i2)) as fiat_p224_u1);
115}
116
117/// The function fiat_p224_mulx_u64 is a multiplication, returning the full double-width result.
118///
119/// Postconditions:
120///   out1 = (arg1 * arg2) mod 2^64
121///   out2 = ⌊arg1 * arg2 / 2^64⌋
122///
123/// Input Bounds:
124///   arg1: [0x0 ~> 0xffffffffffffffff]
125///   arg2: [0x0 ~> 0xffffffffffffffff]
126/// Output Bounds:
127///   out1: [0x0 ~> 0xffffffffffffffff]
128///   out2: [0x0 ~> 0xffffffffffffffff]
129#[inline]
130pub fn fiat_p224_mulx_u64(out1: &mut u64, out2: &mut u64, arg1: u64, arg2: u64) {
131  let x1: u128 = ((arg1 as u128) * (arg2 as u128));
132  let x2: u64 = ((x1 & (0xffffffffffffffff as u128)) as u64);
133  let x3: u64 = ((x1 >> 64) as u64);
134  *out1 = x2;
135  *out2 = x3;
136}
137
138/// The function fiat_p224_cmovznz_u64 is a single-word conditional move.
139///
140/// Postconditions:
141///   out1 = (if arg1 = 0 then arg2 else arg3)
142///
143/// Input Bounds:
144///   arg1: [0x0 ~> 0x1]
145///   arg2: [0x0 ~> 0xffffffffffffffff]
146///   arg3: [0x0 ~> 0xffffffffffffffff]
147/// Output Bounds:
148///   out1: [0x0 ~> 0xffffffffffffffff]
149#[inline]
150pub fn fiat_p224_cmovznz_u64(out1: &mut u64, arg1: fiat_p224_u1, arg2: u64, arg3: u64) {
151  let x1: fiat_p224_u1 = (!(!arg1));
152  let x2: u64 = ((((((0x0 as fiat_p224_i2) - (x1 as fiat_p224_i2)) as fiat_p224_i1) as i128) & (0xffffffffffffffff as i128)) as u64);
153  let x3: u64 = ((x2 & arg3) | ((!x2) & arg2));
154  *out1 = x3;
155}
156
157/// The function fiat_p224_mul multiplies two field elements in the Montgomery domain.
158///
159/// Preconditions:
160///   0 ≤ eval arg1 < m
161///   0 ≤ eval arg2 < m
162/// Postconditions:
163///   eval (from_montgomery out1) mod m = (eval (from_montgomery arg1) * eval (from_montgomery arg2)) mod m
164///   0 ≤ eval out1 < m
165///
166#[inline]
167pub fn fiat_p224_mul(out1: &mut fiat_p224_montgomery_domain_field_element, arg1: &fiat_p224_montgomery_domain_field_element, arg2: &fiat_p224_montgomery_domain_field_element) {
168  let x1: u64 = (arg1[1]);
169  let x2: u64 = (arg1[2]);
170  let x3: u64 = (arg1[3]);
171  let x4: u64 = (arg1[0]);
172  let mut x5: u64 = 0;
173  let mut x6: u64 = 0;
174  fiat_p224_mulx_u64(&mut x5, &mut x6, x4, (arg2[3]));
175  let mut x7: u64 = 0;
176  let mut x8: u64 = 0;
177  fiat_p224_mulx_u64(&mut x7, &mut x8, x4, (arg2[2]));
178  let mut x9: u64 = 0;
179  let mut x10: u64 = 0;
180  fiat_p224_mulx_u64(&mut x9, &mut x10, x4, (arg2[1]));
181  let mut x11: u64 = 0;
182  let mut x12: u64 = 0;
183  fiat_p224_mulx_u64(&mut x11, &mut x12, x4, (arg2[0]));
184  let mut x13: u64 = 0;
185  let mut x14: fiat_p224_u1 = 0;
186  fiat_p224_addcarryx_u64(&mut x13, &mut x14, 0x0, x12, x9);
187  let mut x15: u64 = 0;
188  let mut x16: fiat_p224_u1 = 0;
189  fiat_p224_addcarryx_u64(&mut x15, &mut x16, x14, x10, x7);
190  let mut x17: u64 = 0;
191  let mut x18: fiat_p224_u1 = 0;
192  fiat_p224_addcarryx_u64(&mut x17, &mut x18, x16, x8, x5);
193  let x19: u64 = ((x18 as u64) + x6);
194  let mut x20: u64 = 0;
195  let mut x21: u64 = 0;
196  fiat_p224_mulx_u64(&mut x20, &mut x21, x11, 0xffffffffffffffff);
197  let mut x22: u64 = 0;
198  let mut x23: u64 = 0;
199  fiat_p224_mulx_u64(&mut x22, &mut x23, x20, 0xffffffff);
200  let mut x24: u64 = 0;
201  let mut x25: u64 = 0;
202  fiat_p224_mulx_u64(&mut x24, &mut x25, x20, 0xffffffffffffffff);
203  let mut x26: u64 = 0;
204  let mut x27: u64 = 0;
205  fiat_p224_mulx_u64(&mut x26, &mut x27, x20, 0xffffffff00000000);
206  let mut x28: u64 = 0;
207  let mut x29: fiat_p224_u1 = 0;
208  fiat_p224_addcarryx_u64(&mut x28, &mut x29, 0x0, x27, x24);
209  let mut x30: u64 = 0;
210  let mut x31: fiat_p224_u1 = 0;
211  fiat_p224_addcarryx_u64(&mut x30, &mut x31, x29, x25, x22);
212  let x32: u64 = ((x31 as u64) + x23);
213  let mut x33: u64 = 0;
214  let mut x34: fiat_p224_u1 = 0;
215  fiat_p224_addcarryx_u64(&mut x33, &mut x34, 0x0, x11, x20);
216  let mut x35: u64 = 0;
217  let mut x36: fiat_p224_u1 = 0;
218  fiat_p224_addcarryx_u64(&mut x35, &mut x36, x34, x13, x26);
219  let mut x37: u64 = 0;
220  let mut x38: fiat_p224_u1 = 0;
221  fiat_p224_addcarryx_u64(&mut x37, &mut x38, x36, x15, x28);
222  let mut x39: u64 = 0;
223  let mut x40: fiat_p224_u1 = 0;
224  fiat_p224_addcarryx_u64(&mut x39, &mut x40, x38, x17, x30);
225  let mut x41: u64 = 0;
226  let mut x42: fiat_p224_u1 = 0;
227  fiat_p224_addcarryx_u64(&mut x41, &mut x42, x40, x19, x32);
228  let mut x43: u64 = 0;
229  let mut x44: u64 = 0;
230  fiat_p224_mulx_u64(&mut x43, &mut x44, x1, (arg2[3]));
231  let mut x45: u64 = 0;
232  let mut x46: u64 = 0;
233  fiat_p224_mulx_u64(&mut x45, &mut x46, x1, (arg2[2]));
234  let mut x47: u64 = 0;
235  let mut x48: u64 = 0;
236  fiat_p224_mulx_u64(&mut x47, &mut x48, x1, (arg2[1]));
237  let mut x49: u64 = 0;
238  let mut x50: u64 = 0;
239  fiat_p224_mulx_u64(&mut x49, &mut x50, x1, (arg2[0]));
240  let mut x51: u64 = 0;
241  let mut x52: fiat_p224_u1 = 0;
242  fiat_p224_addcarryx_u64(&mut x51, &mut x52, 0x0, x50, x47);
243  let mut x53: u64 = 0;
244  let mut x54: fiat_p224_u1 = 0;
245  fiat_p224_addcarryx_u64(&mut x53, &mut x54, x52, x48, x45);
246  let mut x55: u64 = 0;
247  let mut x56: fiat_p224_u1 = 0;
248  fiat_p224_addcarryx_u64(&mut x55, &mut x56, x54, x46, x43);
249  let x57: u64 = ((x56 as u64) + x44);
250  let mut x58: u64 = 0;
251  let mut x59: fiat_p224_u1 = 0;
252  fiat_p224_addcarryx_u64(&mut x58, &mut x59, 0x0, x35, x49);
253  let mut x60: u64 = 0;
254  let mut x61: fiat_p224_u1 = 0;
255  fiat_p224_addcarryx_u64(&mut x60, &mut x61, x59, x37, x51);
256  let mut x62: u64 = 0;
257  let mut x63: fiat_p224_u1 = 0;
258  fiat_p224_addcarryx_u64(&mut x62, &mut x63, x61, x39, x53);
259  let mut x64: u64 = 0;
260  let mut x65: fiat_p224_u1 = 0;
261  fiat_p224_addcarryx_u64(&mut x64, &mut x65, x63, x41, x55);
262  let mut x66: u64 = 0;
263  let mut x67: fiat_p224_u1 = 0;
264  fiat_p224_addcarryx_u64(&mut x66, &mut x67, x65, (x42 as u64), x57);
265  let mut x68: u64 = 0;
266  let mut x69: u64 = 0;
267  fiat_p224_mulx_u64(&mut x68, &mut x69, x58, 0xffffffffffffffff);
268  let mut x70: u64 = 0;
269  let mut x71: u64 = 0;
270  fiat_p224_mulx_u64(&mut x70, &mut x71, x68, 0xffffffff);
271  let mut x72: u64 = 0;
272  let mut x73: u64 = 0;
273  fiat_p224_mulx_u64(&mut x72, &mut x73, x68, 0xffffffffffffffff);
274  let mut x74: u64 = 0;
275  let mut x75: u64 = 0;
276  fiat_p224_mulx_u64(&mut x74, &mut x75, x68, 0xffffffff00000000);
277  let mut x76: u64 = 0;
278  let mut x77: fiat_p224_u1 = 0;
279  fiat_p224_addcarryx_u64(&mut x76, &mut x77, 0x0, x75, x72);
280  let mut x78: u64 = 0;
281  let mut x79: fiat_p224_u1 = 0;
282  fiat_p224_addcarryx_u64(&mut x78, &mut x79, x77, x73, x70);
283  let x80: u64 = ((x79 as u64) + x71);
284  let mut x81: u64 = 0;
285  let mut x82: fiat_p224_u1 = 0;
286  fiat_p224_addcarryx_u64(&mut x81, &mut x82, 0x0, x58, x68);
287  let mut x83: u64 = 0;
288  let mut x84: fiat_p224_u1 = 0;
289  fiat_p224_addcarryx_u64(&mut x83, &mut x84, x82, x60, x74);
290  let mut x85: u64 = 0;
291  let mut x86: fiat_p224_u1 = 0;
292  fiat_p224_addcarryx_u64(&mut x85, &mut x86, x84, x62, x76);
293  let mut x87: u64 = 0;
294  let mut x88: fiat_p224_u1 = 0;
295  fiat_p224_addcarryx_u64(&mut x87, &mut x88, x86, x64, x78);
296  let mut x89: u64 = 0;
297  let mut x90: fiat_p224_u1 = 0;
298  fiat_p224_addcarryx_u64(&mut x89, &mut x90, x88, x66, x80);
299  let x91: u64 = ((x90 as u64) + (x67 as u64));
300  let mut x92: u64 = 0;
301  let mut x93: u64 = 0;
302  fiat_p224_mulx_u64(&mut x92, &mut x93, x2, (arg2[3]));
303  let mut x94: u64 = 0;
304  let mut x95: u64 = 0;
305  fiat_p224_mulx_u64(&mut x94, &mut x95, x2, (arg2[2]));
306  let mut x96: u64 = 0;
307  let mut x97: u64 = 0;
308  fiat_p224_mulx_u64(&mut x96, &mut x97, x2, (arg2[1]));
309  let mut x98: u64 = 0;
310  let mut x99: u64 = 0;
311  fiat_p224_mulx_u64(&mut x98, &mut x99, x2, (arg2[0]));
312  let mut x100: u64 = 0;
313  let mut x101: fiat_p224_u1 = 0;
314  fiat_p224_addcarryx_u64(&mut x100, &mut x101, 0x0, x99, x96);
315  let mut x102: u64 = 0;
316  let mut x103: fiat_p224_u1 = 0;
317  fiat_p224_addcarryx_u64(&mut x102, &mut x103, x101, x97, x94);
318  let mut x104: u64 = 0;
319  let mut x105: fiat_p224_u1 = 0;
320  fiat_p224_addcarryx_u64(&mut x104, &mut x105, x103, x95, x92);
321  let x106: u64 = ((x105 as u64) + x93);
322  let mut x107: u64 = 0;
323  let mut x108: fiat_p224_u1 = 0;
324  fiat_p224_addcarryx_u64(&mut x107, &mut x108, 0x0, x83, x98);
325  let mut x109: u64 = 0;
326  let mut x110: fiat_p224_u1 = 0;
327  fiat_p224_addcarryx_u64(&mut x109, &mut x110, x108, x85, x100);
328  let mut x111: u64 = 0;
329  let mut x112: fiat_p224_u1 = 0;
330  fiat_p224_addcarryx_u64(&mut x111, &mut x112, x110, x87, x102);
331  let mut x113: u64 = 0;
332  let mut x114: fiat_p224_u1 = 0;
333  fiat_p224_addcarryx_u64(&mut x113, &mut x114, x112, x89, x104);
334  let mut x115: u64 = 0;
335  let mut x116: fiat_p224_u1 = 0;
336  fiat_p224_addcarryx_u64(&mut x115, &mut x116, x114, x91, x106);
337  let mut x117: u64 = 0;
338  let mut x118: u64 = 0;
339  fiat_p224_mulx_u64(&mut x117, &mut x118, x107, 0xffffffffffffffff);
340  let mut x119: u64 = 0;
341  let mut x120: u64 = 0;
342  fiat_p224_mulx_u64(&mut x119, &mut x120, x117, 0xffffffff);
343  let mut x121: u64 = 0;
344  let mut x122: u64 = 0;
345  fiat_p224_mulx_u64(&mut x121, &mut x122, x117, 0xffffffffffffffff);
346  let mut x123: u64 = 0;
347  let mut x124: u64 = 0;
348  fiat_p224_mulx_u64(&mut x123, &mut x124, x117, 0xffffffff00000000);
349  let mut x125: u64 = 0;
350  let mut x126: fiat_p224_u1 = 0;
351  fiat_p224_addcarryx_u64(&mut x125, &mut x126, 0x0, x124, x121);
352  let mut x127: u64 = 0;
353  let mut x128: fiat_p224_u1 = 0;
354  fiat_p224_addcarryx_u64(&mut x127, &mut x128, x126, x122, x119);
355  let x129: u64 = ((x128 as u64) + x120);
356  let mut x130: u64 = 0;
357  let mut x131: fiat_p224_u1 = 0;
358  fiat_p224_addcarryx_u64(&mut x130, &mut x131, 0x0, x107, x117);
359  let mut x132: u64 = 0;
360  let mut x133: fiat_p224_u1 = 0;
361  fiat_p224_addcarryx_u64(&mut x132, &mut x133, x131, x109, x123);
362  let mut x134: u64 = 0;
363  let mut x135: fiat_p224_u1 = 0;
364  fiat_p224_addcarryx_u64(&mut x134, &mut x135, x133, x111, x125);
365  let mut x136: u64 = 0;
366  let mut x137: fiat_p224_u1 = 0;
367  fiat_p224_addcarryx_u64(&mut x136, &mut x137, x135, x113, x127);
368  let mut x138: u64 = 0;
369  let mut x139: fiat_p224_u1 = 0;
370  fiat_p224_addcarryx_u64(&mut x138, &mut x139, x137, x115, x129);
371  let x140: u64 = ((x139 as u64) + (x116 as u64));
372  let mut x141: u64 = 0;
373  let mut x142: u64 = 0;
374  fiat_p224_mulx_u64(&mut x141, &mut x142, x3, (arg2[3]));
375  let mut x143: u64 = 0;
376  let mut x144: u64 = 0;
377  fiat_p224_mulx_u64(&mut x143, &mut x144, x3, (arg2[2]));
378  let mut x145: u64 = 0;
379  let mut x146: u64 = 0;
380  fiat_p224_mulx_u64(&mut x145, &mut x146, x3, (arg2[1]));
381  let mut x147: u64 = 0;
382  let mut x148: u64 = 0;
383  fiat_p224_mulx_u64(&mut x147, &mut x148, x3, (arg2[0]));
384  let mut x149: u64 = 0;
385  let mut x150: fiat_p224_u1 = 0;
386  fiat_p224_addcarryx_u64(&mut x149, &mut x150, 0x0, x148, x145);
387  let mut x151: u64 = 0;
388  let mut x152: fiat_p224_u1 = 0;
389  fiat_p224_addcarryx_u64(&mut x151, &mut x152, x150, x146, x143);
390  let mut x153: u64 = 0;
391  let mut x154: fiat_p224_u1 = 0;
392  fiat_p224_addcarryx_u64(&mut x153, &mut x154, x152, x144, x141);
393  let x155: u64 = ((x154 as u64) + x142);
394  let mut x156: u64 = 0;
395  let mut x157: fiat_p224_u1 = 0;
396  fiat_p224_addcarryx_u64(&mut x156, &mut x157, 0x0, x132, x147);
397  let mut x158: u64 = 0;
398  let mut x159: fiat_p224_u1 = 0;
399  fiat_p224_addcarryx_u64(&mut x158, &mut x159, x157, x134, x149);
400  let mut x160: u64 = 0;
401  let mut x161: fiat_p224_u1 = 0;
402  fiat_p224_addcarryx_u64(&mut x160, &mut x161, x159, x136, x151);
403  let mut x162: u64 = 0;
404  let mut x163: fiat_p224_u1 = 0;
405  fiat_p224_addcarryx_u64(&mut x162, &mut x163, x161, x138, x153);
406  let mut x164: u64 = 0;
407  let mut x165: fiat_p224_u1 = 0;
408  fiat_p224_addcarryx_u64(&mut x164, &mut x165, x163, x140, x155);
409  let mut x166: u64 = 0;
410  let mut x167: u64 = 0;
411  fiat_p224_mulx_u64(&mut x166, &mut x167, x156, 0xffffffffffffffff);
412  let mut x168: u64 = 0;
413  let mut x169: u64 = 0;
414  fiat_p224_mulx_u64(&mut x168, &mut x169, x166, 0xffffffff);
415  let mut x170: u64 = 0;
416  let mut x171: u64 = 0;
417  fiat_p224_mulx_u64(&mut x170, &mut x171, x166, 0xffffffffffffffff);
418  let mut x172: u64 = 0;
419  let mut x173: u64 = 0;
420  fiat_p224_mulx_u64(&mut x172, &mut x173, x166, 0xffffffff00000000);
421  let mut x174: u64 = 0;
422  let mut x175: fiat_p224_u1 = 0;
423  fiat_p224_addcarryx_u64(&mut x174, &mut x175, 0x0, x173, x170);
424  let mut x176: u64 = 0;
425  let mut x177: fiat_p224_u1 = 0;
426  fiat_p224_addcarryx_u64(&mut x176, &mut x177, x175, x171, x168);
427  let x178: u64 = ((x177 as u64) + x169);
428  let mut x179: u64 = 0;
429  let mut x180: fiat_p224_u1 = 0;
430  fiat_p224_addcarryx_u64(&mut x179, &mut x180, 0x0, x156, x166);
431  let mut x181: u64 = 0;
432  let mut x182: fiat_p224_u1 = 0;
433  fiat_p224_addcarryx_u64(&mut x181, &mut x182, x180, x158, x172);
434  let mut x183: u64 = 0;
435  let mut x184: fiat_p224_u1 = 0;
436  fiat_p224_addcarryx_u64(&mut x183, &mut x184, x182, x160, x174);
437  let mut x185: u64 = 0;
438  let mut x186: fiat_p224_u1 = 0;
439  fiat_p224_addcarryx_u64(&mut x185, &mut x186, x184, x162, x176);
440  let mut x187: u64 = 0;
441  let mut x188: fiat_p224_u1 = 0;
442  fiat_p224_addcarryx_u64(&mut x187, &mut x188, x186, x164, x178);
443  let x189: u64 = ((x188 as u64) + (x165 as u64));
444  let mut x190: u64 = 0;
445  let mut x191: fiat_p224_u1 = 0;
446  fiat_p224_subborrowx_u64(&mut x190, &mut x191, 0x0, x181, (0x1 as u64));
447  let mut x192: u64 = 0;
448  let mut x193: fiat_p224_u1 = 0;
449  fiat_p224_subborrowx_u64(&mut x192, &mut x193, x191, x183, 0xffffffff00000000);
450  let mut x194: u64 = 0;
451  let mut x195: fiat_p224_u1 = 0;
452  fiat_p224_subborrowx_u64(&mut x194, &mut x195, x193, x185, 0xffffffffffffffff);
453  let mut x196: u64 = 0;
454  let mut x197: fiat_p224_u1 = 0;
455  fiat_p224_subborrowx_u64(&mut x196, &mut x197, x195, x187, 0xffffffff);
456  let mut x198: u64 = 0;
457  let mut x199: fiat_p224_u1 = 0;
458  fiat_p224_subborrowx_u64(&mut x198, &mut x199, x197, x189, (0x0 as u64));
459  let mut x200: u64 = 0;
460  fiat_p224_cmovznz_u64(&mut x200, x199, x190, x181);
461  let mut x201: u64 = 0;
462  fiat_p224_cmovznz_u64(&mut x201, x199, x192, x183);
463  let mut x202: u64 = 0;
464  fiat_p224_cmovznz_u64(&mut x202, x199, x194, x185);
465  let mut x203: u64 = 0;
466  fiat_p224_cmovznz_u64(&mut x203, x199, x196, x187);
467  out1[0] = x200;
468  out1[1] = x201;
469  out1[2] = x202;
470  out1[3] = x203;
471}
472
473/// The function fiat_p224_square squares a field element in the Montgomery domain.
474///
475/// Preconditions:
476///   0 ≤ eval arg1 < m
477/// Postconditions:
478///   eval (from_montgomery out1) mod m = (eval (from_montgomery arg1) * eval (from_montgomery arg1)) mod m
479///   0 ≤ eval out1 < m
480///
481#[inline]
482pub fn fiat_p224_square(out1: &mut fiat_p224_montgomery_domain_field_element, arg1: &fiat_p224_montgomery_domain_field_element) {
483  let x1: u64 = (arg1[1]);
484  let x2: u64 = (arg1[2]);
485  let x3: u64 = (arg1[3]);
486  let x4: u64 = (arg1[0]);
487  let mut x5: u64 = 0;
488  let mut x6: u64 = 0;
489  fiat_p224_mulx_u64(&mut x5, &mut x6, x4, (arg1[3]));
490  let mut x7: u64 = 0;
491  let mut x8: u64 = 0;
492  fiat_p224_mulx_u64(&mut x7, &mut x8, x4, (arg1[2]));
493  let mut x9: u64 = 0;
494  let mut x10: u64 = 0;
495  fiat_p224_mulx_u64(&mut x9, &mut x10, x4, (arg1[1]));
496  let mut x11: u64 = 0;
497  let mut x12: u64 = 0;
498  fiat_p224_mulx_u64(&mut x11, &mut x12, x4, (arg1[0]));
499  let mut x13: u64 = 0;
500  let mut x14: fiat_p224_u1 = 0;
501  fiat_p224_addcarryx_u64(&mut x13, &mut x14, 0x0, x12, x9);
502  let mut x15: u64 = 0;
503  let mut x16: fiat_p224_u1 = 0;
504  fiat_p224_addcarryx_u64(&mut x15, &mut x16, x14, x10, x7);
505  let mut x17: u64 = 0;
506  let mut x18: fiat_p224_u1 = 0;
507  fiat_p224_addcarryx_u64(&mut x17, &mut x18, x16, x8, x5);
508  let x19: u64 = ((x18 as u64) + x6);
509  let mut x20: u64 = 0;
510  let mut x21: u64 = 0;
511  fiat_p224_mulx_u64(&mut x20, &mut x21, x11, 0xffffffffffffffff);
512  let mut x22: u64 = 0;
513  let mut x23: u64 = 0;
514  fiat_p224_mulx_u64(&mut x22, &mut x23, x20, 0xffffffff);
515  let mut x24: u64 = 0;
516  let mut x25: u64 = 0;
517  fiat_p224_mulx_u64(&mut x24, &mut x25, x20, 0xffffffffffffffff);
518  let mut x26: u64 = 0;
519  let mut x27: u64 = 0;
520  fiat_p224_mulx_u64(&mut x26, &mut x27, x20, 0xffffffff00000000);
521  let mut x28: u64 = 0;
522  let mut x29: fiat_p224_u1 = 0;
523  fiat_p224_addcarryx_u64(&mut x28, &mut x29, 0x0, x27, x24);
524  let mut x30: u64 = 0;
525  let mut x31: fiat_p224_u1 = 0;
526  fiat_p224_addcarryx_u64(&mut x30, &mut x31, x29, x25, x22);
527  let x32: u64 = ((x31 as u64) + x23);
528  let mut x33: u64 = 0;
529  let mut x34: fiat_p224_u1 = 0;
530  fiat_p224_addcarryx_u64(&mut x33, &mut x34, 0x0, x11, x20);
531  let mut x35: u64 = 0;
532  let mut x36: fiat_p224_u1 = 0;
533  fiat_p224_addcarryx_u64(&mut x35, &mut x36, x34, x13, x26);
534  let mut x37: u64 = 0;
535  let mut x38: fiat_p224_u1 = 0;
536  fiat_p224_addcarryx_u64(&mut x37, &mut x38, x36, x15, x28);
537  let mut x39: u64 = 0;
538  let mut x40: fiat_p224_u1 = 0;
539  fiat_p224_addcarryx_u64(&mut x39, &mut x40, x38, x17, x30);
540  let mut x41: u64 = 0;
541  let mut x42: fiat_p224_u1 = 0;
542  fiat_p224_addcarryx_u64(&mut x41, &mut x42, x40, x19, x32);
543  let mut x43: u64 = 0;
544  let mut x44: u64 = 0;
545  fiat_p224_mulx_u64(&mut x43, &mut x44, x1, (arg1[3]));
546  let mut x45: u64 = 0;
547  let mut x46: u64 = 0;
548  fiat_p224_mulx_u64(&mut x45, &mut x46, x1, (arg1[2]));
549  let mut x47: u64 = 0;
550  let mut x48: u64 = 0;
551  fiat_p224_mulx_u64(&mut x47, &mut x48, x1, (arg1[1]));
552  let mut x49: u64 = 0;
553  let mut x50: u64 = 0;
554  fiat_p224_mulx_u64(&mut x49, &mut x50, x1, (arg1[0]));
555  let mut x51: u64 = 0;
556  let mut x52: fiat_p224_u1 = 0;
557  fiat_p224_addcarryx_u64(&mut x51, &mut x52, 0x0, x50, x47);
558  let mut x53: u64 = 0;
559  let mut x54: fiat_p224_u1 = 0;
560  fiat_p224_addcarryx_u64(&mut x53, &mut x54, x52, x48, x45);
561  let mut x55: u64 = 0;
562  let mut x56: fiat_p224_u1 = 0;
563  fiat_p224_addcarryx_u64(&mut x55, &mut x56, x54, x46, x43);
564  let x57: u64 = ((x56 as u64) + x44);
565  let mut x58: u64 = 0;
566  let mut x59: fiat_p224_u1 = 0;
567  fiat_p224_addcarryx_u64(&mut x58, &mut x59, 0x0, x35, x49);
568  let mut x60: u64 = 0;
569  let mut x61: fiat_p224_u1 = 0;
570  fiat_p224_addcarryx_u64(&mut x60, &mut x61, x59, x37, x51);
571  let mut x62: u64 = 0;
572  let mut x63: fiat_p224_u1 = 0;
573  fiat_p224_addcarryx_u64(&mut x62, &mut x63, x61, x39, x53);
574  let mut x64: u64 = 0;
575  let mut x65: fiat_p224_u1 = 0;
576  fiat_p224_addcarryx_u64(&mut x64, &mut x65, x63, x41, x55);
577  let mut x66: u64 = 0;
578  let mut x67: fiat_p224_u1 = 0;
579  fiat_p224_addcarryx_u64(&mut x66, &mut x67, x65, (x42 as u64), x57);
580  let mut x68: u64 = 0;
581  let mut x69: u64 = 0;
582  fiat_p224_mulx_u64(&mut x68, &mut x69, x58, 0xffffffffffffffff);
583  let mut x70: u64 = 0;
584  let mut x71: u64 = 0;
585  fiat_p224_mulx_u64(&mut x70, &mut x71, x68, 0xffffffff);
586  let mut x72: u64 = 0;
587  let mut x73: u64 = 0;
588  fiat_p224_mulx_u64(&mut x72, &mut x73, x68, 0xffffffffffffffff);
589  let mut x74: u64 = 0;
590  let mut x75: u64 = 0;
591  fiat_p224_mulx_u64(&mut x74, &mut x75, x68, 0xffffffff00000000);
592  let mut x76: u64 = 0;
593  let mut x77: fiat_p224_u1 = 0;
594  fiat_p224_addcarryx_u64(&mut x76, &mut x77, 0x0, x75, x72);
595  let mut x78: u64 = 0;
596  let mut x79: fiat_p224_u1 = 0;
597  fiat_p224_addcarryx_u64(&mut x78, &mut x79, x77, x73, x70);
598  let x80: u64 = ((x79 as u64) + x71);
599  let mut x81: u64 = 0;
600  let mut x82: fiat_p224_u1 = 0;
601  fiat_p224_addcarryx_u64(&mut x81, &mut x82, 0x0, x58, x68);
602  let mut x83: u64 = 0;
603  let mut x84: fiat_p224_u1 = 0;
604  fiat_p224_addcarryx_u64(&mut x83, &mut x84, x82, x60, x74);
605  let mut x85: u64 = 0;
606  let mut x86: fiat_p224_u1 = 0;
607  fiat_p224_addcarryx_u64(&mut x85, &mut x86, x84, x62, x76);
608  let mut x87: u64 = 0;
609  let mut x88: fiat_p224_u1 = 0;
610  fiat_p224_addcarryx_u64(&mut x87, &mut x88, x86, x64, x78);
611  let mut x89: u64 = 0;
612  let mut x90: fiat_p224_u1 = 0;
613  fiat_p224_addcarryx_u64(&mut x89, &mut x90, x88, x66, x80);
614  let x91: u64 = ((x90 as u64) + (x67 as u64));
615  let mut x92: u64 = 0;
616  let mut x93: u64 = 0;
617  fiat_p224_mulx_u64(&mut x92, &mut x93, x2, (arg1[3]));
618  let mut x94: u64 = 0;
619  let mut x95: u64 = 0;
620  fiat_p224_mulx_u64(&mut x94, &mut x95, x2, (arg1[2]));
621  let mut x96: u64 = 0;
622  let mut x97: u64 = 0;
623  fiat_p224_mulx_u64(&mut x96, &mut x97, x2, (arg1[1]));
624  let mut x98: u64 = 0;
625  let mut x99: u64 = 0;
626  fiat_p224_mulx_u64(&mut x98, &mut x99, x2, (arg1[0]));
627  let mut x100: u64 = 0;
628  let mut x101: fiat_p224_u1 = 0;
629  fiat_p224_addcarryx_u64(&mut x100, &mut x101, 0x0, x99, x96);
630  let mut x102: u64 = 0;
631  let mut x103: fiat_p224_u1 = 0;
632  fiat_p224_addcarryx_u64(&mut x102, &mut x103, x101, x97, x94);
633  let mut x104: u64 = 0;
634  let mut x105: fiat_p224_u1 = 0;
635  fiat_p224_addcarryx_u64(&mut x104, &mut x105, x103, x95, x92);
636  let x106: u64 = ((x105 as u64) + x93);
637  let mut x107: u64 = 0;
638  let mut x108: fiat_p224_u1 = 0;
639  fiat_p224_addcarryx_u64(&mut x107, &mut x108, 0x0, x83, x98);
640  let mut x109: u64 = 0;
641  let mut x110: fiat_p224_u1 = 0;
642  fiat_p224_addcarryx_u64(&mut x109, &mut x110, x108, x85, x100);
643  let mut x111: u64 = 0;
644  let mut x112: fiat_p224_u1 = 0;
645  fiat_p224_addcarryx_u64(&mut x111, &mut x112, x110, x87, x102);
646  let mut x113: u64 = 0;
647  let mut x114: fiat_p224_u1 = 0;
648  fiat_p224_addcarryx_u64(&mut x113, &mut x114, x112, x89, x104);
649  let mut x115: u64 = 0;
650  let mut x116: fiat_p224_u1 = 0;
651  fiat_p224_addcarryx_u64(&mut x115, &mut x116, x114, x91, x106);
652  let mut x117: u64 = 0;
653  let mut x118: u64 = 0;
654  fiat_p224_mulx_u64(&mut x117, &mut x118, x107, 0xffffffffffffffff);
655  let mut x119: u64 = 0;
656  let mut x120: u64 = 0;
657  fiat_p224_mulx_u64(&mut x119, &mut x120, x117, 0xffffffff);
658  let mut x121: u64 = 0;
659  let mut x122: u64 = 0;
660  fiat_p224_mulx_u64(&mut x121, &mut x122, x117, 0xffffffffffffffff);
661  let mut x123: u64 = 0;
662  let mut x124: u64 = 0;
663  fiat_p224_mulx_u64(&mut x123, &mut x124, x117, 0xffffffff00000000);
664  let mut x125: u64 = 0;
665  let mut x126: fiat_p224_u1 = 0;
666  fiat_p224_addcarryx_u64(&mut x125, &mut x126, 0x0, x124, x121);
667  let mut x127: u64 = 0;
668  let mut x128: fiat_p224_u1 = 0;
669  fiat_p224_addcarryx_u64(&mut x127, &mut x128, x126, x122, x119);
670  let x129: u64 = ((x128 as u64) + x120);
671  let mut x130: u64 = 0;
672  let mut x131: fiat_p224_u1 = 0;
673  fiat_p224_addcarryx_u64(&mut x130, &mut x131, 0x0, x107, x117);
674  let mut x132: u64 = 0;
675  let mut x133: fiat_p224_u1 = 0;
676  fiat_p224_addcarryx_u64(&mut x132, &mut x133, x131, x109, x123);
677  let mut x134: u64 = 0;
678  let mut x135: fiat_p224_u1 = 0;
679  fiat_p224_addcarryx_u64(&mut x134, &mut x135, x133, x111, x125);
680  let mut x136: u64 = 0;
681  let mut x137: fiat_p224_u1 = 0;
682  fiat_p224_addcarryx_u64(&mut x136, &mut x137, x135, x113, x127);
683  let mut x138: u64 = 0;
684  let mut x139: fiat_p224_u1 = 0;
685  fiat_p224_addcarryx_u64(&mut x138, &mut x139, x137, x115, x129);
686  let x140: u64 = ((x139 as u64) + (x116 as u64));
687  let mut x141: u64 = 0;
688  let mut x142: u64 = 0;
689  fiat_p224_mulx_u64(&mut x141, &mut x142, x3, (arg1[3]));
690  let mut x143: u64 = 0;
691  let mut x144: u64 = 0;
692  fiat_p224_mulx_u64(&mut x143, &mut x144, x3, (arg1[2]));
693  let mut x145: u64 = 0;
694  let mut x146: u64 = 0;
695  fiat_p224_mulx_u64(&mut x145, &mut x146, x3, (arg1[1]));
696  let mut x147: u64 = 0;
697  let mut x148: u64 = 0;
698  fiat_p224_mulx_u64(&mut x147, &mut x148, x3, (arg1[0]));
699  let mut x149: u64 = 0;
700  let mut x150: fiat_p224_u1 = 0;
701  fiat_p224_addcarryx_u64(&mut x149, &mut x150, 0x0, x148, x145);
702  let mut x151: u64 = 0;
703  let mut x152: fiat_p224_u1 = 0;
704  fiat_p224_addcarryx_u64(&mut x151, &mut x152, x150, x146, x143);
705  let mut x153: u64 = 0;
706  let mut x154: fiat_p224_u1 = 0;
707  fiat_p224_addcarryx_u64(&mut x153, &mut x154, x152, x144, x141);
708  let x155: u64 = ((x154 as u64) + x142);
709  let mut x156: u64 = 0;
710  let mut x157: fiat_p224_u1 = 0;
711  fiat_p224_addcarryx_u64(&mut x156, &mut x157, 0x0, x132, x147);
712  let mut x158: u64 = 0;
713  let mut x159: fiat_p224_u1 = 0;
714  fiat_p224_addcarryx_u64(&mut x158, &mut x159, x157, x134, x149);
715  let mut x160: u64 = 0;
716  let mut x161: fiat_p224_u1 = 0;
717  fiat_p224_addcarryx_u64(&mut x160, &mut x161, x159, x136, x151);
718  let mut x162: u64 = 0;
719  let mut x163: fiat_p224_u1 = 0;
720  fiat_p224_addcarryx_u64(&mut x162, &mut x163, x161, x138, x153);
721  let mut x164: u64 = 0;
722  let mut x165: fiat_p224_u1 = 0;
723  fiat_p224_addcarryx_u64(&mut x164, &mut x165, x163, x140, x155);
724  let mut x166: u64 = 0;
725  let mut x167: u64 = 0;
726  fiat_p224_mulx_u64(&mut x166, &mut x167, x156, 0xffffffffffffffff);
727  let mut x168: u64 = 0;
728  let mut x169: u64 = 0;
729  fiat_p224_mulx_u64(&mut x168, &mut x169, x166, 0xffffffff);
730  let mut x170: u64 = 0;
731  let mut x171: u64 = 0;
732  fiat_p224_mulx_u64(&mut x170, &mut x171, x166, 0xffffffffffffffff);
733  let mut x172: u64 = 0;
734  let mut x173: u64 = 0;
735  fiat_p224_mulx_u64(&mut x172, &mut x173, x166, 0xffffffff00000000);
736  let mut x174: u64 = 0;
737  let mut x175: fiat_p224_u1 = 0;
738  fiat_p224_addcarryx_u64(&mut x174, &mut x175, 0x0, x173, x170);
739  let mut x176: u64 = 0;
740  let mut x177: fiat_p224_u1 = 0;
741  fiat_p224_addcarryx_u64(&mut x176, &mut x177, x175, x171, x168);
742  let x178: u64 = ((x177 as u64) + x169);
743  let mut x179: u64 = 0;
744  let mut x180: fiat_p224_u1 = 0;
745  fiat_p224_addcarryx_u64(&mut x179, &mut x180, 0x0, x156, x166);
746  let mut x181: u64 = 0;
747  let mut x182: fiat_p224_u1 = 0;
748  fiat_p224_addcarryx_u64(&mut x181, &mut x182, x180, x158, x172);
749  let mut x183: u64 = 0;
750  let mut x184: fiat_p224_u1 = 0;
751  fiat_p224_addcarryx_u64(&mut x183, &mut x184, x182, x160, x174);
752  let mut x185: u64 = 0;
753  let mut x186: fiat_p224_u1 = 0;
754  fiat_p224_addcarryx_u64(&mut x185, &mut x186, x184, x162, x176);
755  let mut x187: u64 = 0;
756  let mut x188: fiat_p224_u1 = 0;
757  fiat_p224_addcarryx_u64(&mut x187, &mut x188, x186, x164, x178);
758  let x189: u64 = ((x188 as u64) + (x165 as u64));
759  let mut x190: u64 = 0;
760  let mut x191: fiat_p224_u1 = 0;
761  fiat_p224_subborrowx_u64(&mut x190, &mut x191, 0x0, x181, (0x1 as u64));
762  let mut x192: u64 = 0;
763  let mut x193: fiat_p224_u1 = 0;
764  fiat_p224_subborrowx_u64(&mut x192, &mut x193, x191, x183, 0xffffffff00000000);
765  let mut x194: u64 = 0;
766  let mut x195: fiat_p224_u1 = 0;
767  fiat_p224_subborrowx_u64(&mut x194, &mut x195, x193, x185, 0xffffffffffffffff);
768  let mut x196: u64 = 0;
769  let mut x197: fiat_p224_u1 = 0;
770  fiat_p224_subborrowx_u64(&mut x196, &mut x197, x195, x187, 0xffffffff);
771  let mut x198: u64 = 0;
772  let mut x199: fiat_p224_u1 = 0;
773  fiat_p224_subborrowx_u64(&mut x198, &mut x199, x197, x189, (0x0 as u64));
774  let mut x200: u64 = 0;
775  fiat_p224_cmovznz_u64(&mut x200, x199, x190, x181);
776  let mut x201: u64 = 0;
777  fiat_p224_cmovznz_u64(&mut x201, x199, x192, x183);
778  let mut x202: u64 = 0;
779  fiat_p224_cmovznz_u64(&mut x202, x199, x194, x185);
780  let mut x203: u64 = 0;
781  fiat_p224_cmovznz_u64(&mut x203, x199, x196, x187);
782  out1[0] = x200;
783  out1[1] = x201;
784  out1[2] = x202;
785  out1[3] = x203;
786}
787
788/// The function fiat_p224_add adds two field elements in the Montgomery domain.
789///
790/// Preconditions:
791///   0 ≤ eval arg1 < m
792///   0 ≤ eval arg2 < m
793/// Postconditions:
794///   eval (from_montgomery out1) mod m = (eval (from_montgomery arg1) + eval (from_montgomery arg2)) mod m
795///   0 ≤ eval out1 < m
796///
797#[inline]
798pub fn fiat_p224_add(out1: &mut fiat_p224_montgomery_domain_field_element, arg1: &fiat_p224_montgomery_domain_field_element, arg2: &fiat_p224_montgomery_domain_field_element) {
799  let mut x1: u64 = 0;
800  let mut x2: fiat_p224_u1 = 0;
801  fiat_p224_addcarryx_u64(&mut x1, &mut x2, 0x0, (arg1[0]), (arg2[0]));
802  let mut x3: u64 = 0;
803  let mut x4: fiat_p224_u1 = 0;
804  fiat_p224_addcarryx_u64(&mut x3, &mut x4, x2, (arg1[1]), (arg2[1]));
805  let mut x5: u64 = 0;
806  let mut x6: fiat_p224_u1 = 0;
807  fiat_p224_addcarryx_u64(&mut x5, &mut x6, x4, (arg1[2]), (arg2[2]));
808  let mut x7: u64 = 0;
809  let mut x8: fiat_p224_u1 = 0;
810  fiat_p224_addcarryx_u64(&mut x7, &mut x8, x6, (arg1[3]), (arg2[3]));
811  let mut x9: u64 = 0;
812  let mut x10: fiat_p224_u1 = 0;
813  fiat_p224_subborrowx_u64(&mut x9, &mut x10, 0x0, x1, (0x1 as u64));
814  let mut x11: u64 = 0;
815  let mut x12: fiat_p224_u1 = 0;
816  fiat_p224_subborrowx_u64(&mut x11, &mut x12, x10, x3, 0xffffffff00000000);
817  let mut x13: u64 = 0;
818  let mut x14: fiat_p224_u1 = 0;
819  fiat_p224_subborrowx_u64(&mut x13, &mut x14, x12, x5, 0xffffffffffffffff);
820  let mut x15: u64 = 0;
821  let mut x16: fiat_p224_u1 = 0;
822  fiat_p224_subborrowx_u64(&mut x15, &mut x16, x14, x7, 0xffffffff);
823  let mut x17: u64 = 0;
824  let mut x18: fiat_p224_u1 = 0;
825  fiat_p224_subborrowx_u64(&mut x17, &mut x18, x16, (x8 as u64), (0x0 as u64));
826  let mut x19: u64 = 0;
827  fiat_p224_cmovznz_u64(&mut x19, x18, x9, x1);
828  let mut x20: u64 = 0;
829  fiat_p224_cmovznz_u64(&mut x20, x18, x11, x3);
830  let mut x21: u64 = 0;
831  fiat_p224_cmovznz_u64(&mut x21, x18, x13, x5);
832  let mut x22: u64 = 0;
833  fiat_p224_cmovznz_u64(&mut x22, x18, x15, x7);
834  out1[0] = x19;
835  out1[1] = x20;
836  out1[2] = x21;
837  out1[3] = x22;
838}
839
840/// The function fiat_p224_sub subtracts two field elements in the Montgomery domain.
841///
842/// Preconditions:
843///   0 ≤ eval arg1 < m
844///   0 ≤ eval arg2 < m
845/// Postconditions:
846///   eval (from_montgomery out1) mod m = (eval (from_montgomery arg1) - eval (from_montgomery arg2)) mod m
847///   0 ≤ eval out1 < m
848///
849#[inline]
850pub fn fiat_p224_sub(out1: &mut fiat_p224_montgomery_domain_field_element, arg1: &fiat_p224_montgomery_domain_field_element, arg2: &fiat_p224_montgomery_domain_field_element) {
851  let mut x1: u64 = 0;
852  let mut x2: fiat_p224_u1 = 0;
853  fiat_p224_subborrowx_u64(&mut x1, &mut x2, 0x0, (arg1[0]), (arg2[0]));
854  let mut x3: u64 = 0;
855  let mut x4: fiat_p224_u1 = 0;
856  fiat_p224_subborrowx_u64(&mut x3, &mut x4, x2, (arg1[1]), (arg2[1]));
857  let mut x5: u64 = 0;
858  let mut x6: fiat_p224_u1 = 0;
859  fiat_p224_subborrowx_u64(&mut x5, &mut x6, x4, (arg1[2]), (arg2[2]));
860  let mut x7: u64 = 0;
861  let mut x8: fiat_p224_u1 = 0;
862  fiat_p224_subborrowx_u64(&mut x7, &mut x8, x6, (arg1[3]), (arg2[3]));
863  let mut x9: u64 = 0;
864  fiat_p224_cmovznz_u64(&mut x9, x8, (0x0 as u64), 0xffffffffffffffff);
865  let mut x10: u64 = 0;
866  let mut x11: fiat_p224_u1 = 0;
867  fiat_p224_addcarryx_u64(&mut x10, &mut x11, 0x0, x1, (((x9 & (0x1 as u64)) as fiat_p224_u1) as u64));
868  let mut x12: u64 = 0;
869  let mut x13: fiat_p224_u1 = 0;
870  fiat_p224_addcarryx_u64(&mut x12, &mut x13, x11, x3, (x9 & 0xffffffff00000000));
871  let mut x14: u64 = 0;
872  let mut x15: fiat_p224_u1 = 0;
873  fiat_p224_addcarryx_u64(&mut x14, &mut x15, x13, x5, x9);
874  let mut x16: u64 = 0;
875  let mut x17: fiat_p224_u1 = 0;
876  fiat_p224_addcarryx_u64(&mut x16, &mut x17, x15, x7, (x9 & 0xffffffff));
877  out1[0] = x10;
878  out1[1] = x12;
879  out1[2] = x14;
880  out1[3] = x16;
881}
882
883/// The function fiat_p224_opp negates a field element in the Montgomery domain.
884///
885/// Preconditions:
886///   0 ≤ eval arg1 < m
887/// Postconditions:
888///   eval (from_montgomery out1) mod m = -eval (from_montgomery arg1) mod m
889///   0 ≤ eval out1 < m
890///
891#[inline]
892pub fn fiat_p224_opp(out1: &mut fiat_p224_montgomery_domain_field_element, arg1: &fiat_p224_montgomery_domain_field_element) {
893  let mut x1: u64 = 0;
894  let mut x2: fiat_p224_u1 = 0;
895  fiat_p224_subborrowx_u64(&mut x1, &mut x2, 0x0, (0x0 as u64), (arg1[0]));
896  let mut x3: u64 = 0;
897  let mut x4: fiat_p224_u1 = 0;
898  fiat_p224_subborrowx_u64(&mut x3, &mut x4, x2, (0x0 as u64), (arg1[1]));
899  let mut x5: u64 = 0;
900  let mut x6: fiat_p224_u1 = 0;
901  fiat_p224_subborrowx_u64(&mut x5, &mut x6, x4, (0x0 as u64), (arg1[2]));
902  let mut x7: u64 = 0;
903  let mut x8: fiat_p224_u1 = 0;
904  fiat_p224_subborrowx_u64(&mut x7, &mut x8, x6, (0x0 as u64), (arg1[3]));
905  let mut x9: u64 = 0;
906  fiat_p224_cmovznz_u64(&mut x9, x8, (0x0 as u64), 0xffffffffffffffff);
907  let mut x10: u64 = 0;
908  let mut x11: fiat_p224_u1 = 0;
909  fiat_p224_addcarryx_u64(&mut x10, &mut x11, 0x0, x1, (((x9 & (0x1 as u64)) as fiat_p224_u1) as u64));
910  let mut x12: u64 = 0;
911  let mut x13: fiat_p224_u1 = 0;
912  fiat_p224_addcarryx_u64(&mut x12, &mut x13, x11, x3, (x9 & 0xffffffff00000000));
913  let mut x14: u64 = 0;
914  let mut x15: fiat_p224_u1 = 0;
915  fiat_p224_addcarryx_u64(&mut x14, &mut x15, x13, x5, x9);
916  let mut x16: u64 = 0;
917  let mut x17: fiat_p224_u1 = 0;
918  fiat_p224_addcarryx_u64(&mut x16, &mut x17, x15, x7, (x9 & 0xffffffff));
919  out1[0] = x10;
920  out1[1] = x12;
921  out1[2] = x14;
922  out1[3] = x16;
923}
924
925/// The function fiat_p224_from_montgomery translates a field element out of the Montgomery domain.
926///
927/// Preconditions:
928///   0 ≤ eval arg1 < m
929/// Postconditions:
930///   eval out1 mod m = (eval arg1 * ((2^64)⁻¹ mod m)^4) mod m
931///   0 ≤ eval out1 < m
932///
933#[inline]
934pub fn fiat_p224_from_montgomery(out1: &mut fiat_p224_non_montgomery_domain_field_element, arg1: &fiat_p224_montgomery_domain_field_element) {
935  let x1: u64 = (arg1[0]);
936  let mut x2: u64 = 0;
937  let mut x3: u64 = 0;
938  fiat_p224_mulx_u64(&mut x2, &mut x3, x1, 0xffffffffffffffff);
939  let mut x4: u64 = 0;
940  let mut x5: u64 = 0;
941  fiat_p224_mulx_u64(&mut x4, &mut x5, x2, 0xffffffff);
942  let mut x6: u64 = 0;
943  let mut x7: u64 = 0;
944  fiat_p224_mulx_u64(&mut x6, &mut x7, x2, 0xffffffffffffffff);
945  let mut x8: u64 = 0;
946  let mut x9: u64 = 0;
947  fiat_p224_mulx_u64(&mut x8, &mut x9, x2, 0xffffffff00000000);
948  let mut x10: u64 = 0;
949  let mut x11: fiat_p224_u1 = 0;
950  fiat_p224_addcarryx_u64(&mut x10, &mut x11, 0x0, x9, x6);
951  let mut x12: u64 = 0;
952  let mut x13: fiat_p224_u1 = 0;
953  fiat_p224_addcarryx_u64(&mut x12, &mut x13, x11, x7, x4);
954  let mut x14: u64 = 0;
955  let mut x15: fiat_p224_u1 = 0;
956  fiat_p224_addcarryx_u64(&mut x14, &mut x15, 0x0, x1, x2);
957  let mut x16: u64 = 0;
958  let mut x17: fiat_p224_u1 = 0;
959  fiat_p224_addcarryx_u64(&mut x16, &mut x17, x15, (0x0 as u64), x8);
960  let mut x18: u64 = 0;
961  let mut x19: fiat_p224_u1 = 0;
962  fiat_p224_addcarryx_u64(&mut x18, &mut x19, x17, (0x0 as u64), x10);
963  let mut x20: u64 = 0;
964  let mut x21: fiat_p224_u1 = 0;
965  fiat_p224_addcarryx_u64(&mut x20, &mut x21, x19, (0x0 as u64), x12);
966  let mut x22: u64 = 0;
967  let mut x23: fiat_p224_u1 = 0;
968  fiat_p224_addcarryx_u64(&mut x22, &mut x23, 0x0, x16, (arg1[1]));
969  let mut x24: u64 = 0;
970  let mut x25: fiat_p224_u1 = 0;
971  fiat_p224_addcarryx_u64(&mut x24, &mut x25, x23, x18, (0x0 as u64));
972  let mut x26: u64 = 0;
973  let mut x27: fiat_p224_u1 = 0;
974  fiat_p224_addcarryx_u64(&mut x26, &mut x27, x25, x20, (0x0 as u64));
975  let mut x28: u64 = 0;
976  let mut x29: u64 = 0;
977  fiat_p224_mulx_u64(&mut x28, &mut x29, x22, 0xffffffffffffffff);
978  let mut x30: u64 = 0;
979  let mut x31: u64 = 0;
980  fiat_p224_mulx_u64(&mut x30, &mut x31, x28, 0xffffffff);
981  let mut x32: u64 = 0;
982  let mut x33: u64 = 0;
983  fiat_p224_mulx_u64(&mut x32, &mut x33, x28, 0xffffffffffffffff);
984  let mut x34: u64 = 0;
985  let mut x35: u64 = 0;
986  fiat_p224_mulx_u64(&mut x34, &mut x35, x28, 0xffffffff00000000);
987  let mut x36: u64 = 0;
988  let mut x37: fiat_p224_u1 = 0;
989  fiat_p224_addcarryx_u64(&mut x36, &mut x37, 0x0, x35, x32);
990  let mut x38: u64 = 0;
991  let mut x39: fiat_p224_u1 = 0;
992  fiat_p224_addcarryx_u64(&mut x38, &mut x39, x37, x33, x30);
993  let mut x40: u64 = 0;
994  let mut x41: fiat_p224_u1 = 0;
995  fiat_p224_addcarryx_u64(&mut x40, &mut x41, 0x0, x22, x28);
996  let mut x42: u64 = 0;
997  let mut x43: fiat_p224_u1 = 0;
998  fiat_p224_addcarryx_u64(&mut x42, &mut x43, x41, x24, x34);
999  let mut x44: u64 = 0;
1000  let mut x45: fiat_p224_u1 = 0;
1001  fiat_p224_addcarryx_u64(&mut x44, &mut x45, x43, x26, x36);
1002  let mut x46: u64 = 0;
1003  let mut x47: fiat_p224_u1 = 0;
1004  fiat_p224_addcarryx_u64(&mut x46, &mut x47, x45, ((x27 as u64) + ((x21 as u64) + ((x13 as u64) + x5))), x38);
1005  let mut x48: u64 = 0;
1006  let mut x49: fiat_p224_u1 = 0;
1007  fiat_p224_addcarryx_u64(&mut x48, &mut x49, 0x0, x42, (arg1[2]));
1008  let mut x50: u64 = 0;
1009  let mut x51: fiat_p224_u1 = 0;
1010  fiat_p224_addcarryx_u64(&mut x50, &mut x51, x49, x44, (0x0 as u64));
1011  let mut x52: u64 = 0;
1012  let mut x53: fiat_p224_u1 = 0;
1013  fiat_p224_addcarryx_u64(&mut x52, &mut x53, x51, x46, (0x0 as u64));
1014  let mut x54: u64 = 0;
1015  let mut x55: u64 = 0;
1016  fiat_p224_mulx_u64(&mut x54, &mut x55, x48, 0xffffffffffffffff);
1017  let mut x56: u64 = 0;
1018  let mut x57: u64 = 0;
1019  fiat_p224_mulx_u64(&mut x56, &mut x57, x54, 0xffffffff);
1020  let mut x58: u64 = 0;
1021  let mut x59: u64 = 0;
1022  fiat_p224_mulx_u64(&mut x58, &mut x59, x54, 0xffffffffffffffff);
1023  let mut x60: u64 = 0;
1024  let mut x61: u64 = 0;
1025  fiat_p224_mulx_u64(&mut x60, &mut x61, x54, 0xffffffff00000000);
1026  let mut x62: u64 = 0;
1027  let mut x63: fiat_p224_u1 = 0;
1028  fiat_p224_addcarryx_u64(&mut x62, &mut x63, 0x0, x61, x58);
1029  let mut x64: u64 = 0;
1030  let mut x65: fiat_p224_u1 = 0;
1031  fiat_p224_addcarryx_u64(&mut x64, &mut x65, x63, x59, x56);
1032  let mut x66: u64 = 0;
1033  let mut x67: fiat_p224_u1 = 0;
1034  fiat_p224_addcarryx_u64(&mut x66, &mut x67, 0x0, x48, x54);
1035  let mut x68: u64 = 0;
1036  let mut x69: fiat_p224_u1 = 0;
1037  fiat_p224_addcarryx_u64(&mut x68, &mut x69, x67, x50, x60);
1038  let mut x70: u64 = 0;
1039  let mut x71: fiat_p224_u1 = 0;
1040  fiat_p224_addcarryx_u64(&mut x70, &mut x71, x69, x52, x62);
1041  let mut x72: u64 = 0;
1042  let mut x73: fiat_p224_u1 = 0;
1043  fiat_p224_addcarryx_u64(&mut x72, &mut x73, x71, ((x53 as u64) + ((x47 as u64) + ((x39 as u64) + x31))), x64);
1044  let mut x74: u64 = 0;
1045  let mut x75: fiat_p224_u1 = 0;
1046  fiat_p224_addcarryx_u64(&mut x74, &mut x75, 0x0, x68, (arg1[3]));
1047  let mut x76: u64 = 0;
1048  let mut x77: fiat_p224_u1 = 0;
1049  fiat_p224_addcarryx_u64(&mut x76, &mut x77, x75, x70, (0x0 as u64));
1050  let mut x78: u64 = 0;
1051  let mut x79: fiat_p224_u1 = 0;
1052  fiat_p224_addcarryx_u64(&mut x78, &mut x79, x77, x72, (0x0 as u64));
1053  let mut x80: u64 = 0;
1054  let mut x81: u64 = 0;
1055  fiat_p224_mulx_u64(&mut x80, &mut x81, x74, 0xffffffffffffffff);
1056  let mut x82: u64 = 0;
1057  let mut x83: u64 = 0;
1058  fiat_p224_mulx_u64(&mut x82, &mut x83, x80, 0xffffffff);
1059  let mut x84: u64 = 0;
1060  let mut x85: u64 = 0;
1061  fiat_p224_mulx_u64(&mut x84, &mut x85, x80, 0xffffffffffffffff);
1062  let mut x86: u64 = 0;
1063  let mut x87: u64 = 0;
1064  fiat_p224_mulx_u64(&mut x86, &mut x87, x80, 0xffffffff00000000);
1065  let mut x88: u64 = 0;
1066  let mut x89: fiat_p224_u1 = 0;
1067  fiat_p224_addcarryx_u64(&mut x88, &mut x89, 0x0, x87, x84);
1068  let mut x90: u64 = 0;
1069  let mut x91: fiat_p224_u1 = 0;
1070  fiat_p224_addcarryx_u64(&mut x90, &mut x91, x89, x85, x82);
1071  let mut x92: u64 = 0;
1072  let mut x93: fiat_p224_u1 = 0;
1073  fiat_p224_addcarryx_u64(&mut x92, &mut x93, 0x0, x74, x80);
1074  let mut x94: u64 = 0;
1075  let mut x95: fiat_p224_u1 = 0;
1076  fiat_p224_addcarryx_u64(&mut x94, &mut x95, x93, x76, x86);
1077  let mut x96: u64 = 0;
1078  let mut x97: fiat_p224_u1 = 0;
1079  fiat_p224_addcarryx_u64(&mut x96, &mut x97, x95, x78, x88);
1080  let mut x98: u64 = 0;
1081  let mut x99: fiat_p224_u1 = 0;
1082  fiat_p224_addcarryx_u64(&mut x98, &mut x99, x97, ((x79 as u64) + ((x73 as u64) + ((x65 as u64) + x57))), x90);
1083  let x100: u64 = ((x99 as u64) + ((x91 as u64) + x83));
1084  let mut x101: u64 = 0;
1085  let mut x102: fiat_p224_u1 = 0;
1086  fiat_p224_subborrowx_u64(&mut x101, &mut x102, 0x0, x94, (0x1 as u64));
1087  let mut x103: u64 = 0;
1088  let mut x104: fiat_p224_u1 = 0;
1089  fiat_p224_subborrowx_u64(&mut x103, &mut x104, x102, x96, 0xffffffff00000000);
1090  let mut x105: u64 = 0;
1091  let mut x106: fiat_p224_u1 = 0;
1092  fiat_p224_subborrowx_u64(&mut x105, &mut x106, x104, x98, 0xffffffffffffffff);
1093  let mut x107: u64 = 0;
1094  let mut x108: fiat_p224_u1 = 0;
1095  fiat_p224_subborrowx_u64(&mut x107, &mut x108, x106, x100, 0xffffffff);
1096  let mut x109: u64 = 0;
1097  let mut x110: fiat_p224_u1 = 0;
1098  fiat_p224_subborrowx_u64(&mut x109, &mut x110, x108, (0x0 as u64), (0x0 as u64));
1099  let mut x111: u64 = 0;
1100  fiat_p224_cmovznz_u64(&mut x111, x110, x101, x94);
1101  let mut x112: u64 = 0;
1102  fiat_p224_cmovznz_u64(&mut x112, x110, x103, x96);
1103  let mut x113: u64 = 0;
1104  fiat_p224_cmovznz_u64(&mut x113, x110, x105, x98);
1105  let mut x114: u64 = 0;
1106  fiat_p224_cmovznz_u64(&mut x114, x110, x107, x100);
1107  out1[0] = x111;
1108  out1[1] = x112;
1109  out1[2] = x113;
1110  out1[3] = x114;
1111}
1112
1113/// The function fiat_p224_to_montgomery translates a field element into the Montgomery domain.
1114///
1115/// Preconditions:
1116///   0 ≤ eval arg1 < m
1117/// Postconditions:
1118///   eval (from_montgomery out1) mod m = eval arg1 mod m
1119///   0 ≤ eval out1 < m
1120///
1121#[inline]
1122pub fn fiat_p224_to_montgomery(out1: &mut fiat_p224_montgomery_domain_field_element, arg1: &fiat_p224_non_montgomery_domain_field_element) {
1123  let x1: u64 = (arg1[1]);
1124  let x2: u64 = (arg1[2]);
1125  let x3: u64 = (arg1[3]);
1126  let x4: u64 = (arg1[0]);
1127  let mut x5: u64 = 0;
1128  let mut x6: u64 = 0;
1129  fiat_p224_mulx_u64(&mut x5, &mut x6, x4, 0xffffffff);
1130  let mut x7: u64 = 0;
1131  let mut x8: u64 = 0;
1132  fiat_p224_mulx_u64(&mut x7, &mut x8, x4, 0xfffffffe00000000);
1133  let mut x9: u64 = 0;
1134  let mut x10: u64 = 0;
1135  fiat_p224_mulx_u64(&mut x9, &mut x10, x4, 0xffffffff00000000);
1136  let mut x11: u64 = 0;
1137  let mut x12: u64 = 0;
1138  fiat_p224_mulx_u64(&mut x11, &mut x12, x4, 0xffffffff00000001);
1139  let mut x13: u64 = 0;
1140  let mut x14: fiat_p224_u1 = 0;
1141  fiat_p224_addcarryx_u64(&mut x13, &mut x14, 0x0, x12, x9);
1142  let mut x15: u64 = 0;
1143  let mut x16: fiat_p224_u1 = 0;
1144  fiat_p224_addcarryx_u64(&mut x15, &mut x16, x14, x10, x7);
1145  let mut x17: u64 = 0;
1146  let mut x18: fiat_p224_u1 = 0;
1147  fiat_p224_addcarryx_u64(&mut x17, &mut x18, x16, x8, x5);
1148  let mut x19: u64 = 0;
1149  let mut x20: u64 = 0;
1150  fiat_p224_mulx_u64(&mut x19, &mut x20, x11, 0xffffffffffffffff);
1151  let mut x21: u64 = 0;
1152  let mut x22: u64 = 0;
1153  fiat_p224_mulx_u64(&mut x21, &mut x22, x19, 0xffffffff);
1154  let mut x23: u64 = 0;
1155  let mut x24: u64 = 0;
1156  fiat_p224_mulx_u64(&mut x23, &mut x24, x19, 0xffffffffffffffff);
1157  let mut x25: u64 = 0;
1158  let mut x26: u64 = 0;
1159  fiat_p224_mulx_u64(&mut x25, &mut x26, x19, 0xffffffff00000000);
1160  let mut x27: u64 = 0;
1161  let mut x28: fiat_p224_u1 = 0;
1162  fiat_p224_addcarryx_u64(&mut x27, &mut x28, 0x0, x26, x23);
1163  let mut x29: u64 = 0;
1164  let mut x30: fiat_p224_u1 = 0;
1165  fiat_p224_addcarryx_u64(&mut x29, &mut x30, x28, x24, x21);
1166  let mut x31: u64 = 0;
1167  let mut x32: fiat_p224_u1 = 0;
1168  fiat_p224_addcarryx_u64(&mut x31, &mut x32, 0x0, x11, x19);
1169  let mut x33: u64 = 0;
1170  let mut x34: fiat_p224_u1 = 0;
1171  fiat_p224_addcarryx_u64(&mut x33, &mut x34, x32, x13, x25);
1172  let mut x35: u64 = 0;
1173  let mut x36: fiat_p224_u1 = 0;
1174  fiat_p224_addcarryx_u64(&mut x35, &mut x36, x34, x15, x27);
1175  let mut x37: u64 = 0;
1176  let mut x38: fiat_p224_u1 = 0;
1177  fiat_p224_addcarryx_u64(&mut x37, &mut x38, x36, x17, x29);
1178  let mut x39: u64 = 0;
1179  let mut x40: u64 = 0;
1180  fiat_p224_mulx_u64(&mut x39, &mut x40, x1, 0xffffffff);
1181  let mut x41: u64 = 0;
1182  let mut x42: u64 = 0;
1183  fiat_p224_mulx_u64(&mut x41, &mut x42, x1, 0xfffffffe00000000);
1184  let mut x43: u64 = 0;
1185  let mut x44: u64 = 0;
1186  fiat_p224_mulx_u64(&mut x43, &mut x44, x1, 0xffffffff00000000);
1187  let mut x45: u64 = 0;
1188  let mut x46: u64 = 0;
1189  fiat_p224_mulx_u64(&mut x45, &mut x46, x1, 0xffffffff00000001);
1190  let mut x47: u64 = 0;
1191  let mut x48: fiat_p224_u1 = 0;
1192  fiat_p224_addcarryx_u64(&mut x47, &mut x48, 0x0, x46, x43);
1193  let mut x49: u64 = 0;
1194  let mut x50: fiat_p224_u1 = 0;
1195  fiat_p224_addcarryx_u64(&mut x49, &mut x50, x48, x44, x41);
1196  let mut x51: u64 = 0;
1197  let mut x52: fiat_p224_u1 = 0;
1198  fiat_p224_addcarryx_u64(&mut x51, &mut x52, x50, x42, x39);
1199  let mut x53: u64 = 0;
1200  let mut x54: fiat_p224_u1 = 0;
1201  fiat_p224_addcarryx_u64(&mut x53, &mut x54, 0x0, x33, x45);
1202  let mut x55: u64 = 0;
1203  let mut x56: fiat_p224_u1 = 0;
1204  fiat_p224_addcarryx_u64(&mut x55, &mut x56, x54, x35, x47);
1205  let mut x57: u64 = 0;
1206  let mut x58: fiat_p224_u1 = 0;
1207  fiat_p224_addcarryx_u64(&mut x57, &mut x58, x56, x37, x49);
1208  let mut x59: u64 = 0;
1209  let mut x60: fiat_p224_u1 = 0;
1210  fiat_p224_addcarryx_u64(&mut x59, &mut x60, x58, (((x38 as u64) + ((x18 as u64) + x6)) + ((x30 as u64) + x22)), x51);
1211  let mut x61: u64 = 0;
1212  let mut x62: u64 = 0;
1213  fiat_p224_mulx_u64(&mut x61, &mut x62, x53, 0xffffffffffffffff);
1214  let mut x63: u64 = 0;
1215  let mut x64: u64 = 0;
1216  fiat_p224_mulx_u64(&mut x63, &mut x64, x61, 0xffffffff);
1217  let mut x65: u64 = 0;
1218  let mut x66: u64 = 0;
1219  fiat_p224_mulx_u64(&mut x65, &mut x66, x61, 0xffffffffffffffff);
1220  let mut x67: u64 = 0;
1221  let mut x68: u64 = 0;
1222  fiat_p224_mulx_u64(&mut x67, &mut x68, x61, 0xffffffff00000000);
1223  let mut x69: u64 = 0;
1224  let mut x70: fiat_p224_u1 = 0;
1225  fiat_p224_addcarryx_u64(&mut x69, &mut x70, 0x0, x68, x65);
1226  let mut x71: u64 = 0;
1227  let mut x72: fiat_p224_u1 = 0;
1228  fiat_p224_addcarryx_u64(&mut x71, &mut x72, x70, x66, x63);
1229  let mut x73: u64 = 0;
1230  let mut x74: fiat_p224_u1 = 0;
1231  fiat_p224_addcarryx_u64(&mut x73, &mut x74, 0x0, x53, x61);
1232  let mut x75: u64 = 0;
1233  let mut x76: fiat_p224_u1 = 0;
1234  fiat_p224_addcarryx_u64(&mut x75, &mut x76, x74, x55, x67);
1235  let mut x77: u64 = 0;
1236  let mut x78: fiat_p224_u1 = 0;
1237  fiat_p224_addcarryx_u64(&mut x77, &mut x78, x76, x57, x69);
1238  let mut x79: u64 = 0;
1239  let mut x80: fiat_p224_u1 = 0;
1240  fiat_p224_addcarryx_u64(&mut x79, &mut x80, x78, x59, x71);
1241  let mut x81: u64 = 0;
1242  let mut x82: u64 = 0;
1243  fiat_p224_mulx_u64(&mut x81, &mut x82, x2, 0xffffffff);
1244  let mut x83: u64 = 0;
1245  let mut x84: u64 = 0;
1246  fiat_p224_mulx_u64(&mut x83, &mut x84, x2, 0xfffffffe00000000);
1247  let mut x85: u64 = 0;
1248  let mut x86: u64 = 0;
1249  fiat_p224_mulx_u64(&mut x85, &mut x86, x2, 0xffffffff00000000);
1250  let mut x87: u64 = 0;
1251  let mut x88: u64 = 0;
1252  fiat_p224_mulx_u64(&mut x87, &mut x88, x2, 0xffffffff00000001);
1253  let mut x89: u64 = 0;
1254  let mut x90: fiat_p224_u1 = 0;
1255  fiat_p224_addcarryx_u64(&mut x89, &mut x90, 0x0, x88, x85);
1256  let mut x91: u64 = 0;
1257  let mut x92: fiat_p224_u1 = 0;
1258  fiat_p224_addcarryx_u64(&mut x91, &mut x92, x90, x86, x83);
1259  let mut x93: u64 = 0;
1260  let mut x94: fiat_p224_u1 = 0;
1261  fiat_p224_addcarryx_u64(&mut x93, &mut x94, x92, x84, x81);
1262  let mut x95: u64 = 0;
1263  let mut x96: fiat_p224_u1 = 0;
1264  fiat_p224_addcarryx_u64(&mut x95, &mut x96, 0x0, x75, x87);
1265  let mut x97: u64 = 0;
1266  let mut x98: fiat_p224_u1 = 0;
1267  fiat_p224_addcarryx_u64(&mut x97, &mut x98, x96, x77, x89);
1268  let mut x99: u64 = 0;
1269  let mut x100: fiat_p224_u1 = 0;
1270  fiat_p224_addcarryx_u64(&mut x99, &mut x100, x98, x79, x91);
1271  let mut x101: u64 = 0;
1272  let mut x102: fiat_p224_u1 = 0;
1273  fiat_p224_addcarryx_u64(&mut x101, &mut x102, x100, (((x80 as u64) + ((x60 as u64) + ((x52 as u64) + x40))) + ((x72 as u64) + x64)), x93);
1274  let mut x103: u64 = 0;
1275  let mut x104: u64 = 0;
1276  fiat_p224_mulx_u64(&mut x103, &mut x104, x95, 0xffffffffffffffff);
1277  let mut x105: u64 = 0;
1278  let mut x106: u64 = 0;
1279  fiat_p224_mulx_u64(&mut x105, &mut x106, x103, 0xffffffff);
1280  let mut x107: u64 = 0;
1281  let mut x108: u64 = 0;
1282  fiat_p224_mulx_u64(&mut x107, &mut x108, x103, 0xffffffffffffffff);
1283  let mut x109: u64 = 0;
1284  let mut x110: u64 = 0;
1285  fiat_p224_mulx_u64(&mut x109, &mut x110, x103, 0xffffffff00000000);
1286  let mut x111: u64 = 0;
1287  let mut x112: fiat_p224_u1 = 0;
1288  fiat_p224_addcarryx_u64(&mut x111, &mut x112, 0x0, x110, x107);
1289  let mut x113: u64 = 0;
1290  let mut x114: fiat_p224_u1 = 0;
1291  fiat_p224_addcarryx_u64(&mut x113, &mut x114, x112, x108, x105);
1292  let mut x115: u64 = 0;
1293  let mut x116: fiat_p224_u1 = 0;
1294  fiat_p224_addcarryx_u64(&mut x115, &mut x116, 0x0, x95, x103);
1295  let mut x117: u64 = 0;
1296  let mut x118: fiat_p224_u1 = 0;
1297  fiat_p224_addcarryx_u64(&mut x117, &mut x118, x116, x97, x109);
1298  let mut x119: u64 = 0;
1299  let mut x120: fiat_p224_u1 = 0;
1300  fiat_p224_addcarryx_u64(&mut x119, &mut x120, x118, x99, x111);
1301  let mut x121: u64 = 0;
1302  let mut x122: fiat_p224_u1 = 0;
1303  fiat_p224_addcarryx_u64(&mut x121, &mut x122, x120, x101, x113);
1304  let mut x123: u64 = 0;
1305  let mut x124: u64 = 0;
1306  fiat_p224_mulx_u64(&mut x123, &mut x124, x3, 0xffffffff);
1307  let mut x125: u64 = 0;
1308  let mut x126: u64 = 0;
1309  fiat_p224_mulx_u64(&mut x125, &mut x126, x3, 0xfffffffe00000000);
1310  let mut x127: u64 = 0;
1311  let mut x128: u64 = 0;
1312  fiat_p224_mulx_u64(&mut x127, &mut x128, x3, 0xffffffff00000000);
1313  let mut x129: u64 = 0;
1314  let mut x130: u64 = 0;
1315  fiat_p224_mulx_u64(&mut x129, &mut x130, x3, 0xffffffff00000001);
1316  let mut x131: u64 = 0;
1317  let mut x132: fiat_p224_u1 = 0;
1318  fiat_p224_addcarryx_u64(&mut x131, &mut x132, 0x0, x130, x127);
1319  let mut x133: u64 = 0;
1320  let mut x134: fiat_p224_u1 = 0;
1321  fiat_p224_addcarryx_u64(&mut x133, &mut x134, x132, x128, x125);
1322  let mut x135: u64 = 0;
1323  let mut x136: fiat_p224_u1 = 0;
1324  fiat_p224_addcarryx_u64(&mut x135, &mut x136, x134, x126, x123);
1325  let mut x137: u64 = 0;
1326  let mut x138: fiat_p224_u1 = 0;
1327  fiat_p224_addcarryx_u64(&mut x137, &mut x138, 0x0, x117, x129);
1328  let mut x139: u64 = 0;
1329  let mut x140: fiat_p224_u1 = 0;
1330  fiat_p224_addcarryx_u64(&mut x139, &mut x140, x138, x119, x131);
1331  let mut x141: u64 = 0;
1332  let mut x142: fiat_p224_u1 = 0;
1333  fiat_p224_addcarryx_u64(&mut x141, &mut x142, x140, x121, x133);
1334  let mut x143: u64 = 0;
1335  let mut x144: fiat_p224_u1 = 0;
1336  fiat_p224_addcarryx_u64(&mut x143, &mut x144, x142, (((x122 as u64) + ((x102 as u64) + ((x94 as u64) + x82))) + ((x114 as u64) + x106)), x135);
1337  let mut x145: u64 = 0;
1338  let mut x146: u64 = 0;
1339  fiat_p224_mulx_u64(&mut x145, &mut x146, x137, 0xffffffffffffffff);
1340  let mut x147: u64 = 0;
1341  let mut x148: u64 = 0;
1342  fiat_p224_mulx_u64(&mut x147, &mut x148, x145, 0xffffffff);
1343  let mut x149: u64 = 0;
1344  let mut x150: u64 = 0;
1345  fiat_p224_mulx_u64(&mut x149, &mut x150, x145, 0xffffffffffffffff);
1346  let mut x151: u64 = 0;
1347  let mut x152: u64 = 0;
1348  fiat_p224_mulx_u64(&mut x151, &mut x152, x145, 0xffffffff00000000);
1349  let mut x153: u64 = 0;
1350  let mut x154: fiat_p224_u1 = 0;
1351  fiat_p224_addcarryx_u64(&mut x153, &mut x154, 0x0, x152, x149);
1352  let mut x155: u64 = 0;
1353  let mut x156: fiat_p224_u1 = 0;
1354  fiat_p224_addcarryx_u64(&mut x155, &mut x156, x154, x150, x147);
1355  let mut x157: u64 = 0;
1356  let mut x158: fiat_p224_u1 = 0;
1357  fiat_p224_addcarryx_u64(&mut x157, &mut x158, 0x0, x137, x145);
1358  let mut x159: u64 = 0;
1359  let mut x160: fiat_p224_u1 = 0;
1360  fiat_p224_addcarryx_u64(&mut x159, &mut x160, x158, x139, x151);
1361  let mut x161: u64 = 0;
1362  let mut x162: fiat_p224_u1 = 0;
1363  fiat_p224_addcarryx_u64(&mut x161, &mut x162, x160, x141, x153);
1364  let mut x163: u64 = 0;
1365  let mut x164: fiat_p224_u1 = 0;
1366  fiat_p224_addcarryx_u64(&mut x163, &mut x164, x162, x143, x155);
1367  let x165: u64 = (((x164 as u64) + ((x144 as u64) + ((x136 as u64) + x124))) + ((x156 as u64) + x148));
1368  let mut x166: u64 = 0;
1369  let mut x167: fiat_p224_u1 = 0;
1370  fiat_p224_subborrowx_u64(&mut x166, &mut x167, 0x0, x159, (0x1 as u64));
1371  let mut x168: u64 = 0;
1372  let mut x169: fiat_p224_u1 = 0;
1373  fiat_p224_subborrowx_u64(&mut x168, &mut x169, x167, x161, 0xffffffff00000000);
1374  let mut x170: u64 = 0;
1375  let mut x171: fiat_p224_u1 = 0;
1376  fiat_p224_subborrowx_u64(&mut x170, &mut x171, x169, x163, 0xffffffffffffffff);
1377  let mut x172: u64 = 0;
1378  let mut x173: fiat_p224_u1 = 0;
1379  fiat_p224_subborrowx_u64(&mut x172, &mut x173, x171, x165, 0xffffffff);
1380  let mut x174: u64 = 0;
1381  let mut x175: fiat_p224_u1 = 0;
1382  fiat_p224_subborrowx_u64(&mut x174, &mut x175, x173, (0x0 as u64), (0x0 as u64));
1383  let mut x176: u64 = 0;
1384  fiat_p224_cmovznz_u64(&mut x176, x175, x166, x159);
1385  let mut x177: u64 = 0;
1386  fiat_p224_cmovznz_u64(&mut x177, x175, x168, x161);
1387  let mut x178: u64 = 0;
1388  fiat_p224_cmovznz_u64(&mut x178, x175, x170, x163);
1389  let mut x179: u64 = 0;
1390  fiat_p224_cmovznz_u64(&mut x179, x175, x172, x165);
1391  out1[0] = x176;
1392  out1[1] = x177;
1393  out1[2] = x178;
1394  out1[3] = x179;
1395}
1396
1397/// The function fiat_p224_nonzero outputs a single non-zero word if the input is non-zero and zero otherwise.
1398///
1399/// Preconditions:
1400///   0 ≤ eval arg1 < m
1401/// Postconditions:
1402///   out1 = 0 ↔ eval (from_montgomery arg1) mod m = 0
1403///
1404/// Input Bounds:
1405///   arg1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1406/// Output Bounds:
1407///   out1: [0x0 ~> 0xffffffffffffffff]
1408#[inline]
1409pub fn fiat_p224_nonzero(out1: &mut u64, arg1: &[u64; 4]) {
1410  let x1: u64 = ((arg1[0]) | ((arg1[1]) | ((arg1[2]) | (arg1[3]))));
1411  *out1 = x1;
1412}
1413
1414/// The function fiat_p224_selectznz is a multi-limb conditional select.
1415///
1416/// Postconditions:
1417///   out1 = (if arg1 = 0 then arg2 else arg3)
1418///
1419/// Input Bounds:
1420///   arg1: [0x0 ~> 0x1]
1421///   arg2: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1422///   arg3: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1423/// Output Bounds:
1424///   out1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1425#[inline]
1426pub fn fiat_p224_selectznz(out1: &mut [u64; 4], arg1: fiat_p224_u1, arg2: &[u64; 4], arg3: &[u64; 4]) {
1427  let mut x1: u64 = 0;
1428  fiat_p224_cmovznz_u64(&mut x1, arg1, (arg2[0]), (arg3[0]));
1429  let mut x2: u64 = 0;
1430  fiat_p224_cmovznz_u64(&mut x2, arg1, (arg2[1]), (arg3[1]));
1431  let mut x3: u64 = 0;
1432  fiat_p224_cmovznz_u64(&mut x3, arg1, (arg2[2]), (arg3[2]));
1433  let mut x4: u64 = 0;
1434  fiat_p224_cmovznz_u64(&mut x4, arg1, (arg2[3]), (arg3[3]));
1435  out1[0] = x1;
1436  out1[1] = x2;
1437  out1[2] = x3;
1438  out1[3] = x4;
1439}
1440
1441/// The function fiat_p224_to_bytes serializes a field element NOT in the Montgomery domain to bytes in little-endian order.
1442///
1443/// Preconditions:
1444///   0 ≤ eval arg1 < m
1445/// Postconditions:
1446///   out1 = map (λ x, ⌊((eval arg1 mod m) mod 2^(8 * (x + 1))) / 2^(8 * x)⌋) [0..27]
1447///
1448/// Input Bounds:
1449///   arg1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffff]]
1450/// Output Bounds:
1451///   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]]
1452#[inline]
1453pub fn fiat_p224_to_bytes(out1: &mut [u8; 28], arg1: &[u64; 4]) {
1454  let x1: u64 = (arg1[3]);
1455  let x2: u64 = (arg1[2]);
1456  let x3: u64 = (arg1[1]);
1457  let x4: u64 = (arg1[0]);
1458  let x5: u8 = ((x4 & (0xff as u64)) as u8);
1459  let x6: u64 = (x4 >> 8);
1460  let x7: u8 = ((x6 & (0xff as u64)) as u8);
1461  let x8: u64 = (x6 >> 8);
1462  let x9: u8 = ((x8 & (0xff as u64)) as u8);
1463  let x10: u64 = (x8 >> 8);
1464  let x11: u8 = ((x10 & (0xff as u64)) as u8);
1465  let x12: u64 = (x10 >> 8);
1466  let x13: u8 = ((x12 & (0xff as u64)) as u8);
1467  let x14: u64 = (x12 >> 8);
1468  let x15: u8 = ((x14 & (0xff as u64)) as u8);
1469  let x16: u64 = (x14 >> 8);
1470  let x17: u8 = ((x16 & (0xff as u64)) as u8);
1471  let x18: u8 = ((x16 >> 8) as u8);
1472  let x19: u8 = ((x3 & (0xff as u64)) as u8);
1473  let x20: u64 = (x3 >> 8);
1474  let x21: u8 = ((x20 & (0xff as u64)) as u8);
1475  let x22: u64 = (x20 >> 8);
1476  let x23: u8 = ((x22 & (0xff as u64)) as u8);
1477  let x24: u64 = (x22 >> 8);
1478  let x25: u8 = ((x24 & (0xff as u64)) as u8);
1479  let x26: u64 = (x24 >> 8);
1480  let x27: u8 = ((x26 & (0xff as u64)) as u8);
1481  let x28: u64 = (x26 >> 8);
1482  let x29: u8 = ((x28 & (0xff as u64)) as u8);
1483  let x30: u64 = (x28 >> 8);
1484  let x31: u8 = ((x30 & (0xff as u64)) as u8);
1485  let x32: u8 = ((x30 >> 8) as u8);
1486  let x33: u8 = ((x2 & (0xff as u64)) as u8);
1487  let x34: u64 = (x2 >> 8);
1488  let x35: u8 = ((x34 & (0xff as u64)) as u8);
1489  let x36: u64 = (x34 >> 8);
1490  let x37: u8 = ((x36 & (0xff as u64)) as u8);
1491  let x38: u64 = (x36 >> 8);
1492  let x39: u8 = ((x38 & (0xff as u64)) as u8);
1493  let x40: u64 = (x38 >> 8);
1494  let x41: u8 = ((x40 & (0xff as u64)) as u8);
1495  let x42: u64 = (x40 >> 8);
1496  let x43: u8 = ((x42 & (0xff as u64)) as u8);
1497  let x44: u64 = (x42 >> 8);
1498  let x45: u8 = ((x44 & (0xff as u64)) as u8);
1499  let x46: u8 = ((x44 >> 8) as u8);
1500  let x47: u8 = ((x1 & (0xff as u64)) as u8);
1501  let x48: u64 = (x1 >> 8);
1502  let x49: u8 = ((x48 & (0xff as u64)) as u8);
1503  let x50: u64 = (x48 >> 8);
1504  let x51: u8 = ((x50 & (0xff as u64)) as u8);
1505  let x52: u8 = ((x50 >> 8) as u8);
1506  out1[0] = x5;
1507  out1[1] = x7;
1508  out1[2] = x9;
1509  out1[3] = x11;
1510  out1[4] = x13;
1511  out1[5] = x15;
1512  out1[6] = x17;
1513  out1[7] = x18;
1514  out1[8] = x19;
1515  out1[9] = x21;
1516  out1[10] = x23;
1517  out1[11] = x25;
1518  out1[12] = x27;
1519  out1[13] = x29;
1520  out1[14] = x31;
1521  out1[15] = x32;
1522  out1[16] = x33;
1523  out1[17] = x35;
1524  out1[18] = x37;
1525  out1[19] = x39;
1526  out1[20] = x41;
1527  out1[21] = x43;
1528  out1[22] = x45;
1529  out1[23] = x46;
1530  out1[24] = x47;
1531  out1[25] = x49;
1532  out1[26] = x51;
1533  out1[27] = x52;
1534}
1535
1536/// The function fiat_p224_from_bytes deserializes a field element NOT in the Montgomery domain from bytes in little-endian order.
1537///
1538/// Preconditions:
1539///   0 ≤ bytes_eval arg1 < m
1540/// Postconditions:
1541///   eval out1 mod m = bytes_eval arg1 mod m
1542///   0 ≤ eval out1 < m
1543///
1544/// Input Bounds:
1545///   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]]
1546/// Output Bounds:
1547///   out1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffff]]
1548#[inline]
1549pub fn fiat_p224_from_bytes(out1: &mut [u64; 4], arg1: &[u8; 28]) {
1550  let x1: u64 = (((arg1[27]) as u64) << 24);
1551  let x2: u64 = (((arg1[26]) as u64) << 16);
1552  let x3: u64 = (((arg1[25]) as u64) << 8);
1553  let x4: u8 = (arg1[24]);
1554  let x5: u64 = (((arg1[23]) as u64) << 56);
1555  let x6: u64 = (((arg1[22]) as u64) << 48);
1556  let x7: u64 = (((arg1[21]) as u64) << 40);
1557  let x8: u64 = (((arg1[20]) as u64) << 32);
1558  let x9: u64 = (((arg1[19]) as u64) << 24);
1559  let x10: u64 = (((arg1[18]) as u64) << 16);
1560  let x11: u64 = (((arg1[17]) as u64) << 8);
1561  let x12: u8 = (arg1[16]);
1562  let x13: u64 = (((arg1[15]) as u64) << 56);
1563  let x14: u64 = (((arg1[14]) as u64) << 48);
1564  let x15: u64 = (((arg1[13]) as u64) << 40);
1565  let x16: u64 = (((arg1[12]) as u64) << 32);
1566  let x17: u64 = (((arg1[11]) as u64) << 24);
1567  let x18: u64 = (((arg1[10]) as u64) << 16);
1568  let x19: u64 = (((arg1[9]) as u64) << 8);
1569  let x20: u8 = (arg1[8]);
1570  let x21: u64 = (((arg1[7]) as u64) << 56);
1571  let x22: u64 = (((arg1[6]) as u64) << 48);
1572  let x23: u64 = (((arg1[5]) as u64) << 40);
1573  let x24: u64 = (((arg1[4]) as u64) << 32);
1574  let x25: u64 = (((arg1[3]) as u64) << 24);
1575  let x26: u64 = (((arg1[2]) as u64) << 16);
1576  let x27: u64 = (((arg1[1]) as u64) << 8);
1577  let x28: u8 = (arg1[0]);
1578  let x29: u64 = (x27 + (x28 as u64));
1579  let x30: u64 = (x26 + x29);
1580  let x31: u64 = (x25 + x30);
1581  let x32: u64 = (x24 + x31);
1582  let x33: u64 = (x23 + x32);
1583  let x34: u64 = (x22 + x33);
1584  let x35: u64 = (x21 + x34);
1585  let x36: u64 = (x19 + (x20 as u64));
1586  let x37: u64 = (x18 + x36);
1587  let x38: u64 = (x17 + x37);
1588  let x39: u64 = (x16 + x38);
1589  let x40: u64 = (x15 + x39);
1590  let x41: u64 = (x14 + x40);
1591  let x42: u64 = (x13 + x41);
1592  let x43: u64 = (x11 + (x12 as u64));
1593  let x44: u64 = (x10 + x43);
1594  let x45: u64 = (x9 + x44);
1595  let x46: u64 = (x8 + x45);
1596  let x47: u64 = (x7 + x46);
1597  let x48: u64 = (x6 + x47);
1598  let x49: u64 = (x5 + x48);
1599  let x50: u64 = (x3 + (x4 as u64));
1600  let x51: u64 = (x2 + x50);
1601  let x52: u64 = (x1 + x51);
1602  out1[0] = x35;
1603  out1[1] = x42;
1604  out1[2] = x49;
1605  out1[3] = x52;
1606}
1607
1608/// The function fiat_p224_set_one returns the field element one in the Montgomery domain.
1609///
1610/// Postconditions:
1611///   eval (from_montgomery out1) mod m = 1 mod m
1612///   0 ≤ eval out1 < m
1613///
1614#[inline]
1615pub fn fiat_p224_set_one(out1: &mut fiat_p224_montgomery_domain_field_element) {
1616  out1[0] = 0xffffffff00000000;
1617  out1[1] = 0xffffffffffffffff;
1618  out1[2] = (0x0 as u64);
1619  out1[3] = (0x0 as u64);
1620}
1621
1622/// The function fiat_p224_msat returns the saturated representation of the prime modulus.
1623///
1624/// Postconditions:
1625///   twos_complement_eval out1 = m
1626///   0 ≤ eval out1 < m
1627///
1628/// Output Bounds:
1629///   out1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1630#[inline]
1631pub fn fiat_p224_msat(out1: &mut [u64; 5]) {
1632  out1[0] = (0x1 as u64);
1633  out1[1] = 0xffffffff00000000;
1634  out1[2] = 0xffffffffffffffff;
1635  out1[3] = 0xffffffff;
1636  out1[4] = (0x0 as u64);
1637}
1638
1639/// The function fiat_p224_divstep computes a divstep.
1640///
1641/// Preconditions:
1642///   0 ≤ eval arg4 < m
1643///   0 ≤ eval arg5 < m
1644/// Postconditions:
1645///   out1 = (if 0 < arg1 ∧ (twos_complement_eval arg3) is odd then 1 - arg1 else 1 + arg1)
1646///   twos_complement_eval out2 = (if 0 < arg1 ∧ (twos_complement_eval arg3) is odd then twos_complement_eval arg3 else twos_complement_eval arg2)
1647///   twos_complement_eval out3 = (if 0 < arg1 ∧ (twos_complement_eval arg3) is odd then ⌊(twos_complement_eval arg3 - twos_complement_eval arg2) / 2⌋ else ⌊(twos_complement_eval arg3 + (twos_complement_eval arg3 mod 2) * twos_complement_eval arg2) / 2⌋)
1648///   eval (from_montgomery out4) mod m = (if 0 < arg1 ∧ (twos_complement_eval arg3) is odd then (2 * eval (from_montgomery arg5)) mod m else (2 * eval (from_montgomery arg4)) mod m)
1649///   eval (from_montgomery out5) mod m = (if 0 < arg1 ∧ (twos_complement_eval arg3) is odd then (eval (from_montgomery arg4) - eval (from_montgomery arg4)) mod m else (eval (from_montgomery arg5) + (twos_complement_eval arg3 mod 2) * eval (from_montgomery arg4)) mod m)
1650///   0 ≤ eval out5 < m
1651///   0 ≤ eval out5 < m
1652///   0 ≤ eval out2 < m
1653///   0 ≤ eval out3 < m
1654///
1655/// Input Bounds:
1656///   arg1: [0x0 ~> 0xffffffffffffffff]
1657///   arg2: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1658///   arg3: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1659///   arg4: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1660///   arg5: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1661/// Output Bounds:
1662///   out1: [0x0 ~> 0xffffffffffffffff]
1663///   out2: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1664///   out3: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1665///   out4: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1666///   out5: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1667#[inline]
1668pub fn fiat_p224_divstep(out1: &mut u64, out2: &mut [u64; 5], out3: &mut [u64; 5], out4: &mut [u64; 4], out5: &mut [u64; 4], arg1: u64, arg2: &[u64; 5], arg3: &[u64; 5], arg4: &[u64; 4], arg5: &[u64; 4]) {
1669  let mut x1: u64 = 0;
1670  let mut x2: fiat_p224_u1 = 0;
1671  fiat_p224_addcarryx_u64(&mut x1, &mut x2, 0x0, (!arg1), (0x1 as u64));
1672  let x3: fiat_p224_u1 = (((x1 >> 63) as fiat_p224_u1) & (((arg3[0]) & (0x1 as u64)) as fiat_p224_u1));
1673  let mut x4: u64 = 0;
1674  let mut x5: fiat_p224_u1 = 0;
1675  fiat_p224_addcarryx_u64(&mut x4, &mut x5, 0x0, (!arg1), (0x1 as u64));
1676  let mut x6: u64 = 0;
1677  fiat_p224_cmovznz_u64(&mut x6, x3, arg1, x4);
1678  let mut x7: u64 = 0;
1679  fiat_p224_cmovznz_u64(&mut x7, x3, (arg2[0]), (arg3[0]));
1680  let mut x8: u64 = 0;
1681  fiat_p224_cmovznz_u64(&mut x8, x3, (arg2[1]), (arg3[1]));
1682  let mut x9: u64 = 0;
1683  fiat_p224_cmovznz_u64(&mut x9, x3, (arg2[2]), (arg3[2]));
1684  let mut x10: u64 = 0;
1685  fiat_p224_cmovznz_u64(&mut x10, x3, (arg2[3]), (arg3[3]));
1686  let mut x11: u64 = 0;
1687  fiat_p224_cmovznz_u64(&mut x11, x3, (arg2[4]), (arg3[4]));
1688  let mut x12: u64 = 0;
1689  let mut x13: fiat_p224_u1 = 0;
1690  fiat_p224_addcarryx_u64(&mut x12, &mut x13, 0x0, (0x1 as u64), (!(arg2[0])));
1691  let mut x14: u64 = 0;
1692  let mut x15: fiat_p224_u1 = 0;
1693  fiat_p224_addcarryx_u64(&mut x14, &mut x15, x13, (0x0 as u64), (!(arg2[1])));
1694  let mut x16: u64 = 0;
1695  let mut x17: fiat_p224_u1 = 0;
1696  fiat_p224_addcarryx_u64(&mut x16, &mut x17, x15, (0x0 as u64), (!(arg2[2])));
1697  let mut x18: u64 = 0;
1698  let mut x19: fiat_p224_u1 = 0;
1699  fiat_p224_addcarryx_u64(&mut x18, &mut x19, x17, (0x0 as u64), (!(arg2[3])));
1700  let mut x20: u64 = 0;
1701  let mut x21: fiat_p224_u1 = 0;
1702  fiat_p224_addcarryx_u64(&mut x20, &mut x21, x19, (0x0 as u64), (!(arg2[4])));
1703  let mut x22: u64 = 0;
1704  fiat_p224_cmovznz_u64(&mut x22, x3, (arg3[0]), x12);
1705  let mut x23: u64 = 0;
1706  fiat_p224_cmovznz_u64(&mut x23, x3, (arg3[1]), x14);
1707  let mut x24: u64 = 0;
1708  fiat_p224_cmovznz_u64(&mut x24, x3, (arg3[2]), x16);
1709  let mut x25: u64 = 0;
1710  fiat_p224_cmovznz_u64(&mut x25, x3, (arg3[3]), x18);
1711  let mut x26: u64 = 0;
1712  fiat_p224_cmovznz_u64(&mut x26, x3, (arg3[4]), x20);
1713  let mut x27: u64 = 0;
1714  fiat_p224_cmovznz_u64(&mut x27, x3, (arg4[0]), (arg5[0]));
1715  let mut x28: u64 = 0;
1716  fiat_p224_cmovznz_u64(&mut x28, x3, (arg4[1]), (arg5[1]));
1717  let mut x29: u64 = 0;
1718  fiat_p224_cmovznz_u64(&mut x29, x3, (arg4[2]), (arg5[2]));
1719  let mut x30: u64 = 0;
1720  fiat_p224_cmovznz_u64(&mut x30, x3, (arg4[3]), (arg5[3]));
1721  let mut x31: u64 = 0;
1722  let mut x32: fiat_p224_u1 = 0;
1723  fiat_p224_addcarryx_u64(&mut x31, &mut x32, 0x0, x27, x27);
1724  let mut x33: u64 = 0;
1725  let mut x34: fiat_p224_u1 = 0;
1726  fiat_p224_addcarryx_u64(&mut x33, &mut x34, x32, x28, x28);
1727  let mut x35: u64 = 0;
1728  let mut x36: fiat_p224_u1 = 0;
1729  fiat_p224_addcarryx_u64(&mut x35, &mut x36, x34, x29, x29);
1730  let mut x37: u64 = 0;
1731  let mut x38: fiat_p224_u1 = 0;
1732  fiat_p224_addcarryx_u64(&mut x37, &mut x38, x36, x30, x30);
1733  let mut x39: u64 = 0;
1734  let mut x40: fiat_p224_u1 = 0;
1735  fiat_p224_subborrowx_u64(&mut x39, &mut x40, 0x0, x31, (0x1 as u64));
1736  let mut x41: u64 = 0;
1737  let mut x42: fiat_p224_u1 = 0;
1738  fiat_p224_subborrowx_u64(&mut x41, &mut x42, x40, x33, 0xffffffff00000000);
1739  let mut x43: u64 = 0;
1740  let mut x44: fiat_p224_u1 = 0;
1741  fiat_p224_subborrowx_u64(&mut x43, &mut x44, x42, x35, 0xffffffffffffffff);
1742  let mut x45: u64 = 0;
1743  let mut x46: fiat_p224_u1 = 0;
1744  fiat_p224_subborrowx_u64(&mut x45, &mut x46, x44, x37, 0xffffffff);
1745  let mut x47: u64 = 0;
1746  let mut x48: fiat_p224_u1 = 0;
1747  fiat_p224_subborrowx_u64(&mut x47, &mut x48, x46, (x38 as u64), (0x0 as u64));
1748  let x49: u64 = (arg4[3]);
1749  let x50: u64 = (arg4[2]);
1750  let x51: u64 = (arg4[1]);
1751  let x52: u64 = (arg4[0]);
1752  let mut x53: u64 = 0;
1753  let mut x54: fiat_p224_u1 = 0;
1754  fiat_p224_subborrowx_u64(&mut x53, &mut x54, 0x0, (0x0 as u64), x52);
1755  let mut x55: u64 = 0;
1756  let mut x56: fiat_p224_u1 = 0;
1757  fiat_p224_subborrowx_u64(&mut x55, &mut x56, x54, (0x0 as u64), x51);
1758  let mut x57: u64 = 0;
1759  let mut x58: fiat_p224_u1 = 0;
1760  fiat_p224_subborrowx_u64(&mut x57, &mut x58, x56, (0x0 as u64), x50);
1761  let mut x59: u64 = 0;
1762  let mut x60: fiat_p224_u1 = 0;
1763  fiat_p224_subborrowx_u64(&mut x59, &mut x60, x58, (0x0 as u64), x49);
1764  let mut x61: u64 = 0;
1765  fiat_p224_cmovznz_u64(&mut x61, x60, (0x0 as u64), 0xffffffffffffffff);
1766  let mut x62: u64 = 0;
1767  let mut x63: fiat_p224_u1 = 0;
1768  fiat_p224_addcarryx_u64(&mut x62, &mut x63, 0x0, x53, (((x61 & (0x1 as u64)) as fiat_p224_u1) as u64));
1769  let mut x64: u64 = 0;
1770  let mut x65: fiat_p224_u1 = 0;
1771  fiat_p224_addcarryx_u64(&mut x64, &mut x65, x63, x55, (x61 & 0xffffffff00000000));
1772  let mut x66: u64 = 0;
1773  let mut x67: fiat_p224_u1 = 0;
1774  fiat_p224_addcarryx_u64(&mut x66, &mut x67, x65, x57, x61);
1775  let mut x68: u64 = 0;
1776  let mut x69: fiat_p224_u1 = 0;
1777  fiat_p224_addcarryx_u64(&mut x68, &mut x69, x67, x59, (x61 & 0xffffffff));
1778  let mut x70: u64 = 0;
1779  fiat_p224_cmovznz_u64(&mut x70, x3, (arg5[0]), x62);
1780  let mut x71: u64 = 0;
1781  fiat_p224_cmovznz_u64(&mut x71, x3, (arg5[1]), x64);
1782  let mut x72: u64 = 0;
1783  fiat_p224_cmovznz_u64(&mut x72, x3, (arg5[2]), x66);
1784  let mut x73: u64 = 0;
1785  fiat_p224_cmovznz_u64(&mut x73, x3, (arg5[3]), x68);
1786  let x74: fiat_p224_u1 = ((x22 & (0x1 as u64)) as fiat_p224_u1);
1787  let mut x75: u64 = 0;
1788  fiat_p224_cmovznz_u64(&mut x75, x74, (0x0 as u64), x7);
1789  let mut x76: u64 = 0;
1790  fiat_p224_cmovznz_u64(&mut x76, x74, (0x0 as u64), x8);
1791  let mut x77: u64 = 0;
1792  fiat_p224_cmovznz_u64(&mut x77, x74, (0x0 as u64), x9);
1793  let mut x78: u64 = 0;
1794  fiat_p224_cmovznz_u64(&mut x78, x74, (0x0 as u64), x10);
1795  let mut x79: u64 = 0;
1796  fiat_p224_cmovznz_u64(&mut x79, x74, (0x0 as u64), x11);
1797  let mut x80: u64 = 0;
1798  let mut x81: fiat_p224_u1 = 0;
1799  fiat_p224_addcarryx_u64(&mut x80, &mut x81, 0x0, x22, x75);
1800  let mut x82: u64 = 0;
1801  let mut x83: fiat_p224_u1 = 0;
1802  fiat_p224_addcarryx_u64(&mut x82, &mut x83, x81, x23, x76);
1803  let mut x84: u64 = 0;
1804  let mut x85: fiat_p224_u1 = 0;
1805  fiat_p224_addcarryx_u64(&mut x84, &mut x85, x83, x24, x77);
1806  let mut x86: u64 = 0;
1807  let mut x87: fiat_p224_u1 = 0;
1808  fiat_p224_addcarryx_u64(&mut x86, &mut x87, x85, x25, x78);
1809  let mut x88: u64 = 0;
1810  let mut x89: fiat_p224_u1 = 0;
1811  fiat_p224_addcarryx_u64(&mut x88, &mut x89, x87, x26, x79);
1812  let mut x90: u64 = 0;
1813  fiat_p224_cmovznz_u64(&mut x90, x74, (0x0 as u64), x27);
1814  let mut x91: u64 = 0;
1815  fiat_p224_cmovznz_u64(&mut x91, x74, (0x0 as u64), x28);
1816  let mut x92: u64 = 0;
1817  fiat_p224_cmovznz_u64(&mut x92, x74, (0x0 as u64), x29);
1818  let mut x93: u64 = 0;
1819  fiat_p224_cmovznz_u64(&mut x93, x74, (0x0 as u64), x30);
1820  let mut x94: u64 = 0;
1821  let mut x95: fiat_p224_u1 = 0;
1822  fiat_p224_addcarryx_u64(&mut x94, &mut x95, 0x0, x70, x90);
1823  let mut x96: u64 = 0;
1824  let mut x97: fiat_p224_u1 = 0;
1825  fiat_p224_addcarryx_u64(&mut x96, &mut x97, x95, x71, x91);
1826  let mut x98: u64 = 0;
1827  let mut x99: fiat_p224_u1 = 0;
1828  fiat_p224_addcarryx_u64(&mut x98, &mut x99, x97, x72, x92);
1829  let mut x100: u64 = 0;
1830  let mut x101: fiat_p224_u1 = 0;
1831  fiat_p224_addcarryx_u64(&mut x100, &mut x101, x99, x73, x93);
1832  let mut x102: u64 = 0;
1833  let mut x103: fiat_p224_u1 = 0;
1834  fiat_p224_subborrowx_u64(&mut x102, &mut x103, 0x0, x94, (0x1 as u64));
1835  let mut x104: u64 = 0;
1836  let mut x105: fiat_p224_u1 = 0;
1837  fiat_p224_subborrowx_u64(&mut x104, &mut x105, x103, x96, 0xffffffff00000000);
1838  let mut x106: u64 = 0;
1839  let mut x107: fiat_p224_u1 = 0;
1840  fiat_p224_subborrowx_u64(&mut x106, &mut x107, x105, x98, 0xffffffffffffffff);
1841  let mut x108: u64 = 0;
1842  let mut x109: fiat_p224_u1 = 0;
1843  fiat_p224_subborrowx_u64(&mut x108, &mut x109, x107, x100, 0xffffffff);
1844  let mut x110: u64 = 0;
1845  let mut x111: fiat_p224_u1 = 0;
1846  fiat_p224_subborrowx_u64(&mut x110, &mut x111, x109, (x101 as u64), (0x0 as u64));
1847  let mut x112: u64 = 0;
1848  let mut x113: fiat_p224_u1 = 0;
1849  fiat_p224_addcarryx_u64(&mut x112, &mut x113, 0x0, x6, (0x1 as u64));
1850  let x114: u64 = ((x80 >> 1) | ((x82 << 63) & 0xffffffffffffffff));
1851  let x115: u64 = ((x82 >> 1) | ((x84 << 63) & 0xffffffffffffffff));
1852  let x116: u64 = ((x84 >> 1) | ((x86 << 63) & 0xffffffffffffffff));
1853  let x117: u64 = ((x86 >> 1) | ((x88 << 63) & 0xffffffffffffffff));
1854  let x118: u64 = ((x88 & 0x8000000000000000) | (x88 >> 1));
1855  let mut x119: u64 = 0;
1856  fiat_p224_cmovznz_u64(&mut x119, x48, x39, x31);
1857  let mut x120: u64 = 0;
1858  fiat_p224_cmovznz_u64(&mut x120, x48, x41, x33);
1859  let mut x121: u64 = 0;
1860  fiat_p224_cmovznz_u64(&mut x121, x48, x43, x35);
1861  let mut x122: u64 = 0;
1862  fiat_p224_cmovznz_u64(&mut x122, x48, x45, x37);
1863  let mut x123: u64 = 0;
1864  fiat_p224_cmovznz_u64(&mut x123, x111, x102, x94);
1865  let mut x124: u64 = 0;
1866  fiat_p224_cmovznz_u64(&mut x124, x111, x104, x96);
1867  let mut x125: u64 = 0;
1868  fiat_p224_cmovznz_u64(&mut x125, x111, x106, x98);
1869  let mut x126: u64 = 0;
1870  fiat_p224_cmovznz_u64(&mut x126, x111, x108, x100);
1871  *out1 = x112;
1872  out2[0] = x7;
1873  out2[1] = x8;
1874  out2[2] = x9;
1875  out2[3] = x10;
1876  out2[4] = x11;
1877  out3[0] = x114;
1878  out3[1] = x115;
1879  out3[2] = x116;
1880  out3[3] = x117;
1881  out3[4] = x118;
1882  out4[0] = x119;
1883  out4[1] = x120;
1884  out4[2] = x121;
1885  out4[3] = x122;
1886  out5[0] = x123;
1887  out5[1] = x124;
1888  out5[2] = x125;
1889  out5[3] = x126;
1890}
1891
1892/// The function fiat_p224_divstep_precomp returns the precomputed value for Bernstein-Yang-inversion (in montgomery form).
1893///
1894/// Postconditions:
1895///   eval (from_montgomery out1) = ⌊(m - 1) / 2⌋^(if ⌊log2 m⌋ + 1 < 46 then ⌊(49 * (⌊log2 m⌋ + 1) + 80) / 17⌋ else ⌊(49 * (⌊log2 m⌋ + 1) + 57) / 17⌋)
1896///   0 ≤ eval out1 < m
1897///
1898/// Output Bounds:
1899///   out1: [[0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff], [0x0 ~> 0xffffffffffffffff]]
1900#[inline]
1901pub fn fiat_p224_divstep_precomp(out1: &mut [u64; 4]) {
1902  out1[0] = 0x7ffffffe800001;
1903  out1[1] = 0xff7fffff00800000;
1904  out1[2] = 0xffffff;
1905  out1[3] = 0xff800000;
1906}