1 files changed, 4 insertions, 4 deletions

diff --git a/AufgabeFFP5.hs b/AufgabeFFP5.hs
index 78ed0fe..430fb22 100644
--- a/AufgabeFFP5.hs
+++ b/AufgabeFFP5.hs
@@ -97,18 +97,18 @@ divideAndConquer indiv solve divide combine initPb = dAC initPb
 -- 4.
 -------------------------------------------------------------------------------
 
-miIndiv :: [a] -> Bool
+mi_indiv :: [a] -> Bool
 miIndiv a = length a <= 1
 
-miSolve :: (Ix a, Show a) => (b -> Bool) -> [(a,b)] -> [(a,b)]
+mi_solve :: (Ix a, Show a) => (b -> Bool) -> [(a,b)] -> [(a,b)]
 miSolve wf [(a,b)]
   | wf b = [(a,b)]
   | otherwise = []
   
-miDivide :: [a] -> [[a]]
+mi_divide :: [a] -> [[a]]
 miDivide (x:xs) = [[x], xs]
 
-miCombine :: [a] -> [[a]] -> [a]
+mi_combine :: [a] -> [[a]] -> [a]
 miCombine _ [] = error "No matching index"
 miCombine a (x:xs)
   | null x = miCombine a xs