HoraceGonzalez

open System

type Message =
    | Hi
    | Greet of string

let greeterActor = MailboxProcessor.Start(fun inbox ->
    
    // the message processing function
    let rec messageLoop() = async{