-- c) Now set up lists of nouns and verbs (instead of stops and vowels) and
-- modify the function to make tuples representing possible noun-verb-noun
-- sentences.
combos3 = [(a,b,c)
          | a <- nouns,
            b <- verbs,
            c <- nouns]
  where nouns = ["person", "place", "puppy"]
        verbs = ["run", "sleep", "punch"]

-- 2. What does the following mystery function do? What is its type? Try to get
-- a good sense of what it does before you test it in the REPL to verify it.
combos3 = [(a,b,c)
          | a <- nouns,
            b <- verbs,
            c <- nouns]
  where nouns = ["person", "place", "puppy"]
        verbs = ["run", "sleep", "punch"]

-- 2. What does the following mystery function do? What is its type? Try to get
-- a good sense of what it does before you test it in the REPL to verify it.
combos3 = [(a,b,c)
          | a <- nouns,
            b <- verbs,
            c <- nouns]
  where nouns = ["person", "place", "puppy"]
        verbs = ["run", "sleep", "punch"]

-- 2. What does the following mystery function do? What is its type? Try to get
-- a good sense of what it does before you test it in the REPL to verify it.