Skip to content

Instantly share code, notes, and snippets.

View dandrewbarlow's full-sized avatar

Andrew Barlow dandrewbarlow

View GitHub Profile
List.init 10 (fun i -> char (i + 97))
Seq.initInfinite (fun i -> char (i + 97)) |> Seq.take 10 |> Seq.toList
let xorshift n =
let n = n ^^^ (n >>> 12)
let n = n ^^^ (n <<< 25)
let n = n ^^^ (n >>> 27)
n * 2685821657736338717L