OpenXM_contrib2/asir2000/engine/pari.c - diff

Return to pari.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / engine

version 1.4, 2000/12/05 01:24:52

version 1.7, 2005/10/10 15:16:38

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.3 2000/08/22 05:04:06 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/engine/pari.c,v 1.6 2003/02/14 22:29:09 ohara Exp $

#include "ca.h"

#if PARI

#if defined(PARI)

#include "base.h"

#include <math.h>

#include "genpari.h"

Line 62 extern long prec;

extern int paristack;

void risa_pari_init() {

char buf[BUFSIZ];

int i;

pari_init(paristack,2);

prec = 4;

}

Line 79 int index;

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;

}