OpenXM_contrib2/asir2000/builtin/isolv.c - diff

Return to isolv.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / builtin

version 1.3, 2003/10/23 01:32:59

version 1.5, 2005/07/14 22:46:03

Line 1

* $OpenXM: OpenXM_contrib2/asir2000/builtin/isolv.c,v 1.2 2003/10/20 07:32:19 saito Exp $

* $OpenXM: OpenXM_contrib2/asir2000/builtin/isolv.c,v 1.4 2005/02/08 18:06:05 saito Exp $

#include "ca.h"

Line 66 Obj *rp;

fprintf(stderr,"solve,");

error(" : Sorry, not yet implement of multivars");

break;

defaults:

default:

*rp = 0;

}

Line 77 NODE arg;

Obj *rp;

{

pointer p, Eps;

pointer root, listp;

pointer root;

LIST listp;

V v;

Q eps;

NODE n, n0, m0, m, ln0;

Line 128 Obj *rp;

Line 129 Obj *rp;

fprintf(stderr,"solve,");

error(" : Sorry, not yet implement of multivars");

break;

defaults:

default:

*rp = 0;

}

Line 285 MAT root;

Line 286 MAT root;

{

Q a, b, c, d, e;

P p;

p = (P*)BDY(root)[indx][3];

p = (P)BDY(root)[indx][3];

addq(BDY(root)[indx][0], BDY(root)[indx][1], &c);

divq(c, TWO, &d);

ueval(p, BDY(root)[indx][1], &a);