fork download
  1. fac(0,1) :- !.
  2. fac(N, Nfac) :-
  3. N>0,
  4. M is N-1,
  5. fac(M, Mfac),
  6. Nfac is N*Nfac.
Success #stdin #stdout 0.02s 68352KB
stdin
10
stdout
GNU Prolog 1.3.1
By Daniel Diaz
Copyright (C) 1999-2009 Daniel Diaz
uncaught exception: error(syntax_error('user_input:1 (char:3) . or operator expected after expression'),read_term/3)