1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
global protocol Fibonacci(role A, role B) { rec Fib { choice at A { fibonacci(Long) from A to B; fibonacci(Long) from B to A; continue Fib; } or { stop() from A to B; } } }