fork download
  1. countdown(X) :- 0 < X.
  2. eprint(X,X):- countdown(X).
Success #stdin #stdout 0.02s 68352KB
stdin
countdown(9).
stdout
GNU Prolog 1.3.1
By Daniel Diaz
Copyright (C) 1999-2009 Daniel Diaz

yes