fork download
copy 
  1. fib(0, 1):-!.
  2. fib(1, 1):-!.
  3. fib(N, W) :- N1 is N-1, fib(N1, W1),
  4.              N2 is N-2, fib(N2, W2),
  5.              W is W1 + W2.
Success #stdin #stdout 0.02s 68352KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
GNU Prolog 1.3.1
By Daniel Diaz
Copyright (C) 1999-2009 Daniel Diaz
https://ideone.com/Hh0Ly
language:
Prolog (gprolog 1.4.5)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!