> < ^ Date: Mon, 04 Jul 1994 11:23:00 +0200
> < ^ From: Steve Linton <sal@dcs.st-and.ac.uk >
< ^ Subject: Re: no subject (file transmission)

This appears easy -

l := [a,b,c,...];
f := GF(2);
Add(l,100);
l := Set(l);
v := List([0..100],function(i) if i in l then return f.one; else return f.zero;
fi; end);
Polynomial(f,v);

Have I misunderstodd what you are looking for?

Steve


> < [top]