let separateByThousands (input: string) =
    let regex = System.Text.RegularExpressions.Regex (@"(\d)(?=(\d{3})+(?!\d))")
    regex.Replace (input, "$1 ")