
theorem
  for T being non empty non void reflexive transitive TA-structure for t
  being type of T holds apply(<*> the adjectives of T, t) = <*t*>
proof
  let T be non empty non void reflexive transitive TA-structure;
  let t be type of T;
A1: apply(<*> the adjectives of T, t).1 = t by Def19;
  len apply(<*> the adjectives of T, t) = 0+1 by Def19,CARD_1:27;
  hence thesis by A1,FINSEQ_1:40;
end;
