anchor.diff:  let handleEvent (state : State) = function
       | UserCreated event -> userCreated state event
       | NameChanged event -> nameChanged state event
  +
  +(* End Event Handlers *)
   
   //Apply commands
   let createUser (command : CreateUser) (state : State) =
  
positive.code:     Id: Guid
  }
  
  //Events
  
  type Event =
      | UserCreated of UserCreated
  
negative.code:     Name: string
      Email: string
      Password: string
      CreationTime: Instant
  }
  
  and NameChanged = {
  