OpenXM_contrib2/asir2000/engine/pari.c - diff

Return to pari.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / engine

version 1.5, 2001/10/09 01:36:13

version 1.8, 2009/03/16 16:43:02

Line 45

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

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/engine/pari.c,v 1.4 2000/12/05 01:24:52 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/engine/pari.c,v 1.7 2005/10/10 15:16:38 saito Exp $

#include "ca.h"

#if PARI

#if defined(PARI)

#include "base.h"

#include <math.h>

#include "genpari.h"

Line 76 int index;

if ( index > max_varn ) {

for ( i = max_varn+1; i <= index; i++ ) {

sprintf(name,"x%d",i);

#if (PARI_VERSION_CODE < 131594)

fetch_named_var(name,0);

#else

fetch_named_var(name);

#endif

}

max_varn = index;

}

Line 246 Obj *rp;

Line 250 Obj *rp;

}

#if defined(LONG_IS_32BIT)

#if SIZEOF_LONG == 4

void ritopa_i(a,s,rp)

N a;

int s;

Line 281 N *rp;

Line 285 N *rp;

for ( j = 0, b = (unsigned int *)BD(z); j < l; j++ )

b[l-j-1] = ((unsigned int *)g)[j+2];

}

#endif

#if defined(LONG_IS_64BIT)

#elif SIZEOF_LONG == 8

void ritopa_i(a,s,rp)

N a;

int s;