anchor.diff:  
   type ILocalized = 
       abstract member path: string
  -    abstract member site : ISite option
   
   type IPage = 
       inherit ILocalized
  
positive.code:     logD isDebug (message + ":")
      if isDebug then logO value
      logD isDebug "----------------------------------------------------------------------------------"
  
  let startApplication (application:IApplication) =
      let isDebug = application.isDebug
  
negative.code: type IApplicationV2 = 
      inherit IApplicationCore
      abstract member getPages : unit -> (IPage array)
      abstract member getSites : unit -> (string array)
      abstract member getScheduledTasks : unit -> (IScheduledTask array)
  
  type ApplicationV2EndPoint(page:IPage, task:IScheduledTask option) =
  