summaryrefslogtreecommitdiff
path: root/misc.prolog
diff options
context:
space:
mode:
Diffstat (limited to 'misc.prolog')
-rw-r--r--misc.prolog20
1 files changed, 0 insertions, 20 deletions
diff --git a/misc.prolog b/misc.prolog
deleted file mode 100644
index 6d8ad68..0000000
--- a/misc.prolog
+++ /dev/null
@@ -1,20 +0,0 @@
-
-:- module(misc, [filter/3, head/2, tail/2]).
-
-
-
-
-filter(List, Predicate, Result) :-
- Test =.. [Predicate,X],
- findall(X, Test, No),
- subtract(List, No, Result).
-
-
-head(X,[Y]) :- X = Y.
-head(X,[Y|_]) :- X = Y.
-
-
-tail(X,[]) :- X = [].
-tail(X,[_]) :- X = [].
-tail(X,[_|Y]) :- X = Y.
-