path: root/AufgabeFFP1.hs

module AufgabeFFP1
where

pof2s :: [Integer]
pof2s = map (2^) [0,1..]