Russell Ballestrini
2b35819393
Unsandbox CLI implementations in 42 programming languages for the permacomputer project. Public domain software for code execution across all ecosystems. Languages: Python, JavaScript, Ruby, Go, Rust, C, C++, Java, Kotlin, C#, F#, Haskell, OCaml, Clojure, Scheme, Common Lisp, Erlang, Elixir, D, Nim, Zig, V, Dart, Groovy, Scala, Julia, R, Crystal, Fortran, COBOL, Prolog, Forth, Tcl, Raku, Lua, PHP, Perl, Bash, TypeScript, Objective-C, PowerShell, AWK Includes test suites and service lifecycle tests.
21 lines
312 B
Prolog
21 lines
312 B
Prolog
% Prolog Fibonacci
|
|
|
|
fib(0, 0).
|
|
fib(1, 1).
|
|
fib(N, F) :-
|
|
N > 1,
|
|
N1 is N - 1,
|
|
N2 is N - 2,
|
|
fib(N1, F1),
|
|
fib(N2, F2),
|
|
F is F1 + F2.
|
|
|
|
print_fib(N) :-
|
|
fib(N, F),
|
|
format('fib(~w) = ~w~n', [N, F]).
|
|
|
|
main :-
|
|
forall(between(0, 10, N), print_fib(N)),
|
|
halt.
|
|
|
|
:- initialization(main).
|