anchor.diff:              logical :: comp_result
   
               if (reverse) then
  -                comp_result = not(elem1(:) .bitstrgt. elem2(:))
  +                comp_result = .not. (elem1(:) .bitstrgt. elem2(:))
               else
                   comp_result = elem1(:) .bitstrge. elem2(:)
               end if
  
positive.code:             logical :: comp_result
  
              if (reverse) then
                  comp_result = not(elem1(:) .bitstrgt. elem2(:))
              else
                  comp_result = elem1(:) .bitstrge. elem2(:)
              end if
  
negative.code:             logical :: comp_result
  
              if (reverse) then
                  comp_result = .not. (elem1(:) .bitstrge. elem2(:))
              else
                  comp_result = elem1(:) .bitstrgt. elem2(:)
              end if
  