angvillar

{-
combine ["abc", "def", "ghi"]
["adg", "beh", "cfi"]
-}
combine :: [String] -> [String]
combine = undefined

angvillar

module Main where

import qualified Data.Map as Map

twoNumberSum :: Map.Map Int Bool -> [Int] -> Int -> [Int]
twoNumberSum _ []     _ = []
twoNumberSum m (x:xs) n = case (Map.lookup y m) of
    Nothing  -> twoNumberSum (Map.insert x True m) xs n
    (Just _) -> [x,y]
    where y = n-x

angvillar

module Main where

import qualified Text.Parsec as P

ks :: [String]
ks = 
    [ "ABCD"
    , "EFGH"
    ]

angvillar

// Use Gists to store code you would like to remember later on
console.log(window); // log the "window" object to the console