home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / o / ops5.zip / TEST1.OPS < prev    next >
Text File  |  1992-05-31  |  371b  |  22 lines

  1. (literalize c1  a1 a2)
  2. (literalize c2  a1 a2)
  3. (literalize c3  a1 a2)
  4.  
  5. (p p1 
  6.     (start)
  7.     -->
  8.     (make c1 ^a1 5    ^a2 foo)
  9.     (make c2 ^a1 foo  ^a2 1  )
  10.     (make c3 ^a1 5    ^a2 foo)
  11.     (make c1 ^a1 10   ^a2 foo))
  12.           
  13.  
  14.  
  15. (p p2
  16.     (c1  ^a1 <x>   ^a2 <y>)
  17.     (c2  ^a1 <y>   ^a2 < <x>)
  18.       - (c3  ^a1 <x>   ^a2 foo)
  19.    -->
  20.     (write    --------  x: <x> all fine --------- (crlf)))
  21.  
  22.