Encoding version numbers (integers) as ETags using SHA-1

versionETags.fsx

open System
open System.Security.Cryptography

let hasher = SHA1.Create()

let intToSHA1 (n:int) = 
    let hexString bytes = 
        [for b:byte in bytes -> b.ToString("x2")] |> String.concat ""
    n |> (BitConverter.GetBytes >> hasher.ComputeHash >> hexString)


let versionETags =
    [1;2;3;21;33;1]
    |> List.map intToSHA1