689 			MPI z1, z2, z3;  in mpi_ec_get_affine()  local
700 				z3 = mpi_new(0);  in mpi_ec_get_affine()
701 				ec_mulm(z3, z2, z1, ctx);      /* z3 = z^(-3) mod p */  in mpi_ec_get_affine()
702 				ec_mulm(y, point->y, z3, ctx);  in mpi_ec_get_affine()
703 				mpi_free(z3);  in mpi_ec_get_affine()
761 #define z3 (result->z)  in dup_point_weierstrass()  macro
773 		mpi_set_ui(z3, 0);  in dup_point_weierstrass()
795 		/* Z3 = 2YZ */  in dup_point_weierstrass()
796 		ec_mulm(z3, point->y, point->z, ctx);  in dup_point_weierstrass()
797 		ec_mul2(z3, z3, ctx);  in dup_point_weierstrass()
824 #undef z3  in dup_point_weierstrass()
853 #define Z3 (result->z)  in dup_point_edwards()  macro
899 	ctx->mulm(Z3, F, J, ctx);  in dup_point_edwards()
906 #undef Z3  in dup_point_edwards()
946 #define z3 (result->z)  in add_points_weierstrass()  macro
966 		mpi_set(z3, p2->z);  in add_points_weierstrass()
971 		mpi_set(z3, p1->z);  in add_points_weierstrass()
1009 				mpi_set_ui(z3, 0);  in add_points_weierstrass()
1016 			/* z3 = z1 z2 l3  */  in add_points_weierstrass()
1017 			ec_mulm(z3, z1, z2, ctx);  in add_points_weierstrass()
1018 			ec_mulm(z3, z3, l3, ctx);  in add_points_weierstrass()
1044 #undef z3  in add_points_weierstrass()
1084 #define Z3 (result->z)  in add_points_edwards()  macro
1140 	ctx->mulm(Z3, F, G, ctx);  in add_points_edwards()
1151 #undef Z3  in add_points_edwards()
1337 		MPI z2, z3;  in mpi_ec_mul_point()  local
1340 		z3 = mpi_alloc_like(ctx->p);  in mpi_ec_mul_point()
1342 		ec_mulm(z3, point->z, z2, ctx);  in mpi_ec_mul_point()
1345 		ec_invm(z3, z3, ctx);  in mpi_ec_mul_point()
1346 		ec_mulm(y1, yy, z3, ctx);  in mpi_ec_mul_point()
1348 		mpi_free(z3);  in mpi_ec_mul_point()