Files
nanolog/1.pl
2026-02-07 22:15:07 +01:00

6 lines
86 B
Prolog

int(zero).
int(s(X)) :- int(X).
add(X, zero, X).
add(X, s(Y), Z) :- add(s(X), Y, Z).