Re: Perform an assigment
- To: mathgroup at smc.vnet.net
- Subject: [mg43879] Re: Perform an assigment
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Fri, 10 Oct 2003 03:05:47 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <bm2u1n$6qd$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
don't do this use the rules returned by als Solve[] functions
to replace the values of the symbolic variables in certain expressions.
{a, b, c} /. Solve[{a == 1, b == 2, c == 3}, {a, b, c}][[1]]
But if you insist to make assignments, something like
Set @@@ Transpose[{{a, b, c}, {a, b, c} /.
Solve[{a == 1, b == 2, c == 3}, {a, b, c}][[1]]}]
will do that.
Regards
Jens
paulocct at uniquindio.edu.co wrote:
>
> Hi all,
> I want to solve a system of equations and to assign the values
> calculated to the variables of the system automatically, What should I
> do?. What command should I use?
>
> Thanks a lot,
>
> Paulo Carmona
> University of Quindio
> Colombia
>
>