anchor.diff:              if not (isNull time) then
                   Monitor.Enter time
                   if not time.Outputs.IsEmpty then
  -                    let mutable outputs = Array.zeroCreate 8
  +                    let mutable outputs = Array.zeroCreate (VolatileCollection.SetThreshold)
                       let outputCount = time.Outputs.Consume(&outputs)
                       Monitor.Exit time
   
  
positive.code:                 // pull at least one value on every path.
                  // This property must therefore be maintained for every
                  // path in the entire system.
                  let r = f(token.WithCaller this)
                  this.OutOfDate <- false
  
                  // if the object's level just got greater than or equal to
  
negative.code: open System.Threading
  open System.Linq
  open System.Runtime.InteropServices
  
  [<AutoOpen>]
  module VolatileCollection = 
      [<Literal>]
      let SetThreshold = 8
  
  [<AllowNullLiteral>]
  type IWeakable<'a when 'a : not struct> =
  