crypto/ec/ecp_smpl.c

659     BIGNUM *n0, *n1, *n2, *n3, *n4, *n5, *n6;
684     n4 = BN_CTX_get(ctx);
718     /* n3, n4 */
722         if (!BN_copy(n4, &b->Y))
725         /* n4 = Y_b */
735         if (!field_mul(group, n4, &b->Y, n0, ctx))
737         /* n4 = Y_b * Z_a^3 */
743     if (!BN_mod_sub_quick(n6, n2, n4, p))
746     /* n6 = n2 - n4 */
767     if (!BN_mod_add_quick(n2, n2, n4, p))
770     /* 'n8' = n2 + n4 */
796     if (!field_sqr(group, n4, n5, ctx))
798     if (!field_mul(group, n3, n1, n4, ctx))
814     if (!field_mul(group, n5, n4, n5, ctx))