anchor.diff:  
           static member IntrinsicFacetNames =
               [typeof<NodeFacet>.Name]
  -
  -[<AutoOpen>]
  -module EffectDispatcherModule =
  -
  -    type EffectDispatcher () =
  -        inherit EntityDispatcher ()
  -
  -        static member PropertyDefinitions =
  -            [Define? Effect ^ scvalue<Effect> "[Effect None [] [Composite [Shift 0] [[StaticSprite [Resource Default Image] [] Nil]]]]"]
  -
  -        static member IntrinsicFacetNames =
  -            [typeof<EffectFacet>.Name]
   
   [<AutoOpen>]
   module GuiDispatcherModule =
  
positive.code:             | _ -> None
  
  [<AutoOpen>]
  module StaticSpriteFacetModule =
  
      type Entity with
  
negative.code:         interface Imperative
  
  [<AutoOpen>]
  module EffectDispatcherModule =
  
      type EffectDispatcher () =
          inherit EntityDispatcher ()
  
          static member PropertyDefinitions =
              [Define? Effect ^ scvalue<Effect> "[Effect None [] [Composite [Shift 0] [[StaticSprite [Resource Default Image] [] Nil]]]]"]
  
          static member IntrinsicFacetNames =
              [typeof<EffectFacet>.Name]
  
  [<AutoOpen>]
  module NodeDispatcherModule =
  
      type NodeDispatcher () =
  