OpenXM_contrib2/asir2000/asm/ddM.c - diff

Return to ddM.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / asm

version 1.2, 2000/08/21 08:31:17

version 1.4, 2001/06/25 05:30:48

Line 23

* shall be made on your publication or presentation in any form of the

* results obtained by use of the SOFTWARE.

* (4) In the event that you modify the SOFTWARE, you shall notify FLL by

* e-mail at risa-admin@flab.fujitsu.co.jp of the detailed specification

* e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification

* for such modification or the source code of the modified part of the

* SOFTWARE.

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/asm/ddM.c,v 1.1.1.1 1999/12/03 07:39:06 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/asm/ddM.c,v 1.3 2000/08/22 05:03:55 noro Exp $

#include "ca.h"

#include "base.h"

Line 293 UM n1,n2,nr;

carry = W_UMALLOC(d2+1);

t = W_UMALLOC(d1+d2+1);

s = W_UMALLOC(d1+d2+1);

for ( carry = 0, i = 0, r = r0; i < d; i++, r += d2 ) {

for ( DEG(carry) = -1, i = 0, r = r0; i < d; i++, r += d2 ) {

extractum(n1,i*d2,d2,m);

if ( m ) {

kmulum(mod,m,n2,t);