home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / Borland Plateform / Turbo Prolog 2 / EXAMPL19.PRO < prev    next >
Encoding:
Prolog Source  |  1986-04-01  |  265 b   |  11 lines
  1.                 /* Program 19 */
  2. domains
  3.        integerlist = integer*
  4.        namelist    = symbol*
  5. predicates
  6.        writelist(integerlist)
  7.        writelist(namelist).
  8. clauses
  9.        writelist([]).
  10.        writelist([H|T]) :- write(H," "), writelist(T).
  11.