help links subscribe changes refresh edit

	IssueTracker
#336 'binomial$COMBF' is not evaluated consistently ←	↑	→ #339 interpreter gives up in loop

#338 'eval' misses main variable

Edit detail for #338 'eval' misses main variable revision 6 of 6

	1 2 3 4 5 6
Editor: alfredo Time: 2008/10/16 13:23:51 GMT-7
Note:

added:

From alfredo Thu Oct 16 13:23:51 -0700 2008
From: alfredo
Date: Thu, 16 Oct 2008 13:23:51 -0700
Subject: 
Message-ID: <20081016132351-0700@axiom-wiki.newsynthesis.org>

Status: fixed somewhere => fix proposed

Axiom provides functionality to evaluate operators using a given evaluation function. Unfortunately, it is broken.

fricas

(1) -> g := operator 'g;

Type: BasicOperator?

fricas

eval(g(1783), g, i+->i)

$\label{eq1}1783$

(1)

Type: Expression(Integer)

fricas

eval(g(n), g, i+->i)

$\label{eq2}n$

(2)

Type: Expression(Integer)

fricas

eval(a*g(n), g, i+->i)

$\label{eq3}a \ n$

(3)

Type: Expression(Integer)

fricas

eval(a*g(1783), g, i+->i)

$\label{eq4}{1783}\ a$

(4)

Type: Expression(Integer)

I guess that the problem is in 'smprep$FS':

      smprep(lop, lexp, lfunc, p) ==
      ..(v := mainVariable p) case "failed" => p::%
      ..symbolIfCan(k := v::K) case SY => p::%
      ..g := (op := operator k)
      .....(arg := [eval(a,lop,lexp,lfunc) for a in argument k]$List(%))
      ..q := map(eval(#1::%, lop, lexp, lfunc),
      ...........univariate(p, k))$SparseUnivariatePolynomialFunctions2(MP, %)
      ..(n := position(name op, lop)) < minIndex lop => q g
      ..a:%  := 0
      ..f    := eval((lfunc.n) arg, lop, lexp, lfunc)
      ..e    := lexp.n
      ..while q ^= 0 repeat
      ....m  := degree q
      ....qr := divide(m, e)
      ....t1 := f ** (qr.quotient)::N
      ....t2 := g ** (qr.remainder)::N
      ....a  := a + leadingCoefficient(q) * t1 * t2
      ....q  := reductum q
      ..a

It seems that Axiom picks the wrong mainVariable in the broken case, namely a instead of g(1783). I badly need this fixed...

Martin

fixed in FriCAS --kratt6, Mon, 24 Dec 2007 05:31:42 -0800 reply

Status: open => fix proposed

... --gdr, Sun, 18 May 2008 13:20:56 -0700 reply

Status: fix proposed => fixed somewhere

no patch available

From wh-sandbox --alfredo, Thu, 28 Aug 2008 18:49:01 -0700 reply

http://axiom.svn.sourceforge.net/viewvc/axiom/branches/wh-sandbox/src/algebra/fspace.spad.pamphlet?r1=432&r2=585

Fixed in OpenAxiom --gdr, Mon, 13 Oct 2008 20:30:41 -0700 reply

... --alfredo, Thu, 16 Oct 2008 13:23:51 -0700 reply

Status: fixed somewhere => fix proposed