8 lines
150 B
Haskell
8 lines
150 B
Haskell
|
import Data.Set as Set
|
||
|
doRep x n | n <= 0 = []
|
||
|
| otherwise = x:doRep x (n-1)
|
||
|
|
||
|
miLista = [1,4,8,2,3,3,5,1,6]
|
||
|
miConj = Set.fromList(miLista)
|
||
|
|