anchor.diff:            History : Slice list
             ProgressOffset : single
             Time : int64
  -          Random : System.Random }
  +          Chaos : System.Random }
   
   [<RequireQualifiedAccess; CompilationRepresentation (CompilationRepresentationFlags.ModuleSuffix)>]
   module Effector =
  
positive.code:           History = history
            ProgressOffset = 0.0f
            Time = time
            Random = System.Random () }
negative.code:             scale (value2 - value, randValue)
          | Chaos ->
              // NOTE: chaos in non-deterministically based on progress
              let chaosValue = single ^ effector.Chaos.NextDouble ()
              scale (value2 - value, chaosValue)
          | Ease ->
              let progressEaseIn = single ^ Math.Pow (Math.Sin (Math.PI * double progress * 0.5), 2.0)
              scale (value2 - value, progressEaseIn)
  