sp11::[String]->String->String
sp11 [] y=y
sp11 (x:xs) y=sp11 xs y:x
--sp11 (x:xs) y=sp11 xs y++x

僕ちゃん今これが通らないでCAしてるのが通る理由を10分ほど考えて納得して満足してたのにやたらハイレベルなお話をしていますなぁ