Advertisement
Guest User

Untitled

a guest
Jul 20th, 2017
58
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
OCaml 0.24 KB | None | 0 0
  1. (VAR m  n)
  2. (RULES
  3.  
  4. ack_in(0,n) -> ack_out(s(n))
  5. ack_in(s(m),0) -> u11(ack_in(m,s(0)))
  6. u11(ack_out(n)) -> ack_out(n)
  7. ack_in(s(m),s(n)) -> u21(ack_in(s(m),n),m)
  8. u21(ack_out(n),m) -> u22(ack_in(m,n))
  9. u22(ack_out(n)) -> ack_out(n)
  10.  
  11. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement