anchor.diff:    CompareDynamicArrays(Expected, Anagram.findAnagram(candidates));
   end;
   
  -procedure AnagramTests.capital_word_is_not_own_anagram;
  -var
  -  Anagram: TAnagram;
  -  Expected: TArray<string>;
  -  candidates: TArray<string>;
  -begin
  -  SetLength(Expected, 0);
  -  SetLength(candidates, 1);
  -  candidates[0] := 'Banana';
  +procedure AnagramTests.words_are_not_anagrams_of_themselves_case_insensitive;
  +var
  +  Anagram: TAnagram;
  +  Expected: TArray<string>;
  +  candidates: TArray<string>;
  +begin
  +  SetLength(Expected, 0);
  +  SetLength(candidates, 3);
  +  candidates[0] := 'BANANA';
  +  candidates[1] := 'Banana';
  +  candidates[2] := 'banana';
     Anagram := TAnagram.Create('BANANA');
     CompareDynamicArrays(Expected, Anagram.findAnagram(candidates));
   end;
  
positive.code: 
      [Test]
      [Ignore]
      procedure capital_word_is_not_own_anagram;
    end;
  
  implementation
  
negative.code:   DUnitX.TestFramework;
  
  const
    CanonicalVersion = '1.4.0';
  
  type
  
  