%doctype;
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
  <!-- $Id: perso.txt, Template a v 6.03b 2011/12/01 12:00:00 ddr/dd Exp $ -->
  <!-- copyright (c) 1998-2011 INRIA -->
  <title>%nn;
    %if;has_public_name;
      %if;has_qualifiers;%public_name; %qualifier;
      %else;%public_name; %surname;%end;
    %else;
      %if;has_qualifiers;%first_name; %qualifier;
      %else;%first_name; %surname;%end;
    %end;
  </title>
  <meta http-equiv="Content-Style-Type" content="text/css"%/>
  <meta http-equiv="Content-Type" content="text/html; charset=%charset;"%/>
  <link rel="shortcut icon" href="%image_prefix;/favicon_gwd.png"%/>
%include.css;
  <meta name="robots" content="none"%/>
  <style type="text/css"><!--
  --></style>
%base_header;
</head>

%define;image_sosa(xxx,yyy)
  <img src="%image_prefix;/sosa.png" width="10" height="10"%sp;
    style="border: none" alt=""%sp;
	title="%if;(yyy>1)[direct ancestor of %s:::xxx] , %end;[*Sosa] yyy"%/>%nn;
%end;

%define;display_sosa(xx)
  %if;xx.has_sosa;
    %if;not cancel_links;<a href="%prefix;%xx.sosa_link;">%end;
    %apply;image_sosa%with;%sosa_ref.first_name_key_strip;%sp;
	                       %sosa_ref.surname_key_strip;
					  %and;%xx.sosa;%end;
    %if;not cancel_links;</a>%end;%sp;
  %end;
%end;

%define;image_MF(xx,wi_he)
  %if;(wizard and not cancel_links and not xx.is_restricted)
    <a href="%prefix;m=MOD_IND;i=%xx.index;">%end;
  %if;xx.is_male;
    <img width="wi_he" height="wi_he" src="%image_prefix;/male.png"%sp;
         style="border: none" alt="" title="[M/F]0"%/>%nn;
  %elseif;xx.is_female;
    <img width="wi_he" height="wi_he" src="%image_prefix;/female.png"%sp;
         style="border: none" alt="" title="[M/F]1"%/>%nn;
  %else;
    <span class="highlight">?</span>%nn;
  %end;
  %if;(wizard and not cancel_links and not xx.is_restricted)</a>%end;
  %sp;
%end;

%define;li_SD(xx)
  <li class="%if;xx.has_parents;goway%else;noway%end;">%nn;
%end;

%define;li_SDC(xx)
  %if;xx.has_families;
    %reset_count;
    %foreach;family;
      %if;(nb_children>0)%incr_count;%end;
    %end;
  %end;
  <li class="%if;xx.has_families;%if;(count!=0)desc%else;nodesc%end;%else;nospou%end;">%nn;
%end;

%define;display_arrows()
  %if;not cancel_links;
    <table style="float: %right;" border="%border;"><tr><td>
      %if;has_referer;
        <a href="%referer;"><img style="border-width: thin" alt="" title="&lt;&lt;"%sp;%nn;
          src="%image_prefix;/left.png"%wid_hei;left.png;%/></a>
      %end;
      <a href="%prefix;"><img style="border-width: thin" alt="" title="^^"%sp;
        src="%image_prefix;/up.png"%wid_hei;up.png;%/></a>
      <a href="%prefix;%self.access;;cgl=on"><img style="border-width: thin"%sp;
        src="%image_prefix;/right.png"%wid_hei;right.png; alt="" title="[cancel GeneWeb links]"%/></a>
    </td></tr></table>
  %end;
%end;

%define;tothegen(xx)
  [to the %s generation:::xx]%nn;
%end;

%define;togena(xx)
  %if;(xx = 1)[specify::generation/generations]0%nn;
  %elseif;(xx = 2)[to the parents]%nn;
  %elseif;(xx = 3)[to the grandparents]%nn;
  %elseif;(xx = 4)[to the great-grandparents]%nn;
  %else;
    %apply;tothegen%with;
      %apply;nth([nth (generation)], xx)
    %end;
  %end;
%end;

%define;togend(xx)
  %if;(xx = 0)[specify::generation/generations]0%nn;
  %elseif;(xx = 1)[to the children]%nn;
  %elseif;(xx = 2)[to the grandchildren]%nn;
  %elseif;(xx = 3)[to the great-grandchildren]%nn;
  %else;
    %apply;tothegen%with;
      %apply;nth([nth (generation)], xx)
    %end;
  %end;
%end;

%define;short_display_person(xx)
  %apply;display_sosa("xx")
  %if;(xx.index=central_index)<b>%xx;</b>%else;
    %if;(cancel_links or xx.is_restricted)%xx;
    %else;<a href="%prefix;%xx.access;">%xx;</a>%end;
  %end;%sp;
  %xx.title;%xx.dates;
%end;

%define;very_short_display_person(xx)
  %if;(xx.index=central_index)<b>%xx;</b>%else;
    %if;(cancel_links or xx.is_restricted)%xx;
    %else;<a href="%prefix;%xx.access;">%xx;</a>%end;
  %end;%sp;
  %xx.title;%xx.dates;%nn;
%end;

%define;display_vertical(xx)
  %if;(xx.has_birth_date or xx.has_birth_place or
       xx.has_baptism_date or xx.has_baptism_place or xx.is_dead or xx.is_buried or
       xx.is_cremated or (xx.has_consanguinity and bvar.show_consang!="no") or
       xx.has_occupation or xx.has_linked_page.OCCU !="")
    <ul>
      %if;xx.has_birth_date;
        <li>%apply;capitalize(nth([born],xx.sex)) %xx.on_birth_date;
        %if;xx.birthday; ([happy birthday to you!])%end;
        %if;xx.has_birth_place; - %xx.birth_place;%end;</li>%nl;
      %else;
        %if;xx.has_birth_place;
          <li>%apply;capitalize(nth([born],xx.sex)) - %xx.birth_place;</li>%nl;
        %end;
      %end;
      %if;xx.has_baptism_date;
        <li>%apply;capitalize(nth([baptized],xx.sex)) %xx.on_baptism_date;
        %if;xx.has_baptism_place; - %xx.baptism_place;%end;</li>%nl;
      %else;
        %if;xx.has_baptism_place;
          <li>%apply;capitalize(nth([baptized],xx.sex)) - %xx.baptism_place;</li>%nl;
        %end;
      %end;
      %if;xx.computable_age;
        <li>[*age] : %xx.age;</li>%nl;
      %end;
      %if;xx.is_dead;
        <li>%apply;capitalize(xx.died)
        %if;xx.has_death_date; %xx.on_death_date;%end;
        %if;xx.has_death_place; - %xx.death_place;%end;
        %if;(xx.has_linked_page.DEATH !="") %xx.linked_page.DEATH;%end;
        %if;xx.computable_death_age;, [age at death:] %xx.death_age;%end;</li>%nl;
        %if;xx.is_buried;
          <li>%apply;capitalize(nth([buried],xx.sex))
          %if;xx.has_burial_date; %xx.on_burial_date;%end;
          %if;xx.has_burial_place; - %xx.burial_place;%end;</li>%nl;
        %end;
        %if;xx.is_cremated;
          <li>%apply;capitalize(nth([cremated],xx.sex))
          %if;xx.has_cremation_date; %xx.on_cremation_date;%end;
          %if;xx.has_cremation_place; - %xx.cremation_place;%end;</li>%nl;
        %end;
      %end;
      %if;xx.has_occupation;
        <li>%apply;capitalize(xx.occupation)</li>%nl;
      %end;
      %if;(xx.has_linked_page.OCCU)
        <li>%apply;capitalize(xx.linked_page.OCCU)</li>%nl;
      %end;
      %if;(xx.has_consanguinity and bvar.show_consang!="no")
        <li>[*consanguinity] : %xx.consanguinity;</li>%nl;
      %end;
    </ul>
  %end;
%end;

%define;married_to(masc, date_place)
  %if;masc;
    %if;are_married;[*married%t to:::date_place]0%nn;
    %elseif;are_not_married;[*relationship%t to:::date_place]0%nn;
    %elseif;are_engaged;[*engaged%t to:::date_place]0%nn;
    %elseif;is_no_sexes_check;[*relationship%t to:::date_place]0%nn;
    %elseif;is_no_mention;date_place [*with]%nn;
    %end;
  %else;
    %if;are_married;[*married%t to:::date_place]1%nn;
    %elseif;are_not_married;[*relationship%t to:::date_place]1%nn;
    %elseif;are_engaged;[*engaged%t to:::date_place]1%nn;
    %elseif;is_no_sexes_check;[*relationship%t to:::date_place]1%nn;
    %elseif;is_no_mention;date_place [*with]%nn;
    %end;
  %end;
%end;

%define;long_married(xx)
  %apply;married_to%with;%xx.is_male%and;
    %if;(marriage_place="")
      %if;(on_marriage_date="")
      %else; <em>%on_marriage_date;</em>%end;
    %else;
      %if;(on_marriage_date="")<em>, %marriage_place;, </em>
      %else; <em>%on_marriage_date;, %marriage_place, </em>%end;
    %end;
  %end;
%end;

%define;witness_relation(xxx,yyy)
  [*witness at marriage of %s and %s:::xxx:yyy]
%end;

%define;nav_with_sosa_ref(xxx)
  [*navigation with %t as Sosa reference:::xxx]
%end;

<body%body_prop;>
%let;central_index;%index;%in;
%let;central_person;%first_name_key_strip;%sp;%surname_key_strip;%in;
%message_to_wizard;

<div style="float: %left;">
  %apply;image_MF("self","13")
</div>

%apply;display_arrows()

<h1 class="highlight" style="text-align: center">
  %if;has_public_name;
    %if;has_qualifiers;%public_name; <em>%qualifier;</em>
    %else;%public_name; %surname;%end;
  %else;
    %if;has_qualifiers;%first_name; <em>%qualifier;</em>
    %else;
      %if;cancel_links;%first_name; %surname;
      %else;
        <a href="%prefix;m=P;v=%first_name_key;">%first_name;</a>
        <a href="%prefix;m=N;v=%surname_key;">%surname;</a>
      %end;
    %end;
  %end;
</h1>

%if;(has_sosa or 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)
  <table style="width:100%%" border="%border;">
    <tr>
      <td align="center">
        <table border="%border;" cellspacing="0" cellpadding="0">
          <tr>
            <td>
              %if;has_sosa;
                %apply;display_sosa("self")
                <em>[*Sosa]:
                  %if;cancel_links;%sosa;
                  %else;<a href="%prefix;%sosa_link;">%sosa;</a>%end;
                </em><br%/>
              %end;
              %foreach;qualifier;
                %if;not is_first;
                  %if;has_public_name;%public_name; %qualifier;
                  %else;%first_name; %qualifier;%end;<br%/>
                %end;
              %end;
              %foreach;alias;
                <em><strong>%alias;</strong></em><br%/>
              %end;
              %if;has_nobility_titles;
                <em>
                  %foreach;nobility_title;
                    %if;not is_first;,
                  %end;
                  %nobility_title;
                %end;
                </em><br%/>
              %end;
              %if;has_linked_page.HEAD;%linked_page.HEAD;<br%/>%end;
              %if;(has_public_name or has_qualifiers)
                <em>(%if;cancel_links;%first_name; %surname;
                     %else;
                       <a href="%prefix;m=P;v=%first_name_key;">%first_name;</a>
                       <a href="%prefix;m=N;v=%surname_key;">%surname;</a>%nn;
                     %end;)</em><br%/>
              %end;
              %foreach;surname_alias;
                <em>(%first_name; %surname_alias;)</em><br%/>
              %end;
              %foreach;first_name_alias;
                <em>(%first_name_alias; %surname;)</em><br%/>
              %end;
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
  <p></p>
%end;

%if;has_image;
  <table border="%border;"><tr><td><a
    href="%image_html_url;"><img src="%image_url;"
          %image_size; style="border: none"
          alt="" title="[image/images]0"%/></a></td><td>
%end;

%apply;display_vertical("self")

%if;has_image;</td></tr></table>%end;

%if;has_parents;
  <h3 class="highlight">[*parents]</h3>
  <ul>
    %foreach;parent;
      %apply;li_SD("parent")
      %apply;image_MF("parent","13")
      %apply;short_display_person("parent")</li>
    %end;
  </ul>
%end;

%if;has_families;
  <h3 class="highlight">[*marriage/marriages]1%sp;
   %if;(max_desc_level>0)
     [and::child/children]1%end;
  </h3>
  <ul>
    %foreach;family;
      %apply;li_SD("spouse")
        %apply;long_married("self")%sp;
        %apply;image_MF("spouse","13")
        %apply;short_display_person("spouse")
        %if;has_witnesses;
          ([witness/witnesses]w :
          %foreach;witness;
            %if;not is_first;, %end;
            %apply;image_MF("witness","13")
            %apply;short_display_person("witness")%nl;
          %end;
        )%end;
        %if;((wizard or friend or 
              bvar.no_note_for_visitor="" or bvar.no_note_for_visitor="no") and
              has_comment) (%comment;)%end;
        %if;are_divorced;, [divorced]0%divorce_date;%end;
        %if;are_separated;, [separated]0%end;
        %if;has_children;
          , [having as children]0
          <ul>
            %foreach;child;
              %apply;li_SDC("child")
                %apply;image_MF("child","13")
                %apply;short_display_person("child")
              </li>
            %end;
          </ul>
        %end;
        %if;(evar.opt = "from" and wizard)<em>(%origin_file;)</em><br%/>%nl;%end;
      </li>
    %end;
  </ul>
%end;

%if;has_siblings;
  <h3 class="highlight" id="siblings">[*siblings]</h3>
  <ul>
    %foreach;father.child;
      %apply;li_SDC("child")
        %apply;image_MF("child","13")
        %apply;short_display_person("child")
      </li>
    %end;
  </ul>
%end;

%if;has_relations;
  <h3 id="relations" class="highlight">[*relation/relations]1</h3>
  <ul>
    %foreach;relation;
      %if;(has_relation_him and has_relation_her)
        <li>%apply;capitalize(relation_type) :%nl;
          <ul>
            %apply;li_SDC("relation_him")
              %apply;image_MF("relation_him","13")
              %apply;short_display_person("relation_him")
            </li>
            %apply;li_SDC("relation_her")
              %apply;image_MF("relation_her","13")
              %apply;short_display_person("relation_her")
            </li>
          </ul>
        </li>
      %elseif;has_relation_him;
        %apply;li_SDC("relation_him")%apply;capitalize(relation_type) :%sp;
          %apply;image_MF("relation_him","13")
          %apply;short_display_person("relation_him")
        </li>
      %elseif;has_relation_her;
        %apply;li_SDC("relation_her")%apply;capitalize(relation_type) :%sp;
          %apply;image_MF("relation_her","13")
          %apply;short_display_person("relation_her")
        </li>
      %end;
    %end;
    %foreach;related;
      %apply;li_SDC("related")%apply;capitalize(related_type) :%sp;
        %apply;image_MF("related","13")
        %apply;short_display_person("related")
      </li>
    %end;
    %foreach;witness_relation;
      <li style="list-style-type:disc">%nn;
        %if;(witness_relation.marriage_date.year>0)
          <em> %witness_relation.marriage_date.year;</em> :
        %end;
        %apply;witness_relation%with;
          %apply;very_short_display_person("witness_relation.father")%and;
          %apply;very_short_display_person("witness_relation.mother")
        %end;
      </li>%nl;
    %end;
  </ul>
%end;

%if;(not cancel_links and has_linked_pages)
  <table style="float:%right;"><tr><td style="font-size:80%%">
    (<a href="%prefix;m=LINKED;%access;">[linked pages]</a>)
  </td></tr></table>
%end;

%if;((wizard or friend or 
      bvar.no_note_for_visitor="" or bvar.no_note_for_visitor="no") and
     (has_notes or has_linked_page.BNOTE or has_linked_page.NOTE))
  <h3 id="notes" class="highlight">[*note/notes]1</h3>
  <dl><dd>
    %if;(has_linked_page.BNOTE)<p>%apply;capitalize(linked_page.BNOTE).</p>%end;
    %if;(has_notes)%notes;%end;
    %if;(has_linked_page.NOTE)<p>%apply;capitalize(linked_page.NOTE).</p>%end;
  </dd></dl>
%end;

%if;(has_sources or has_linked_page.BIBLIO)
  %if;has_sources;
    <p>
    <em style="font-size:80%%">[*source/sources]1:<br%/>
    %foreach;source;
      - %source_type;: %source;<br%/>
    %end;
    </em>
    </p>
  %end;
  %if;has_linked_page.BIBLIO;<p>%apply;capitalize(linked_page.BIBLIO).</p>%end;
%end;

%if;not cancel_links;
  <table id="links" border="%border;" style="width: 100%%">
    <tr>
      <td style="text-align: %left;">
        <ul>
          <li><a href="%prefix;m=R;%access;"
                 class="highlight">[*relationship computing]</a></li>
          %if;(browsing_with_sosa_ref and sosa_ref.index!=central_index)
            <li><a href="%prefix;em=R;ei=%index;;m=NG;select=input;n=1;%nn;
                   long=on;image=on;spouse=on;et=M" class="highlight">%nn;
                   [*relationship computing::with]</a> %sosa_ref;</li>
            <li><a href="%prefix;em=R;ei=%index;;m=NG;select=input;n=1;%nn;
                   long=on;image=on;spouse=on;et=S" class="highlight">%nn;
                   [*shortest path::with]</a> %sosa_ref;</li>
          %end;
          %if;(not browsing_with_sosa_ref or sosa_ref.index!=central_index)
            <li>%apply;nav_with_sosa_ref%with;<a class="highlight"%sp;
              href="%prefix_no_iz;iz=%self.index;;%self.access;">%self;</a>%end;
            </li>
          %end;
        </ul>
      </td>
      <td style="text-align: %left;">
        <ul>
          %if;has_parents;
            %let;nba;%apply;min(max_anc_level, 5)%in;
            <li><a href="%prefix;m=A;%access;" %nn;
                   class="highlight">[*ancestors]</a>&nbsp;
                <a href="%prefix;m=A;%access;;siblings=on;notes=on;t=T;image=on;%nn;
                   marriage=on;v=%nba;" class="highlight">[*tree] [ancestors]%sp;
                   %apply;togena%with;%nba%end;</a></li>
          %end;
          %if;has_children;
            %let;nbd;%apply;min(max_desc_level, 4)%in;
            <li><a href="%prefix;m=D;%access;" %nn;
                   class="highlight">[*descendants]</a>&nbsp;
                <a href="%prefix;m=D;%access;;siblings=on;notes=on;t=T;image=on;%nn;
                   v=%nbd;" class="highlight">[*tree] [descendants]%sp;
                   %apply;togend%with;%nbd%end;</a></li>
          %end;
          %if;((has_parents and (father.has_parents or mother.has_parents))
            or has_nephews_or_nieces)
            <li>%nn;
              %if;(has_parents and (father.has_parents or mother.has_parents))
                <a href="%prefix;m=C;%access;" %nn;
                   class="highlight">[*cousins (general term)]</a>&nbsp;
              %end;
              %if;has_nephews_or_nieces;
                <a href="%prefix;m=C;v1=1;v2=2;%access;" %nn;
                   class="highlight">[*nephews and nieces]</a>
              %end;
            </li>
          %end;
          %if;has_siblings;
            <li>%nn;
              %foreach;father.child;
                %if;is_sibling_before;
                  <a href="%prefix;%child.access;" class="highlight">%nn;
                    %apply;capitalize(nth([previous sibling],sex))</a>&nbsp;
                %end;
                %if;is_sibling_after;
                  <a href="%prefix;%child.access;" class="highlight">%nn;
                    %apply;capitalize(nth([next sibling],sex))</a>
                %end;
              %end;
            </li>
          %end;
        </ul>
      </td>
      %if;wizard;
        <td style="text-align: %left;">
          <ul>
            <li><a href="%prefix;m=U;%access;"
                   class="highlight" accesskey="U">[*update]</a><br%/>&nbsp;</li>
            <li><a href="%prefix;m=MOD_IND;i=%index;"
                   class="highlight" accesskey="M">[*modify]</a></li>
            %if;has_families;
              %foreach;family;
                <li><a href="%prefix;m=MOD_FAM;i=%family.index;
                    ;ip=%index" class="highlight">
                    [*modify::family/families]0</a>%sp;
                    [with] %spouse.first_name;.%spouse.occ; %spouse.surname;</li>
              %end;
            %end;
          </ul>
        </td>
      %end;
    </tr>
  </table>
%end;

%if;(evar_opt="misc")%misc_names;%end;

%base_trailer;
%copyright;
</body>
</html>