diff --git a/lyahfgg/boombangs.hs b/lyahfgg/boombangs.hs
new file mode 100644
index 0000000..f9c17b8
--- /dev/null
+++ b/lyahfgg/boombangs.hs
@@ -0,0 +1 @@
+boomBangs xs = [if x < 10 then "BOOM!" else "BANG!" | x <- xs, odd x]
diff --git a/lyahfgg/hilarity.hs b/lyahfgg/hilarity.hs
new file mode 100644
index 0000000..8ffa1d3
--- /dev/null
+++ b/lyahfgg/hilarity.hs
@@ -0,0 +1,2 @@
+adjNounHilarity adjectives nouns =
+	[adjective ++ " " ++ noun | adjective <- adjectives, noun <- nouns]