let x be object ; :: thesis: ( <*x*> is FinTree-yielding iff x is finite Tree )
A1: ( x is finite Tree iff {x} is constituted-FinTrees ) by Th13;
rng <*x*> = {x} by FINSEQ_1:39;
hence ( <*x*> is FinTree-yielding iff x is finite Tree ) by A1; :: thesis: verum