fork download
copy 
  1. :- set_prolog_flag(verbose,silent).
  2. :- prompt(_, '').
  3. :- use_module(library(readutil)).
  4.  
  5. f2(data(1981/4/3,type(m)),sal(50000)).
  6.  
  7. main:-
  8. 	process,
  9. 	halt.
  10.  
  11. process:-
  12. 	/* your code goes here */
  13. 	f2(data(D),_),
  14. 	write(D),
  15. 	true.
  16.  
  17. :- main.
Success #stdin #stdout #stderr 0.04s 7304KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
Warning: /home/RmM6eE/prog:17:
	Goal (directive) failed: user:main
ERROR: '$runtoplevel'/0: Undefined procedure: program/0
   Exception: (3) program ? EOF: exit
https://ideone.com/QRuc5n
language:
Prolog (swi 7.6.4)
created:
3 days 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!