Commented out customHelperFunctionCuzPoorImplementation as it is not needed with type annotations.

This commit is contained in:
Samuel Hammersberg 2023-05-01 11:09:23 +02:00
parent 78af9431b9
commit 6b72d08b94

View file

@ -168,12 +168,12 @@ prelude :: String
prelude = prelude =
unlines unlines
[ "\n" [ "\n"
, "customHelperFunctionCuzPoorImplementation : Bool () -> Int -> Bool ()" --, "customHelperFunctionCuzPoorImplementation : Bool () -> Int -> Bool ()"
, "customHelperFunctionCuzPoorImplementation x y = x" --, "customHelperFunctionCuzPoorImplementation x y = x"
, "data Bool () where" , "data Bool () where"
, " False : Bool ()" , " False : Bool ()"
, " True : Bool ()" , " True : Bool ()"
, "lt : Int -> Int -> Bool ()" , "lt : Int -> Int -> Bool ()"
, "lt x y = customHelperFunctionCuzPoorImplementation True (x + y)" , "lt x y = True"
, "\n" , "\n"
] ]