fork download
  1. countdown(1) :- write(1).
  2. countdown(N) :-
  3. write(N),
  4. M is N - 1,
  5. write(M).
Success #stdin #stdout 0.02s 68352KB
stdin
countdown(5).
stdout
GNU Prolog 1.3.1
By Daniel Diaz
Copyright (C) 1999-2009 Daniel Diaz
54

yes