You are viewing a single comment's thread. Return to all comments →
Using recursion:
mingle "" "" = "" mingle p q = (head p) : (head q) : mingle (tail p) (tail q) main = do p <- getLine q <- getLine putStrLn $ mingle p q
Seems like cookies are disabled on this browser, please enable them to open this website
String Mingling
You are viewing a single comment's thread. Return to all comments →
Using recursion: