home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lifeos2.zip / LIFE-1.02 / TESTS / LF / MODULE_T.L04 < prev    next >
Text File  |  1996-06-04  |  148b  |  16 lines
  1.  
  2. module("a")?
  3.  
  4. public(aa)?
  5.  
  6. aa(c=>d).
  7.  
  8. module("b")?
  9.  
  10. public(bb,c,e)?
  11. private_feature(c,e,i,j)?
  12.  
  13. bb(c=>d,e=>Z,g=>Y) :- Y.i=123, h(Z).
  14.  
  15. h(@(j=>111)).
  16.