22 Apr
2014
22 Apr
'14
4:59 a.m.
On 2014-04-22 10:49, Norbert Melzer wrote:
This one doesn't work, since pappus doesn't return a list
Ah, right, I forgot to adjust that part. How about chain1 = [ translate x y $ color red $ Circle r | i <- [1..10], let (x,y,r) = pappus 100 i ] ...though I'm not too fond of 'let' declarations in list comprehensions. -- Frerich Raabe - raabe@froglogic.com www.froglogic.com - Multi-Platform GUI Testing