%( options 0: skip 1: standard 2: centered 3: two columns %) %let;op_m;%if;(op_m!="")%op_m;%else;1%end;%in; %define;link(xxx,zzz) %if;(not cancel_links)%sq; %end;xxx%if;(not cancel_links)%end; %end; %define;detailed_names() %if;(has_qualifiers or has_aliases or has_nobility_titles or has_public_name or has_surnames_aliases or has_first_names_aliases or has_linked_page.HEAD or computable_death_age or computable_age) %foreach;qualifier; %if;not is_first; %if;has_public_name;%public_name; %qualifier; %else;%first_name; %qualifier;%end;
%end; %end; %if;(has_public_name or has_qualifiers) %apply;link(first_name,"P") %apply;link(surname,"N")
%end; %if;has_aliases; Alias%sp; %apply;lazy_print("") %foreach;alias; %if;(lazy_printed)/%end; %lazy_force; %alias;%nn; %end;
%end; %if;has_nobility_titles; %nn; %foreach;nobility_title;%nn; %if;not is_first;,%sp;%end; %nobility_title;%nn; %end;
%end; %if;(has_linked_page.HEAD and linked_page.HEAD!="")%linked_page.HEAD;
%end; %if;has_first_names_aliases; %apply;lazy_print("") %apply;link(first_name,"P")/%sq; %foreach;first_name_alias; %if;(lazy_printed)/%end; %lazy_force; %apply;link(first_name_alias,"P") %end;
%end; %if;has_surnames_aliases; %apply;lazy_print("") %apply;link(surname,"N")/%sq; %foreach;surname_alias; %if;(lazy_printed)/%end; %lazy_force; %apply;link(surname_alias,"N") %end;
%end; %if;(is_dead and computable_death_age)%death_age%end; %if;(not is_dead and computable_age)%age;%end; %end; %end; %define;etat_civil()

%apply;capitalize(nth([born],sex)) %on_birth_date; %if;birthday; ([happy birthday to you!])%end; %if;has_birth_place; - %birth_place;%end;
%apply;capitalize(nth([born],sex)) - %birth_place;
%apply;capitalize(nth([baptized],sex)) %on_baptism_date; %if;has_baptism_place; - %baptism_place;%end;
%apply;capitalize(nth([baptized],sex)) - %baptism_place;
%apply;capitalize(died) %if;has_death_date; %on_death_date;%end; %if;has_death_place; - %death_place;%end; %if;(has_linked_page.DEATH and linked_page.DEATH!="") (%linked_page.DEATH;)%end;
%apply;capitalize(nth([buried],sex)) %if;has_burial_date; %on_burial_date;%end; %if;has_burial_place; - %burial_place;%end;
%apply;capitalize(nth([cremated],sex)) %if;has_cremation_date; %on_cremation_date;%end; %if;has_cremation_place; - %cremation_place;%end;
%apply;capitalize(occupation)
%apply;capitalize(linked_page.OCCU)
[*consanguinity][:] %consanguinity;
[*consanguinity][:] %consanguinity;

%end; %define;portrait() %if;(has_image or bvar.default_image="yes") %if;has_image; %if;(evar.cgl!="on") [image/images]0

%nn; %nn; %else; [image/images]0

%nn; %end; %elseif;(bvar.default_image="yes") [missing image]

%end; %end; %end; %define;sosa() %reset_count; %if;(has_sosa and not cancel_links)

%nn; [*Sosa] %if;(sosa=1)%sosa; %else;%sosa; %apply;a_of_b%with;%and; %if;(sosa_ref.is_restricted)%sosa_ref;%else;%sosa_ref;%end;%end; %end;

%end; %end; %define;border()

%end; %let;evm;%if;(evar.m="F")m=F;%end;%in; %let;prefx;%if;(evar.m="F")%prefix_no_pmod;%else;%prefix;%end;%in; %if;(evar.m!="MOD_IND")

%if;has_public_name; %if;has_qualifiers;%public_name; %qualifier; %else;%public_name; %surname;%end; %else; %if;has_qualifiers;%first_name; %qualifier; %else; %if;cancel_links;%first_name; %surname; %else; %first_name; %surname; %end; %end; %end; %dates;

%( closing div just before h1 %) %if;((p_mod="zz" or p_mod="") and evar.m!="F")

%end; %if;(op_m=1) %apply;portrait() %apply;etat_civil()

%apply;sosa()

%apply;detailed_names()

%elseif;(op_m=2)

%apply;portrait() %apply;sosa()

%apply;detailed_names()

%apply;etat_civil() %elseif;(op_m=3)

%apply;portrait()

%apply;detailed_names() %apply;sosa()

%apply;etat_civil()

%else; Unavailambe option value! %end; %end;