MathGroup Archive 2012

[Date Index] [Thread Index] [Author Index]

Search the Archive

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



  • Prev by Date: Re: Can the code of a function obtain the names of its arguments?
  • Next by Date: Re: Question about function
  • Previous by thread: Re: Question about function
  • Next by thread: log-like symbols?