if we add &#39;a&#39; to the definition of this function, (to make it work), the type of it turns out to be: [a] -&gt; [(a, Bool)]<br><br>you might have forgotten the &quot;map fst $&quot; part.<br><br>Best,<br><br><div class="gmail_quote">
On 8 June 2010 14:51, Bill Atkins <span dir="ltr">&lt;<a href="mailto:watkins@alum.rpi.edu">watkins@alum.rpi.edu</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
f :: [a] -&gt; [a]<br>
f = filter snd $ zip a (cycle [True, False])<br>
<div class="im"><br>
On Monday, June 7, 2010, Ozgur Akgun &lt;<a href="mailto:ozgurakgun@gmail.com">ozgurakgun@gmail.com</a>&gt; wrote:<br>
&gt; or, since you don&#39;t need to give a name to the second element of the list:<br>
&gt;<br>
&gt; f :: [a] -&gt; [a]<br>
</div>&gt; f (x:_:xs) = x : f xsf x = x<br>
<div><div></div><div class="h5">&gt;<br>
&gt;<br>
&gt;<br>
&gt;<br>
&gt; On 7 June 2010 20:11, Ozgur Akgun &lt;<a href="mailto:ozgurakgun@gmail.com">ozgurakgun@gmail.com</a>&gt; wrote:<br>
&gt;<br>
&gt; i think explicit recursion is quite clean?<br>
&gt;<br>
&gt;<br>
&gt; f :: [a] -&gt; [a]f (x:y:zs) = x : f zs<br>
&gt;<br>
&gt; f x = x<br>
&gt;<br>
&gt;<br>
&gt; On 7 June 2010 19:42, Thomas Hartman &lt;<a href="mailto:tphyahoo@gmail.com">tphyahoo@gmail.com</a>&gt; wrote:<br>
&gt; maybe this?<br>
&gt;<br>
&gt; map snd . filter (odd . fst) . zip [1,2..] $ [1,2,3,4,5]<br>
&gt;<br>
&gt; 2010/6/6 R J &lt;<a href="mailto:rj248842@hotmail.com">rj248842@hotmail.com</a>&gt;:<br>
&gt;&gt; What&#39;s the cleanest definition for a function f :: [a] -&gt; [a] that takes a<br>
&gt;&gt; list and returns the same list, with alternate items removed?  e.g., f [0,<br>
&gt;&gt; 1, 2, 3, 4, 5] = [1,3,5]?<br>
&gt;&gt;<br>
&gt;&gt; ________________________________<br>
&gt;&gt; The New Busy is not the old busy. Search, chat and e-mail from your inbox.<br>
&gt;&gt; Get started.<br>
&gt;&gt; _______________________________________________<br>
&gt;&gt; Haskell-Cafe mailing list<br>
&gt;&gt; <a href="mailto:Haskell-Cafe@haskell.org">Haskell-Cafe@haskell.org</a><br>
&gt;&gt; <a href="http://www.haskell.org/mailman/listinfo/haskell-cafe" target="_blank">http://www.haskell.org/mailman/listinfo/haskell-cafe</a><br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt; _______________________________________________<br>
&gt; Haskell-Cafe mailing list<br>
&gt; <a href="mailto:Haskell-Cafe@haskell.org">Haskell-Cafe@haskell.org</a><br>
&gt; <a href="http://www.haskell.org/mailman/listinfo/haskell-cafe" target="_blank">http://www.haskell.org/mailman/listinfo/haskell-cafe</a><br>
&gt;<br>
&gt;<br>
&gt; --<br>
&gt; Ozgur Akgun<br>
&gt;<br>
&gt;<br>
&gt; --<br>
&gt; Ozgur Akgun<br>
&gt;<br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Ozgur Akgun<br>