From b41711713002a8980a783d36164fbecbaddc1986 Mon Sep 17 00:00:00 2001
From: Mirek Kratochvil <exa.exa@gmail.com>
Date: Sat, 4 Mar 2023 13:51:22 +0100
Subject: load a prelude

---
 inst/prelude.pl | 5 +++++
 1 file changed, 5 insertions(+)
 create mode 100644 inst/prelude.pl

(limited to 'inst')

diff --git a/inst/prelude.pl b/inst/prelude.pl
new file mode 100644
index 0000000..fefed5f
--- /dev/null
+++ b/inst/prelude.pl
@@ -0,0 +1,5 @@
+member(X, [X|_]).
+member(X, [_|T]) :- member(X,T).
+
+append([], X, X).
+append([X|T], Y, [X|TY]) :- append(T,Y,TY).
-- 
cgit v1.2.3