fork(1) download
  1. :- set_prolog_flag(verbose,silent).
  2. :- prompt(_, '').
  3. :- use_module(library(readutil)).
  4.  
  5. main:-
  6. process,
  7.  
  8. process:-
  9. string_codes(S ,[97, 42, 49, 43, 50]), write(S),
  10.  
  11. :- main.
Success #stdin #stdout 0.02s 7480KB
stdin
Standard input is empty
stdout
a*1+2