1 files changed, 11 insertions, 0 deletions
diff --git a/p15b.erl b/p15b.erl
new file mode 100755
index 0000000..229c60a
--- /dev/null
+++ b/p15b.erl
@@ -0,0 +1,11 @@
+-module(problem15).
+-export([solve/0]).
+
+solve() ->
+	length(perms("DDDDDDDDDDDDDDDDDDDDRRRRRRRRRRRRRRRRRRRR")).
+
+% Tack, Joe.
+perms([]) ->
+	[[]];
+perms(L) ->
+	[[H|T] || H <- L, T <- perms(L--[H])].