anchor.diff:              let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'relate' due to: " + scstring exn, None)
               struct (violation, World.choose oldWorld)
   
  -    let tryGetIsSelectedScreenIdling world =
  -        let oldWorld = world
  -        try
  -            let result = World.tryGetIsSelectedScreenIdling world
  -            let value = result
  -            let value = ScriptingSystem.tryImport typeof<FSharpOption<Boolean>> value world |> Option.get
  -            struct (value, world)
  -        with exn ->
  -            let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'tryGetIsSelectedScreenIdling' due to: " + scstring exn, None)
  -            struct (violation, World.choose oldWorld)
  -
  -    let tryGetIsSelectedScreenTransitioning world =
  -        let oldWorld = world
  -        try
  -            let result = World.tryGetIsSelectedScreenTransitioning world
  -            let value = result
  -            let value = ScriptingSystem.tryImport typeof<FSharpOption<Boolean>> value world |> Option.get
  -            struct (value, world)
  -        with exn ->
  -            let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'tryGetIsSelectedScreenTransitioning' due to: " + scstring exn, None)
  -            struct (violation, World.choose oldWorld)
  -
  -    let isSelectedScreenIdling world =
  -        let oldWorld = world
  -        try
  -            let result = World.isSelectedScreenIdling world
  -            let value = result
  -            let value = ScriptingSystem.tryImport typeof<Boolean> value world |> Option.get
  -            struct (value, world)
  -        with exn ->
  -            let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'isSelectedScreenIdling' due to: " + scstring exn, None)
  -            struct (violation, World.choose oldWorld)
  -
  -    let isSelectedScreenTransitioning world =
  -        let oldWorld = world
  -        try
  -            let result = World.isSelectedScreenTransitioning world
  -            let value = result
  -            let value = ScriptingSystem.tryImport typeof<Boolean> value world |> Option.get
  -            struct (value, world)
  -        with exn ->
  -            let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'isSelectedScreenTransitioning' due to: " + scstring exn, None)
  -            struct (violation, World.choose oldWorld)
  -
       let selectScreen transitionState screen world =
           let oldWorld = world
           try
  
positive.code:             [
               ("resolve", { Fn = evalResolveBinding; Pars = [|"relation"|]; DocOpt = None })
               ("relate", { Fn = evalRelateBinding; Pars = [|"address"|]; DocOpt = None })
               ("tryGetIsSelectedScreenIdling", { Fn = evalTryGetIsSelectedScreenIdlingBinding; Pars = [||]; DocOpt = None })
               ("tryGetIsSelectedScreenTransitioning", { Fn = evalTryGetIsSelectedScreenTransitioningBinding; Pars = [||]; DocOpt = None })
               ("isSelectedScreenIdling", { Fn = evalIsSelectedScreenIdlingBinding; Pars = [||]; DocOpt = None })
               ("isSelectedScreenTransitioning", { Fn = evalIsSelectedScreenTransitioningBinding; Pars = [||]; DocOpt = None })
               ("selectScreen", { Fn = evalSelectScreenBinding; Pars = [|"transitionState"; "screen"|]; DocOpt = None })
               ("tryTransitionScreen", { Fn = evalTryTransitionScreenBinding; Pars = [|"destination"|]; DocOpt = None })
               ("transitionScreen", { Fn = evalTransitionScreenBinding; Pars = [|"destination"|]; DocOpt = None })
               ("setScreenSplash", { Fn = evalSetScreenSplashBinding; Pars = [|"splashDescriptor"; "destination"; "screen"|]; DocOpt = None })
  
negative.code:         | None ->
              match evaleds with
              | [||] -> isSelectedScreenTransitioning world
              | _ ->
                  let violation = Scripting.Violation (["InvalidBindingInvocation"], "Incorrect number of arguments for binding '" + fnName + "' at:\n" + SymbolOrigin.tryPrint originOpt, None)
                  struct (violation, world)
  