anchor.diff:          | Finalize
           | Actualize
   
  -/// Specifies the view phase of Nu's model-view-message form factor.
  -type Phase = ModelViewMessageEffect.Phase
  +/// Specifies the view phase of Nu's model-view-message-command form factor.
  +type Phase = ModelViewMessageCommand.Phase
   
   [<AutoOpen>]
   module EffectFacetModule =
  
positive.code: [<AutoOpen>]
  module LayerDispatcherModule =
  
      type [<AbstractClass>] LayerDispatcher<'model, 'message, 'effect>
          (propertyFn : Layer -> PropertyTag<'model, World>) =
          inherit LayerDispatcher ()
  
  
negative.code:             let world = World.monitorPlus handleMouseLeft Events.MouseLeftUp gui world |> snd
              world
  
      type [<AbstractClass>] GuiDispatcher<'model, 'message, 'command> (propertyFn) =
          inherit EntityDispatcher<'model, 'message, 'command> (propertyFn)
  
          static let handleMouseLeft evt world =
              let gui = evt.Subscriber : Entity
  