, !=p) r
, /* step 2 */ mpn_sub_n(r+q,b+p,b,p)
, /* step 3 */ mul(t,r,r+q,r+2*q,q)
, /* step 4 */ mul(r+2*p,a+p,b+p,r,q)
, /* step 6 */ memcpy(r+p,t,p*sizeof(mp_limb_t))
, /* step 9 */ memcpy(r,t,p*sizeof
, /* step 10 */ mpn_add_n(r+p,r+p,t+p, p.1
, /* step 11 */ mpn_add_n(r+p,r+p,t, vol.2, p.1