anchor.diff:              (otherGroups |> List.map (fun pair -> pair.ToString()))
   
           usage |> traceWarn
  -    | Result.Ok ((reason, version), []) ->
  +    | Result.Ok ((reason, resolution), []) ->
           reason
           |> Reason.format
  -        |> sprintf "NuGet %O%s is a %s" packageName (if options.Details then " " + version.ToString() else "")
  +        |> sprintf "NuGet %O - %s is a %s" packageName ((resolution.Item packageName).Version.ToString())
           |> tracen
  -
           match reason with
           | TopLevel -> ()
           | Direct chains
  
positive.code:             for (top, chains) in chains |> List.groupBy (DependencyChain.first) do
                  match chains |> List.sortBy DependencyChain.length, options.Details with
                  | shortest :: [], false ->
                      DependencyChain.format options.Details shortest |> tracen
                  | shortest :: rest, false ->
                      DependencyChain.format options.Details shortest |> tracen
                      tracen ""
                      tracefn 
                          "... and %d chain%s more starting at %O ..." 
  
negative.code:                         top
                      tracen "To display all chains use --details flag."
                  | all, true ->
                      DependencyChain.formatMany resolution options.Details all |> tracen
                  | _ ->
                      failwith "impossible"
                  tracen ""
  