Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

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

Search the Archive

Re: Question about function

  • To: mathgroup at smc.vnet.net
  • Subject: [mg124411] Re: Question about function
  • From: Bob Hanlon <hanlonr357 at gmail.com>
  • Date: Thu, 19 Jan 2012 05:06:49 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <201201181101.GAA16655@smc.vnet.net>

Use SetAttributes to set attributes; and to make use of the attribute
Listable, put the arguments into a list.

ClearAll[xPrint]
SetAttributes[xPrint, {HoldAll, Listable}];
xPrint[x_] := (Print[HoldForm[x], " =", Tab, x]);
a = 5;
b = 6;

xPrint[a];

a =	5

xPrint[{a, b}];

a =	5

b =	6


Bob Hanlon

On Wed, Jan 18, 2012 at 6:01 AM, 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[]?
>



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