From 4fb3fa2758fd4db2bef1efc7ae531e0dadaf4ffa Mon Sep 17 00:00:00 2001
From: Guillermo Ramos
Date: Thu, 3 May 2012 14:12:06 +0200
Subject: [Prolog] Día 2

---
 prolog/reverse.pl | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100644 prolog/reverse.pl

(limited to 'prolog/reverse.pl')

diff --git a/prolog/reverse.pl b/prolog/reverse.pl
new file mode 100644
index 0000000..f4aa5cd
--- /dev/null
+++ b/prolog/reverse.pl
@@ -0,0 +1,4 @@
+reverse([], []).
+reverse([H|T], L) :-
+	reverse(T, L2),
+	append(L2,H,L).
-- 
cgit v1.2.3