Re: Help with module please
- To: mathgroup at smc.vnet.net
- Subject: [mg39927] Re: Help with module please
- From: "flip" <flip_alpha at safebunch.com>
- Date: Wed, 12 Mar 2003 02:28:22 -0500 (EST)
- References: <b4k46h$8im$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
A slight correction below, sorry ... Flip
Hello,
Another list request for help.
I have three variables q, a, and b.
My list format is some set consisting of vectors of the form: {{{pi, expi},
{rval0, rval1, rval2, ..., rvaln}}}
where:
pi = prime factor,
expi = exponent of prime factor,
and an rval vector corresponding to each {pi, expi} pair.
What I would like is a list manipulator that returns an
x = x0 + x1pi + ... + xn pi^(expi-1) (note that this sum contains expi
values)
x0 = position in rval vector which contains the value PowerMod[a,
(q-1)/pi^(1)), q]
x1 = position in rval vector which contains the value
PowerMod[((PowerMod[a, - 1, q])^x0)*b, (q-1)/pi^(2), q]
x2 = position in rval vector which contains the value
PowerMod[((PowerMod[a, - 1, q])^(xo + x1*pi)*b, (q-1)/pi^(4), q]
x3 = position in rval vector which contains the value
PowerMod[((PowerMod[a, - 1, q])^(xo + x1*pi + x2*pi^2)*b, (q-1)/pi^(8), q]