anchor.diff:      static member FromConfiguration(config) = new RuntimeId(config)
    
   [<AutoSerializable(false)>]       
  -type RuntimeManager () =
  +type RuntimeManager (config : ConfigurationId, logger : ISystemLogger, resources : ResourceRegistry) =
  +    
  +    let runtimeId = RuntimeId.FromConfiguration(config)
  +    let workerManager = WorkerManager.Create(config)
  +    let jobManager = JobManager.Create(config)
  +    let taskManager = TaskManager.Create(config)
  +    let assemblyManager = 
  +        let store = resources.Resolve<CloudFileStoreConfiguration>()
  +        let serializer = resources.Resolve<ISerializer>()
  +        StoreAssemblyManager.Create(store, serializer, "vagabond", logger)
  +
       interface IRuntimeManager with
  -        member this.AssemblyManager: IAssemblyManager = 
  -            failwith "Not implemented yet"
  +        member this.Id = runtimeId :> _
  +        member this.Serializer = Configuration.Pickler :> _
  +        
  +        member this.WorkerManager: IWorkerManager = workerManager :> _
  +        member this.TaskManager: ICloudTaskManager = taskManager :> _
  +        member this.JobQueue: IJobQueue = jobManager :> _
  +        member this.AssemblyManager: IAssemblyManager = assemblyManager :> _
  +        
  +        member this.SystemLogger: ISystemLogger = logger
  +
  +        member this.GetCloudLogger(worker: IWorkerId, job: CloudJob): ICloudLogger = 
  +            let pl = new MBrace.Azure.Runtime.Info.ProcessLogger(config, job.TaskEntry.Id) 
  +            let lc = new MBrace.Azure.Runtime.Info.RuntimeLogger()
  +            lc.Attach(new ConsoleLogger())
  +            lc.Attach(pl)
  +            lc :> _
  +
  +
           
           member this.CancellationEntryFactory: ICancellationEntryFactory = 
               failwith "Not implemented yet"
           
           member this.CounterFactory: ICloudCounterFactory = 
  -            failwith "Not implemented yet"
  -        
  -        member this.GetCloudLogger(worker: IWorkerId, job: CloudJob): ICloudLogger = 
  -            failwith "Not implemented yet"
  -        
  -        member this.Id: IRuntimeId = 
  -            failwith "Not implemented yet"
  -        
  -        member this.JobQueue: IJobQueue = 
               failwith "Not implemented yet"
           
           member this.ResetClusterState(): Async<unit> = 
  
positive.code: open MBrace.Runtime
  open MBrace.Azure
  open System
  
  type RuntimeId private (config : ConfigurationId) =
      
  
negative.code:         member this.ResultAggregatorFactory: ICloudResultAggregatorFactory = 
              failwith "Not implemented yet"
          
          
          