home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lifeos2.zip / LIFE-1.02 / TESTS / IN / PRINT1.IN < prev    next >
Text File  |  1996-06-04  |  108b  |  11 lines
  1. writeq(((a;b),c) ) ?
  2. X = (a;b)?
  3. writeq((X,c)) ?
  4.  
  5. writeq((c,X))?
  6.  
  7. writeq((X,X))?
  8.  
  9. writeq((X,copy_term(X)))?
  10.  
  11.