[ create a new paste ] login | about

Link: http://codepad.org/wmhYBrnO    [ raw code | fork ]

uskz - Haskell, pasted on Dec 15:
1
2
3
4
5
6
7
8
9
cnat n f x = iterate f x !! n
           = (!!n) (iterate f x)
           = (!!n) ((iterate f) x)
           = ((!!n).(iterate f)) x
           = (((!!n).) (iterate f)) x
           = ((((!!n).).iterate) f) x
           = (((!!n).).iterate) f x

cnat n = ((!!n).).iterate


Create a new paste based on this one


Comments: