anchor.diff:               bindings = [ HttpBinding.mk HTTP address (Port.Parse port) ]
             }
   
  -        let runningApp = new FablishInstance<'model,'msg>(app.initial, env, app.update)
  +        let instance = new FablishInstance<'model,'msg>(app.initial, env, app.update)
   
           let onMessage = 
               match onMessage with
                   | Some m -> m
  -                | None -> (fun (model : 'model) msg -> app.update runningApp.Env model msg |> runningApp.EmitModel)
  +                | None -> (fun (model : 'model) msg -> app.update instance.Env model msg |> instance.EmitModel)
           
           let cts = new CancellationTokenSource()
  -        let listening,server = startWebServerAsync defaultConfig (runApp path runningApp onMessage app)
  +        let listening,server = startWebServerAsync defaultConfig (runApp path instance onMessage app)
           
           let t = Async.StartAsTask(server,cancellationToken = cts.Token)
           listening |> Async.RunSynchronously |> printfn "[Fablish-suave] start stats: %A"
           {
                localUrl =  sprintf "http://localhost:%s/mainPage" port
                runningTask = t
  -             instance = runningApp
  -             shutdown  = fun () -> runningApp.Dispose(); cts.Cancel(); 
  +             instance = instance
  +             shutdown  = fun () -> instance.Dispose(); cts.Cancel(); 
           }
   
   
  
positive.code: |  |`  |  | |  ||  '--' /|  '--.|  |.-'    ||  |  |  | 
  `--'   `--' `--'`------' `-----'`--'`-----' `--'  `--' 2.0"""
  
  //
  //    type Elmish<'model,'msg> = {
  //        update  : 'model -> 'msg -> 'model
  //        view    : 'model -> rapp<'msg> 
  //    }
  
      type FablishResult<'model,'msg> = {
          localUrl : string
  
negative.code:                 sw.Stop()
                  printfn "[fablish] rendering performed in %f milliseconds" sw.Elapsed.TotalMilliseconds
  
                  let allSubscriptions = Sub.extract sub |> instance.SendSubs
                  currentSubscription <- sub
  
                  let reaction = app.onRendered model view
  