myConcat :: [t] -> [t] -> [t]
myConcat [] y = y
myConcat (x:xs) y = x:(myConcat xs y)