MFC/p1/Long.hs
Carlos Galindo 38ce60f8b7 Practica 1
2018-10-15 19:13:06 +02:00

5 lines
56 B
Haskell

module Long where
long [] = 0
long (x:t) = 1 + long t