Re: Short, simple - Why doesn't it work as a function
- To: mathgroup at smc.vnet.net
- Subject: [mg71790] Re: Short, simple - Why doesn't it work as a function
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Wed, 29 Nov 2006 02:56:32 -0500 (EST)
- Organization: The Open University, Milton Keynes, UK
- References: <ekh7e4$sd0$1@smc.vnet.net>
wooks wrote: > {#, a} & /@ {a, b, c} > > gives {{a, a}, {b, a}, {c, a}} which is what i want. > > why[x_List] := {#, a} & /@ x; > why[{a, b, c}] > > gives. > > {{a, a}, {{b, a}, {{c, a}, {}}}} > > not what I want. > > I've checked the FullForms and they are different - why?? > Works fine on my system. I would advise to try again with a fresh kernel. In[1]:= ({#1, a} & ) /@ {a, b, c} Out[1]= {{a, a}, {b, a}, {c, a}} In[2]:= FullForm[%] Out[2]//FullForm= FullForm[{{a, a}, {b, a}, {c, a}}] In[3]:= why[x_List] := ({#1, a} & ) /@ x; why[{a, b, c}] Out[4]= {{a, a}, {b, a}, {c, a}} In[5]:= FullForm[%] Out[5]//FullForm= FullForm[{{a, a}, {b, a}, {c, a}}] Regards, Jean-Marc