home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol166 / posco.pst < prev    next >
Encoding:
Text File  |  1984-04-29  |  613 b   |  19 lines
  1.  
  2. [POSCO.PST]
  3. [compile a Post system into REC]
  4. [18 December 1980]
  5.  
  6. [variable bracketed by constants, followed by another variable]
  7. (<0>!<1>[<2>]<3>[<4>.<5>!<6>,<0>{`<1>`E`<3>`UQzml<2>$S!<3>[<4>.<5>!nL;nL}<6>)
  8. [terminal variable]
  9. (<0>!<1>[<2>].<5>!<6>,<0>{`<1>`FzZQml<2>$S!.<5>!nL;nL}<6>)
  10. [final variable, but still followed by a constant]
  11. (<0>!<1>[<2>]<3>.<5>!<6>,<0>{`<1>`E`<3>`UQzml<2>$S!.<5>!nL;nL}<6>)
  12. [compile the consequent]
  13. (<0>#<1>[<2>]<5>!<6>,<0>`<1>`I<2>$ryGI#<5>!<6>)
  14. [compile final constant in the consequent]
  15. (<0>#<1>!<6>,<0>`<1>`I<6>:)
  16. [antecedent compiled, set up consequent]
  17. (<0>!.<6>,<0>JZD#<6>)
  18.  
  19.