anchor.diff:  
     ///////////////////////////////////////////////////////////////////////
   
  -  let inline scheduler () = StaticData.scheduler
  +  let inline scheduler () =
  +    match StaticData.scheduler with
  +     | null -> StaticData.Init () ; StaticData.scheduler
  +     | scheduler -> scheduler
   
     ///////////////////////////////////////////////////////////////////////
   
  -  let inline switchToWorker () = StaticData.switchToWorker
  +  let inline switchToWorker () =
  +    match StaticData.switchToWorker with
  +     | null -> StaticData.Init () ; StaticData.switchToWorker
  +     | switch -> switch
   
     ///////////////////////////////////////////////////////////////////////
   
  
positive.code:   module Global =
      [<MethodImpl(MethodImplOptions.NoInlining)>]
      let send (xCh: Ch<'x>) (x: 'x) =
        Ch<'x>.Send (StaticData.globalScheduler, xCh, x)
    let create () = ctor Now.create ()
    let inline send (xCh: Ch<'x>) (x: 'x) = ChSend<'x> (xCh, x) :> Job<unit>
    module Try =
  
negative.code: module Alt =
    let inline always (x: 'x) = Always<'x> (x) :> Alt<'x>
  
    let inline unit () =
      match StaticData.unit with
       | null -> StaticData.Init () ; StaticData.unit
       | unit -> unit
  
    let inline never () = Never<_>() :> Alt<_>
  
    let inline zero () =
      match StaticData.zero with
       | null -> StaticData.Init () ; StaticData.zero :> Alt<_>
       | zero -> zero :> Alt<_>
  
    let inline once x = Once<'x> (x) :> Alt<'x>
  
  