Run util/openssl-format-source on the Curve448 code
[openssl.git] / crypto / ec / curve448 / f_arithmetic.c
index 1e824e24334bcbc81232e23a1b5f35f17f5da85b..e8c5738d07aaef2c64302690b7094b3cf39b2e6d 100644 (file)
 
 #include "field.h"
 
 
 #include "field.h"
 
-mask_t gf_isr (
-    gf a,
-    const gf x
-) {
+mask_t gf_isr(gf a, const gf x)
+{
     gf L0, L1, L2;
     gf L0, L1, L2;
-    gf_sqr  (L1,     x );
-    gf_mul  (L2,     x,   L1 );
-    gf_sqr  (L1,   L2 );
-    gf_mul  (L2,     x,   L1 );
-    gf_sqrn (L1,   L2,     3 );
-    gf_mul  (L0,   L2,   L1 );
-    gf_sqrn (L1,   L0,     3 );
-    gf_mul  (L0,   L2,   L1 );
-    gf_sqrn (L2,   L0,     9 );
-    gf_mul  (L1,   L0,   L2 );
-    gf_sqr  (L0,   L1 );
-    gf_mul  (L2,     x,   L0 );
-    gf_sqrn (L0,   L2,    18 );
-    gf_mul  (L2,   L1,   L0 );
-    gf_sqrn (L0,   L2,    37 );
-    gf_mul  (L1,   L2,   L0 );
-    gf_sqrn (L0,   L1,    37 );
-    gf_mul  (L1,   L2,   L0 );
-    gf_sqrn (L0,   L1,   111 );
-    gf_mul  (L2,   L1,   L0 );
-    gf_sqr  (L0,   L2 );
-    gf_mul  (L1,     x,   L0 );
-    gf_sqrn (L0,   L1,   223 );
-    gf_mul  (L1,   L2,   L0 );
-    gf_sqr  (L2, L1);
-    gf_mul  (L0, L2, x);
-    gf_copy(a,L1);
-    return gf_eq(L0,ONE);
+    gf_sqr(L1, x);
+    gf_mul(L2, x, L1);
+    gf_sqr(L1, L2);
+    gf_mul(L2, x, L1);
+    gf_sqrn(L1, L2, 3);
+    gf_mul(L0, L2, L1);
+    gf_sqrn(L1, L0, 3);
+    gf_mul(L0, L2, L1);
+    gf_sqrn(L2, L0, 9);
+    gf_mul(L1, L0, L2);
+    gf_sqr(L0, L1);
+    gf_mul(L2, x, L0);
+    gf_sqrn(L0, L2, 18);
+    gf_mul(L2, L1, L0);
+    gf_sqrn(L0, L2, 37);
+    gf_mul(L1, L2, L0);
+    gf_sqrn(L0, L1, 37);
+    gf_mul(L1, L2, L0);
+    gf_sqrn(L0, L1, 111);
+    gf_mul(L2, L1, L0);
+    gf_sqr(L0, L2);
+    gf_mul(L1, x, L0);
+    gf_sqrn(L0, L1, 223);
+    gf_mul(L1, L2, L0);
+    gf_sqr(L2, L1);
+    gf_mul(L0, L2, x);
+    gf_copy(a, L1);
+    return gf_eq(L0, ONE);
 }
 }