ML
Size: a a a
ML
AZ
ML
G
G
ML
r
show' : Vect n a -> String
ему не нравится, нужно show' : Vect m a -> String
. Разбираюсь с can't match on S ?k (Erased argument)AZ
show' : Vect n a -> String
ему не нравится, нужно show' : Vect m a -> String
. Разбираюсь с can't match on S ?k (Erased argument)Show a => Show (Vect n a) where
show xs = "[" ++ show' xs ++ "]" where
show' : Vect n a -> String
show' Nil = ""
show' (x :: Nil) = show x
show' (x :: xs) = show x ++ ", " ++ show' xs
Ну
у меня так и вроде не ругаетсяAZ
r
r
AZ
AZ
r
AZ
AZ
AZ
b
b