Как вы выравниваете набор при сохранении родительского объекта?

Question

В C# вы просто используете SelectMany, у которого есть перегрузка для удержания родительского объекта. Как вы делаете то же самое в F #? То есть, я хочу перебирать набор сборок и возвращать все те сборки, у которых есть классы, реализующие определенный атрибут.

Я знаю, что я collect похож на выбор многих, но я не уверен, как его использовать, сохраняя при этом родительскую (сборку) информацию.

Answer 1

Вы можете реализовать SelectMany с помощью collect путем применения map к сборнику «детей», которые вы хотите, чтобы вернуться к каждому элементу " родитель»коллекция:

Если у вас есть некоторые source и хотят, чтобы дети с помощью getChildren (для каждого элемента в source), а затем вы хотите, чтобы вычислить результат, используя selectResult, который принимает как ребенок и родитель, вы можете написать следующее с помощью SelectMany:

source.SelectMany 
    ((fun parent -> getChildren parent), 
    (fun parent child -> selectResult parent child)) 

Использования collect тот же код выглядит следующим образом (обратите внимание, что map операции применяется внутри лямбда-функции, которые мы передаем в collect - где parent все еще находится в области видимости):

source |> Seq.collect (fun parent -> 
    getChildren parent 
    |> Seq.map (fun child -> 
     selectResult parent child)) 

стоит также отметить, что поведение захвачена SelectMany может быть реализован - возможно, в более удобном для восприятия способом - с помощью F выражений # последовательности, как это:

seq { for parent in source do 
     for child in getChildren parent do 
      yield selectResult parent child } 

Answer 2

Похоже, вам просто нужно filter вместо collect:

let hasTypeWithAttribute<'t when 't :> Attribute> (a: Assembly) = a.GetTypes() |> Array.exists (fun t -> t.GetCustomAttributes(typeof<'t>, true).Length > 0) 

let assemblies = inputSet |> Set.filter hasTypeWithAttribute<AttributeName>