view lib/frink @ 4374:7db862205326

<oerjan> echo \'main = let p = 1 : zipWith (+) (map (*4) p) (map (sum . zipWith (*) p . reverse) (inits p)) in print $ p !! 1000\' >Test.hs
author HackBot
date Tue, 28 Jan 2014 07:49:28 +0000
parents e037173e0012
children 5b20ed9cfa5d
line wrap: on
line source

(binary:application/octet-stream)