The Utility Belt

A few helpers that round out the library.

Complex number extensions

FockMap extends System.Numerics.Complex with properties you’ll use constantly:

let c = Complex(1.0, 2.0)

c.IsFinite        // true
c.IsNonZero       // true
c.TimesI          // Complex(-2.0, 1.0) — multiplied by i
c.Reduce          // returns self if finite, zero if NaN/Inf

// Fermionic sign factor: (−1)ⁿ
Complex.SwapSignMultiple 3 Complex.One    // −1 (odd swaps)
Complex.SwapSignMultiple 4 Complex.One    // +1 (even swaps)

Map extensions

let m = Map [ ("a", 1); ("b", 2) ]
m.Keys       // [| "a"; "b" |]
m.Values     // [| 1; 2 |]

Currying utilities

let add = fun x y -> x + y
let addTupled = uncurry add      // (int * int) -> int
let addCurried = curry addTupled // int -> int -> int

Next: Grand Finale — three encodings, one molecule