- i1 = newbn(dss_p[0]);
- i2 = newbn(dss_p[0]);
- i3 = newbn(dss_p[0]);
- v = newbn(dss_q[0]);
- modpow(dss_g, u1, dss_p, i1);
- diagbn("gu1p=", i1);
- modpow(dss_y, u2, dss_p, i2);
- diagbn("yu2p=", i2);
- modmul(i1, i2, dss_p, i3);
- diagbn("gu1yu2p=", i3);
- modmul(i3, One, dss_q, v);
+ gu1p = modpow(dss_g, u1, dss_p);
+ diagbn("gu1p=", gu1p);
+ yu2p = modpow(dss_y, u2, dss_p);
+ diagbn("yu2p=", yu2p);
+ gu1yu2p = modmul(gu1p, yu2p, dss_p);
+ diagbn("gu1yu2p=", gu1yu2p);
+ v = modmul(gu1yu2p, One, dss_q);