From: tmoran@acm.org
Subject: Ann: symbolic multinomial algebra
Date: Mon, 31 May 2004 22:56:58 GMT
Date: 2004-05-31T22:56:58+00:00 [thread overview]
Message-ID: <_KOuc.33773$Ly.23072@attbi_s01> (raw)
I couldn't find a simple, easy to integrate, symbolic algebra
package, so I've posted one at http://home.comcast.net/~twmoran
The sample program includes the Knuth 2.2.4 example:
type Vars is (x,y);
function Image(Var : Vars) return String is ...
package Polys is new Multinom(Vars, Image);
use Polys;
A : Polys.Multinomials
:= X**4 + 2.0*x**3*y**1 + 3.0*x**2*y**2 + 4.0*x**1*y**3 + 5.0*y**4;
B : Polys.Multinomials := x**2 - 2.0*x**1*y**1 + y**2;
...
Put_Line("Product is " & Image(A*B));
next reply other threads:[~2004-05-31 22:56 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2004-05-31 22:56 tmoran [this message]
2004-06-01 4:52 ` Ann: symbolic multinomial algebra tmoran
2004-06-02 22:53 ` Craig Carey
2004-06-03 11:33 ` Craig Carey
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox