Compact tree of Ada _____