theorem Th13: U-deltaInterpreter"{1} =
the set of all <*u,u*> where u is Element of U
proof
set RH=the set of all <*u,u*> where u is Element of U;
set LH=U-deltaInterpreter"{1}, X=(U-concatenation).:(id (1-tuples_on U));
LH=X & X=RH by Lm26, FOMODEL0:38; hence thesis;
end;
