, !=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