mirror of
https://github.com/iritmaximus/haskell.git
synced 2026-10-12 19:13:39 +03:00
Set 9a Ex 9: fix definition of multiplu
This commit is contained in:
+1
-1
@@ -235,7 +235,7 @@ identity n = [0 .. n - 1]
|
||||
-- This function shows how permutations can be composed. Do not edit this
|
||||
-- function.
|
||||
multiply :: Permutation -> Permutation -> Permutation
|
||||
multiply p q = map (\i -> p !! (q !! i)) (identity (length p - 1))
|
||||
multiply p q = map (\i -> p !! (q !! i)) (identity (length p))
|
||||
|
||||
permute :: Permutation -> [a] -> [a]
|
||||
permute = todo
|
||||
|
||||
Reference in New Issue
Block a user