
theorem Th25:
  for n being Ordinal, L being right_zeroed add-associative
  right_complementable well-unital distributive non trivial doubleLoopStr, a
  being Element of L, x being Function of n,L holds eval(a |(n,L),x) = a
proof
  let n be Ordinal, L be right_zeroed add-associative right_complementable
  well-unital distributive non trivial doubleLoopStr, a be Element of L, x be
  Function of n,L;
  thus eval(a |(n,L),x) = coefficient(a |(n,L)) by Th24
    .= a by Th23;
end;
