home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l217 / 2.ddi / EXAMPLES / CH04EX04.PRO < prev    next >
Encoding:
Prolog Source  |  1990-03-26  |  285 b   |  13 lines
  1. /*
  2.    Copyright (c) 1986, 90 by Prolog Development Center
  3. */
  4.    
  5. predicates
  6.    phone_number(symbol, symbol)
  7.  
  8. clauses
  9.    phone_number("Albert", "EZY-3665").
  10.    phone_number("Betty", "555-5233").
  11.    phone_number("Carol", "909-1010").
  12.    phone_number("Dorothy", "438-8400").
  13.