seq evaluates to Weak Head Normal Form (WHNF). WHNF is the first contructor. So your use of seq only evaluates the first number and the cons. I.E., it evaluates to:<div>s:(Thunk)</div><div><br></div><div>You are expecting seq to work like deepseq and evaluate the entire list.</div>
<div><br></div><div>Also, mod is slower than rem and the meaning doesn&#39;t matter in a sieve so change mod to rem for faster code.</div><div><br></div><div>Tim</div><div><br></div><br class="Apple-interchange-newline"><br>
<div class="gmail_quote">On Tue, Apr 17, 2012 at 1:56 PM, Lee Short <span dir="ltr">&lt;<a href="mailto:blackcat@pro-ns.net">blackcat@pro-ns.net</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
I&#39;ve got the following code, and I&#39;m not sure why the seq seems to be doing nothing.  The code should never terminate if the seq were forcing the full evaluation of y.  Instead, it runs just fine (though stack overflows if I ask for too many elements of primes).  I didn&#39;t see anything in the tutorial section of <a href="http://haskell.org" target="_blank">haskell.org</a> that seems to explain this -- pointers to a useful source would be welcome.<br>

<br>
<br>
sieve :: [Int] -&gt; [Int]<br>
sieve xs =<br>
   let ys = filter (\z -&gt; 0 /= z `mod` head xs) xs<br>
   in seq ys $ head xs:sieve ys<br>
<br>
primes = sieve [2..]<br>
<br>
thanks<br>
Lee<br>
<br>
<br>
______________________________<u></u>_________________<br>
Beginners mailing list<br>
<a href="mailto:Beginners@haskell.org" target="_blank">Beginners@haskell.org</a><br>
<a href="http://www.haskell.org/mailman/listinfo/beginners" target="_blank">http://www.haskell.org/<u></u>mailman/listinfo/beginners</a><br>
</blockquote></div><br>