daily pastebin goal
62%
SHARE
TWEET

Untitled

a guest Jul 19th, 2017 51 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. type AddAgent() =
  2.     let x = new MessageStream<int>()
  3.     let y = new MessageStream<int>()
  4.  
  5.     do Event<_>.sequence x.Message y.Message
  6.         |> Event.add (fun (m, n) -> printfn "AddAgent: %d" (m + n))
  7.  
  8.     member a.X = x
  9.     member a.Y = y
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top