Re: Best practice passing expressions to functions
- To: mathgroup at smc.vnet.net
- Subject: [mg85316] Re: [mg85290] Best practice passing expressions to functions
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Tue, 5 Feb 2008 19:47:17 -0500 (EST)
- Reply-to: hanlonr at cox.net
f[expr_] := Module[{var = Variables[expr][[1]]}, ToExpression["g[" <> ToString[var] <> "_] := " <> ToString[InputForm[expr ]]]]; Bob Hanlon ---- Remo Aschwanden <rcasch at yahoo.com> wrote: > Hi > > I want to write procedures that accept expressions as parameters and be > able define functions based on these expressions, i.e. > > f[exp_]:=Module[ > "g[x_] := exp " > ] > > The code between the " " should clarify what I intend to do. Calling > f[x^2-2x+4] > should lead to the definition of a function (or pattern) > g[x_]:=x^2-2x+4; > > What's the best way to do this? How can I do this without being > dependent on the variables used in the expressions ("x")? > > Thank you. > Remo A. > >