let possibleNow = people |> List.distinctBy _.Name |> List.groupBy _.Age |> List.map snd |> List.map _.Head.Name |> List.sortBy _.ToString()