[*statistics]

%if;not cancel_links; %end; %define;births(nnn)[the latest %d births:::nnn]%end; %define;deaths(nnn)[the latest %t deaths:::nnn]%end; %define;marriages(nnn)[the latest %d marriages:::nnn]%end; %define;engaged(nnn) [the %d oldest couples perhaps still alive and engaged:::nnn]%nn; %end; %define;alive(nnn)[the %d oldest perhaps still alive:::nnn]%end; %define;lived(nnn)[the %d who lived the longest:::nnn]%end; %let;n;%if;(bvar.latest_event != "")%bvar.latest_event;%else;20%end;%in;

%if;(wizard or friend)
• %apply;births(n)
• %apply;deaths(n)
• %apply;marriages(n)
• %apply;engaged(n)
• %apply;alive(n)
%end;
• %apply;lived(n)

%if;(wizard or friend)

• [population pyramid]

%end; %include;trl %include;copyr