Re: Question about function

*To*: mathgroup at smc.vnet.net*Subject*: [mg124409] Re: Question about function*From*: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com>*Date*: Thu, 19 Jan 2012 05:06:06 -0500 (EST)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*References*: <jf6917$gbm$1@smc.vnet.net>

On Wed, 18 Jan 2012 11:05:11 -0000, oversky <mailcwc at gmail.com> wrote: > I define the following function: > > xPrint[x_]:=(Print[HoldForm[x]," =",Tab,x]); > Attributes[xPrint]={HoldAll,Listable}; > a=5; > xPrint[a] > > -> a = 5 > > I want to modify this code such that it can handle multiple arguments. > For example, > > a=5; > b=6; > xPrint[a,b] > > -> a = 5 > -> b = 6 > > How do I get the argument one by one and feed it into Print[]? > Probably the simplest way is to make use of the Listable attribute that you've already set. Just make one more definition: xPrint[args__] := (xPrint[{args}];); and: In := a = 5; b = 6; xPrint[a, b] Out = a = 5 b = 6