anchor.diff:              actualType.GenericArguments
               |> Seq.iter recurisivelyAdd
   
  +    //Seed value for work
       add startEntity
   
       while toExplore.Count > 0 do
  
positive.code:         head.NestedEntities |> Seq.iter add
  
          if head.IsFSharpAbbreviation then
  
              if head.AbbreviatedType.IsFunctionType then
                  head.AbbreviatedType.GenericArguments |> Seq.iter recurisivelyAdd
  
  
negative.code: 
  open Microsoft.FSharp.Compiler.SourceCodeServices
  
  
  let rec unabbreviateType (possiblyAbbreviated:FSharpType) =
      if possiblyAbbreviated.IsAbbreviation then
          unabbreviateType possiblyAbbreviated.AbbreviatedType
      else
          possiblyAbbreviated
  
  let rec unabbreviateEntity (possiblyAbbreviated:FSharpEntity) =
      if possiblyAbbreviated.IsFSharpAbbreviation then
          if possiblyAbbreviated.AbbreviatedType.HasTypeDefinition then
              unabbreviateEntity possiblyAbbreviated.AbbreviatedType.TypeDefinition
          else
              None
      else
          Some possiblyAbbreviated
  
  let findEntitiesIterative (startEntity:FSharpEntity) : seq<FSharpEntity> =
      let entitiesSeen = System.Collections.Generic.HashSet<FSharpEntity>() //prevents rework and is the returned value
  
      let toExplore = System.Collections.Generic.Queue<FSharpEntity>() //work list
  
      let add possibleEntity =
          match unabbreviateEntity possibleEntity with
  