set T = elementary_tree 0 ;
A1: now end;
thus width (elementary_tree 0 ) = 1 by A1, Def16; :: thesis: verum