%doctype;
<html>
<head>
<!-- $Id: perso.txt,v 5.10 2007/02/12 11:48:24 ddr Exp $ -->
<!-- Copyright (c) 1998-2007 INRIA -->
<!-- Updates v 1.0 by O. Auffray March 2007-->
<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;"%/>
<meta name="robots" content="none"%/>
<style type="text/css"><!--
.highlight { color: %highlight;; font-weight: bold }
a:link.highlight {color: %highlight}
a:visited.highlight {color: %highlight}
a:link.date { text-decoration: none; color: black }
a:visited.date { text-decoration: none; color: black }
--></style>
%base_header;
<script language="JavaScript"><!--
function printWindow(){
bV = parseInt(navigator.appVersion)
if (bV >= 4) window.print()
}
//--></script>
<style type="text/css">
@page { size:landscape; }
.saut_apres
{
/* saut de ligne apres le bloc*/
page-break-after : always;
}
.saut_avant
{
/* saut de ligne avant le bloc*/
page-break-before : always;
}
</style>
</head>
<body%body_prop;>
%message_to_wizard;
<!-- définitions utiles dans les boucles -->
%let;self_access;%self.access;%in;
%let;father_access;%father.access;%in;
%let;mother_access;%mother.access;%in;
<!-- fin définitions utiles dans les boucles -->
<!-- retour en haut de page -->
<a name="top"></a>
%define;top()
%if;not cancel_links;
<table border="%border;" align="right"><tr><td>
<a href="#top"><img src="%image_prefix;/up.jpg"%wid_hei;up.jpg; border="1" alt="top"%/></a>
</td></tr></table>
%end;
%end;
<!-- fin retour en haut de page -->
<!-- affichage ligne bleue -->
%define;tr_color()
<tr onmouseover="javascript:style.backgroundColor='#AEF1FF'" onmouseout=" javascript:style.backgroundColor=''">
%end;
<!-- fin affichage ligne bleue -->
<!-- définition de la relation sosa -->
%define;image_blood(xxx,yyy,size)
%let;msg;
%if;("yyy" = "1")de Cujus%else;[direct ancestor of %s:::xxx] , [*Sosa] yyy%end;
%in;
%if;("size" != "")
<img src="%image_prefix;/blood.png" height="size"%sp; style="border: none" alt="%msg;"%/>%nn;
%else;
<img src="%image_prefix;/blood.png" style="border: none" alt="%msg;"%/>%nn;
%end;
%end;
%define;display_sosa_link(xx,size)
%if;xx.has_sosa;
%if;not cancel_links;
<a href="%prefix;%xx.sosa_link;;image=on">
%end;
%apply;image_blood%with;%sosa_ref;%and;%xx.sosa;%and;size%end;
%if;not cancel_links;
</a>
%end;%sp;
%end;
%end;
<!-- fin définition de la relation sosa -->
<!-- définition du controle du sexe avec gestion de la taille d'affichage de l'icone -->
%define;image_sex(nnn,size)
%if;("size" != "")
%if;nnn.is_male;
<img src="%image_prefix;/male.png" width="size" height="size"%sp; alt="[M/F]0"%/>%nn;
%elseif;nnn.is_female;
<img src="%image_prefix;/female.png" width="size" height="size"%sp; alt="[M/F]1"%/>%nn;
%else;
<img src="%image_prefix;/sexunknown.png" width="size" height="size"%sp; alt="[M/F]"%/>%nn;
%end;
%else;
%if;nnn.is_male;
<img src="%image_prefix;/male.png"%wid_hei;male.png; alt="[M/F]0"%/>%nn;
%elseif;nnn.is_female;
<img src="%image_prefix;/female.png"%wid_hei;female.png; alt="[M/F]1"%/>%nn;
%else;
<img src="%image_prefix;/sexunknown.png"%wid_hei;sexunknown.png; alt="[M/F]"%/>%nn;
%end;
%end;
%end;
<!-- fin définition du controle du sexe avec gestion de la taille d'affichage de l'icone -->
<!-- définition affichage de l'âge des parents à la naissance -->
%define;image_tilde()
<img src="%image_prefix;/tilde.png" alt="[age at the birth of] %first_name;"%/>
%end;
%define;parent_age_at_birth()
%if;parent.is_male;
%if;(father_age_at_birth != "")
%apply;image_tilde()
%father_age_at_birth
%end;
%else;
%if;(mother_age_at_birth != "")
%apply;image_tilde()
%mother_age_at_birth
%end;
%end;
%end;
<!-- fin définition affichage des parents à la naissance -->
<!-- définition affichage de la puce d'un individu en compte tenu de ses éventuels enfants
aucune union, donc aucun enfant => cercle
au moins une union avec en tout aucun enfant => disque
au moins une union avec au moins un enfant => carré -->
%define;type_puce_desc(nnn)
<li style="list-style-type:%if;nnn.has_families;
%if;nnn.has_children;square%else;disc%end;
%else;circle%end;">
%end;
<!-- fin définition affichage de la puce d'un individu -->
<!-- définition affichage de la puce d'un individu en compte tenu de ses éventuels parents
aucun parent connu => cercle
au moins un parent connu => disque
les deux parents connus => carré -->
%define;type_puce_asc(nnn)
%if;nnn.has_parents;
%if;(nnn.father != "? ?" and nnn.mother != "? ?" and nnn.mother != "de l'une de ses épouses")
<li style="list-style-type:square">
%else;
<li style="list-style-type:disc">
%end;
%else;
<li style="list-style-type:circle">
%end;
%end;
<!-- fin définition affichage de la puce d'un individu -->
<!-- définition affichage du type de mariage -->
%define;type_wedding()
%if;are_married;
%if;(nb_children != 0)
<img src="%image_prefix;/married.png" alt="[married]"%/>
%else;
<img src="%image_prefix;/married_no_descendants.png" alt="[married]"%/>
%end;
%elseif;are_not_married;
<img src="%image_prefix;/not_married.png" alt="[not married]"%/>
%elseif;are_engaged;
<img src="%image_prefix;/engaged.png" alt="[engaged]"%/>
%elseif;is_no_sexes_check;
<img src="%image_prefix;/not_married.png" alt="[relationship]"%/>
%elseif;is_no_mention;
<img src="%image_prefix;/not_married.png" alt="[with]"%/>
%end;
%end;
<!-- fin définition affichage du type de mariage -->
<!-- définition affichage des caractéristiques de mariage -->
<!-- ATTENTION nb_families ne marche que pour la personne et les boucles sur enfants. Pour les relations (him, her et related) cela donne le nb_families de la
personne d'où l'affichage sans nb d'enfants si la personne n'a qu'un mariage-->
%define;detail_wedding()
%apply;type_wedding()
%if;(nb_families != 1)<font size="-1">%family_cnt;</font>%end;
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
%if;(nb_children != 0)
-<font size="+0">%nb_children;</font>
<a href="%prefix;%child.access;;opt=%evar.opt;#[dtree]">
<img src="%image_prefix;/child.png" border="0" alt="%if;(nb_children=1)[child/children]0%else;[child/children]1%end;"%/>
</a>
%end;
%end;
<!-- fin définition affichage des caractéristiques de mariage -->
<!-- définition de l'icone indiquant une absence de mariage et de descendance -->
%define;not_married_no_descendants()
<img src="%image_prefix;/not_married_no_descendants.png" alt="[not married], [no descendants]"%/>
%end;
<!-- fin définition de l'icone indiquant une absence de mariage et de descendance -->
<!-- définition de la photo d'une personne -->
%define;image_picture(size)
%if;("size" != "")
<img src="%image_prefix;/picture.png" width="size" height="size"%sp; style="border:0" alt="[image/images]0"%/>
%else;
<img src="%image_prefix;/picture.png"%wid_hei;picture.png; style="border:0" alt="[image/images]0"%/>
%end;
%end;
%define;picture_ind(nnn,size)
%if;nnn.has_image;
%if;not cancel_links;
<a href="%nnn.image_html_url;">
%end;
%apply;image_picture("size")
<!-- le code ci dessous donne la photo en petit format, à échanger avec ligne ci-dessus
<img src="%nnn.image_url;" width="50" style="border:0" alt="[image/images]0"%/>
-->
%if;not cancel_links;
</a>
%end;%sp;
%end;
%end;
<!-- fin définition de la photo d'une personne -->
<!-- définition de l'accès à une personne -->
%define;access_ind(nnn)
%if;(cancel_links or nnn.is_restricted)
%nnn;%nnn.title;
%else;
<a href="%prefix;%nnn.access;">%nnn;</a>%nnn.title;
%end;
%nnn.dates;%nl;
%end;
<!-- fin définition de l'accès à une personne -->
<!-- définition de l'accès à une personne -->
%define;access_ind_name(nnn)
%if;(cancel_links or nnn.is_restricted)
%nnn;%nnn_name.title;
%else;
<a href="%prefix;%nnn.access;">%nnn_name;</a>%nnn.title;
%end;
%nnn.dates;%nl;
%end;
<!-- fin définition de l'accès à une personne -->
<!-- descendance sur 1 génération -->
%define;desc_seq(yyy)
<ul>
%foreach;child;
<!-- table pour les des enfants -->
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td width="80%%"></td>
<td width="20%%"></td>
</tr>
%apply;tr_color()
<td align="left">
%apply;type_puce_desc("child")
%child_cnt;.
%apply;image_sex("child","")
%apply;picture_ind("child","")
%apply;display_sosa_link("child","")
%if;("yyy" = "parhigh")
<!-- comme le code est utilisable dans la descendance des grands parents on teste father/mother, pour la descendance des parents on est tjrs dans else -->
%if;(child.access = father_access or child.access = mother_access)
<!-- ici on met les parents en gras -->
<u><b>%child;</b></u>%child.title;%child.dates;
%else;
%apply;access_ind("child")
%end;
%else;
%apply;access_ind("child")
%end;
</td><td align="right" valign="up">
%if;child.has_families;
%foreach;child.family;
%if;(family_cnt != 1), %end;
%apply;detail_wedding()
%end;
%else;
%apply;not_married_no_descendants()
%end;
</td>
</tr></table>
</li>
%end;
</ul>
%end;
<!-- fin descendance sur 1 génération -->
<!-- ************************************************************************************************************* -->
<!-- zone de contrôles d'entête -->
%if;not cancel_links;
<hr>
<table style="width:99%%" border="%border;"><tr><td align="center" width="33%%">
<!-- code pour activer un autre template appelé toto, à mettre dans le template principal
<a href="%prefix_no_templ;%self.access;;templ=toto">
<img src="%image_prefix;/descendants.png"%wid_hei;descendants.png; border="0" alt="[*descendants]"%/></a>
-->
<!-- code pour revenir au template principal, à mettre dans les templates "fils"
<a href="%prefix_no_templ;%self.access;">
<img src="%image_prefix;/no_template.png" border="0" alt="[*no template]"%/></a>
-->
<!-- raccourcis vers des arbres ascendants/descendants -->
%if;has_children;
<a href="%prefix;m=D;t=T;v=2;image=on;%self.access;">
<img src="%image_prefix;/descendancy.png" border="0" alt="[*tree] [descendants]0 [to the grandchildren]"%/></a>
%end;
%if;has_parents;
<a href="%prefix;m=A;t=T;v=5;image=on;marriage=on;%access;">
<img src="%image_prefix;/tree.png" border="0" alt="[*tree] [ancestors]"%/></a>
%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))
<a href="#[note/notes]1">
<img src="%image_prefix;/notes.png"%wid_hei;notes.png; border="0" alt="[*note/notes]1"%/></a>
%end;
%if;has_sources;
<a href="#[source/sources]1">
<img src="%image_prefix;/sources.png"%wid_hei;sources.png; border="0" alt="[*source/sources]1"%/></a>
%end;
</td><td align="center" width="33%%">
<!-- raccourcis vers des fonctions générales -->
<a href="%prefix;m=R;%access;">
<img src="%image_prefix;/relationship_computing.png" border="0" alt="[*relationship computing]"%/></a>
%if;has_parents;
<a href="%prefix;m=A;%access;">
<img src="%image_prefix;/ancestors_computing.png" border="0" alt="[*ancestors]"%/></a>
%end;
%if;has_children;
<a href="%prefix;m=D;%access;">
<img src="%image_prefix;/descendants_computing.png" border="0" alt="[*descendants]"%/></a>
%end;
%if;(father.has_parents or mother.has_parents)
<a href="%prefix;m=C;%access;">
<img src="%image_prefix;/cousins_computing.png" border="0" alt="[*cousins (general term)]"%/></a>
%end;
%if;(sosa_ref != "")
<!-- relation avec le sosa 1 -->
<a href="%prefix;em=R&e%ind_access;&m=NG&select=input&n=1&t=PN&et=A;image=on">
<img src="%image_prefix;/relationship_computing_2.png" border="0" alt="[*relationship computing] [with] [Sosa] 1"%/></a>
<a href="%prefix;em=R&e%ind_access;&m=NG&select=input&n=1&t=PN&et=S;image=on">
<img src="%image_prefix;/shortest_path.png" border="0" alt="[*shortest path] [with] [Sosa] 1"%/></a>
%end;
</td><td align="center" width="33%%">
%if;wizard;
<!-- raccourcis vers des mises à jour -->
<a href="%prefix;m=SND_IMAGE;%ind_access;">
<img src="%image_prefix;/send_image.png" border="0" alt="[*send] [image/images]0"%/></a>
<a href="%prefix;m=MRG;%ind_access;">
<img src="%image_prefix;/merge.png" border="0" alt="[*merge]"%/></a>
<a href="%prefix;m=DEL_IND;%ind_access;">
<img src="%image_prefix;/delete.png" border="0" alt="[*delete]"%/></a>
<a href="%prefix;m=U;%access;">
<img src="%image_prefix;/mariage.png" border="0" alt="[*update]"%/></a>
<a href="%prefix;m=MOD_IND;%ind_access;">
<img src="%image_prefix;/modify.png" border="0" alt="[*modify]"%/></a>
%end;
</td></tr></table>
<hr>
%end;
<!-- fin zone de contrôles d'entête -->
<!-- flèches -->
%if;not cancel_links;
<table style="float:%right;"><tr><td>
%if;(referer != "")
<a href="%referer;"><img src="%image_prefix;/left.jpg"%wid_hei;left.jpg; border="1" alt="<<"%/></a>
%end;
<a href="%prefix;"><img%sp; src="%image_prefix;/up.jpg"%wid_hei;up.jpg; border="1" alt="^^"%/></a>
<!-- supression des liens Geneweb -->
%if;(evar.opt = "datree")
<!-- descendance agnatique -->
<a href="%prefix;%self.access;;opt=datree;cgl=on">
%elseif;(evar.opt = "dctree")
<!-- descendance cognatique -->
<a href="%prefix;%self.access;;opt=dctree;cgl=on">
%else;
<!-- descendance complète -->
<a href="%prefix;%self.access;;cgl=on">
%end;
<img src="%image_prefix;/right.jpg"%wid_hei;right.jpg; border="1" alt="[cancel GeneWeb links]"%/></a>
<!-- fin supression des liens Geneweb -->
</td></tr><tr><td align="right">
%if;has_parents;
<a href="#[tree]"><img src="%image_prefix;/ascendancy.png"%wid_hei;ascendancy.png; border="0" alt="[ancestors]"%/></a>
%end;
<!-- liens vers différents types de descendance -->
%if;has_children;
%if;(evar.opt = "datree")
<!-- descendance agnatique -->
<a href="%prefix;%self.access;#[dtree]"><img src="%image_prefix;/d.png" width="18" height="18"%sp; border="0" alt="[descendants]"%/></a>
<a href="#[dtree]"><img src="%image_prefix;/a.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]0"%/></a>
<a href="%prefix;%self.access;;opt=dctree;#[dtree]"><img src="%image_prefix;/c.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]1"%/></a>
%elseif;(evar.opt = "dctree")
<!-- descendance cognatique -->
<a href="%prefix;%self.access;#[dtree]"><img src="%image_prefix;/d.png" width="18" height="18"%sp; border="0" alt="[descendants]"%/></a>
<a href="%prefix;%self.access;;opt=datree;#[dtree]"><img src="%image_prefix;/a.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]0"%/></a>
<a href="#[dtree]"><img src="%image_prefix;/c.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]1"%/></a>
%else;
<!-- descendance complète -->
<a href="#[dtree]"><img src="%image_prefix;/d.png" width="18" height="18"%sp; border="0" alt="[descendants]"%/></a>
<a href="%prefix;%self.access;;opt=datree;#[dtree]"><img src="%image_prefix;/a.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]0"%/></a>
<a href="%prefix;%self.access;;opt=dctree;#[dtree]"><img src="%image_prefix;/c.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]1"%/></a>
%end;
%end;
</td></tr></table>
%else;
<table style="float:%right;"><tr><td>
<a href="javascript:printWindow()"><img src="%image_prefix;/print.png"%wid_hei;print.png; border="0" alt="[*print]"%/></a>
</td></tr></table>
%end;
<!-- fin flèches -->
<!-- sexe -->
%if;(is_male or is_female or
bvar.show_invisible = "on" and wizard and is_invisible)
<div style="float:%left;">%nn;
%if;is_male;
<img src="%image_prefix;/male.png"%wid_hei;male.png; alt="[M/F]0"%/>%nn;
%elseif;is_female;
<img src="%image_prefix;/female.png"%wid_hei;female.png; alt="[M/F]1"%/>%nn;
%end;
%if;(bvar.show_invisible = "on" and wizard and is_invisible) (x)%end;
</div>
%else;
<div style="float:%left;">%nn;
<img src="%image_prefix;/sexunknown.png"%wid_hei;sexunknown.png; alt="[M/F]"%/>%nn;
</div>
%end;
<!-- fin sexe -->
<!-- nom -->
<h1 style="text-align:center" class="highlight">
%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>
<!-- fin nom -->
<!-- premières informations -->
%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_link("self","")
<em>[*Sosa]:
%if;cancel_links;%sosa;
%else;<a href="%prefix;%sosa_link;;image=on">%sosa;</a>%end;
</em><br%/>
%end;
%foreach;qualifier;
%if;not is_first;
%if;has_public_name;%public_name; <em>%qualifier;</em>
%else;%first_name; <em>%qualifier;</em>%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;
<!-- fin premières informations -->
<!-- secondes informations -->
%if;has_image;
<table border="%border;" width="90%%"><tr><td>
<a href="%image_html_url;"><img src="%image_url;"%image_size; style="border:0" alt="[image/images]0"%/></a></td>
%end;
%if;(has_occupation or has_birth_date or has_birth_place or
has_baptism_date or has_baptism_place or is_dead or is_buried or
is_cremated or has_consanguinity or has_linked_page.OCCU)
%if;has_image;<td>%end;
<ul>
%if;has_occupation;<li>%apply;capitalize(occupation)</li>%nl;%end;
%if;has_linked_page.OCCU;
<li>%apply;capitalize(linked_page.OCCU)</li>
%end;
%if;has_birth_date;
<li>%apply;capitalize(nth([born],sex)) %on_birth_date;
%if;birthday; ([happy birthday to you!])%end;
%if;has_birth_place; - %birth_place;%end;</li>
%else;
%if;has_birth_place;
<li>%apply;capitalize(nth([born],sex)) - %birth_place;</li>
%end;
%end;
%if;has_baptism_date;
<li>%apply;capitalize(nth([baptized],sex)) %on_baptism_date;
%if;has_baptism_place; - %baptism_place;%end;</li>
%else;
%if;has_baptism_place;
<li>%apply;capitalize(nth([baptized],sex)) - %baptism_place;</li>
%end;
%end;
%if;is_dead;
<li>%apply;capitalize(died)
%if;has_death_date; %on_death_date;%end;
%if;has_death_place; - %death_place;%end;
%if;has_linked_page.DEATH; %linked_page.DEATH;%end;</li>
%end;
%if;computable_age;
<li>[*age]: %age;</li>
%end;
%if;computable_death_age;
<li>[*age at death:] %death_age;</li>%nl;
%end;
%if;is_buried;
<li>%apply;capitalize(nth([buried],sex))
%if;has_burial_date; %on_burial_date;%end;
%if;has_burial_place; - %burial_place;%end;</li>
%end;
%if;is_cremated;
<li>%apply;capitalize(nth([cremated],sex))
%if;has_cremation_date; %on_cremation_date;%end;
%if;has_cremation_place; - %cremation_place;%end;</li>
%end;
%if;(has_consanguinity and (bvar.show_consang != "no" or manitou))
<li>[*consanguinity]: %consanguinity;</li>%nl;
%end;
</ul>
%end;
%if;has_image;
</td></tr></table>
%end;
<!-- fin secondes informations -->
<!-- parents -->
<style type="text/css">
.parents {display:none}
.adoptiveparents {display:none}
.recognizingparents {display:none}
.candidateparents {display:none}
.fosterparents {display:none}
/*check for parents*/
%if;(has_parents and (father != "? ?" or mother != "? ?"))
.parents {display:block}
%end;
/*check for adoptive parents*/
%foreach;relation;
%if;(relation_type = [adoptive father/adoptive mother/adoptive parents]0 or
relation_type = [adoptive father/adoptive mother/adoptive parents]1 or
relation_type = [adoptive father/adoptive mother/adoptive parents]2)
.adoptiveparents {display:block}
%end;
%end;
/*check for recognizing parents*/
%foreach;relation;
%if;(relation_type = [recognizing father/recognizing mother/recognizing parents]0 or
relation_type = [recognizing father/recognizing mother/recognizing parents]1 or
relation_type = [recognizing father/recognizing mother/recognizing parents]2)
.recognizingparents {display:block}
%end;
%end;
/*check for Candidate parents*/
%foreach;relation;
%if;(relation_type = [candidate father/candidate mother/candidate parents]0 or
relation_type = [candidate father/candidate mother/candidate parents]1 or
relation_type = [candidate father/candidate mother/candidate parents]2)
.candidateparents {display:block}
%end;
%end;
/*check for Foster parents*/
%foreach;relation;
%if;(relation_type = [foster father/foster mother/foster parents]0 or
relation_type = [foster father/foster mother/foster parents]1 or
relation_type = [foster father/foster mother/foster parents]2)
.fosterparents {display:block}
%end;
%end;
</style>
%define;relation_him_her()
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_him")
%apply;image_sex("relation_him","")
%apply;picture_ind("relation_him","")
%apply;display_sosa_link("relation_him","")
%apply;access_ind("relation_him")
<!-- </td><td align="right" valign="up">
%if;relation_him.has_families;
%foreach;relation_him.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_her")
%apply;image_sex("relation_her","")
%apply;picture_ind("relation_her","")
%apply;display_sosa_link("relation_her","")
%apply;access_ind("relation_her")
<!-- </td><td align="right" valign="up">
%if;relation_her.has_families;
%foreach;relation_her.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
%end;
%define;relation_him()
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_him")
%apply;image_sex("relation_him","")
%apply;picture_ind("relation_him","")
%apply;display_sosa_link("relation_him","")
%apply;access_ind("relation_him")
<!-- </td><td align="right" valign="up">
%if;relation_him.has_families;
%foreach;relation_him.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
%end;
%define;relation_her()
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_her")
%apply;image_sex("relation_her","")
%apply;picture_ind("relation_her","")
%apply;display_sosa_link("relation_her","")
%apply;access_ind("relation_her")
<!-- </td><td align="right" valign="up">
%if;relation_her.has_families;
%foreach;relation_her.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
%end;
<table border="%border;" width="100%%">
<colgroup span=5>
<col class=parents width="1*">
<col class=adoptiveparents width="1*">
<col class=recognizingparents width="1*">
<col class=candidateparents width="1*">
<col class=fosterparents width="1*">
</colgroup>
<tr>
<td align="left" valign="top">
<h3 class=parents><font color="%highlight;">%if;(father != "? ?" and mother != "? ?")[*parents]%elseif;(father != "? ?")[*father/mother]0%else;[*father/mother]1 %end;</font></h3>
<ul class=parents>
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
%foreach;parent;
%if;(parent != "? ?")
%if;(parent.access = father_access and father_age_at_birth != "")
%apply;tr_color()
%elseif;(parent.access = mother_access and mother_age_at_birth != "")
%apply;tr_color()
%else;
<tr>
%end;
<td align="left">
%apply;type_puce_asc("parent")
<!-- %if;(parent.access = father_access)
%if;(mother = "? ?")
%if;father.are_married;
<img src="%image_prefix;/married.png" alt="[married]">
%elseif;father.are_not_married;
<img src="%image_prefix;/not_married.png" alt="[not married]">
%elseif;father.are_engaged;
<img src="%image_prefix;/engaged.png" alt="[engaged]">
%elseif;father.is_no_sexes_check;
<img src="%image_prefix;/not_married.png" alt="[relationship]">
%elseif;father.is_no_mention;
<img src="%image_prefix;/not_married.png" alt="[with]">
%end;
%else;
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
%end;
%else;
%if;mother.are_married;
<img src="%image_prefix;/married.png" alt="[married]">
%elseif;mother.are_not_married;
<img src="%image_prefix;/not_married.png" alt="[not married]">
%elseif;mother.are_engaged;
<img src="%image_prefix;/engaged.png" alt="[engaged]">
%elseif;mother.is_no_sexes_check;
<img src="%image_prefix;/not_married.png" alt="[relationship]">
%elseif;mother.is_no_mention;
<img src="%image_prefix;/not_married.png" alt="[with]">
%end;
%end;
-->
%apply;image_sex("parent","")
%apply;picture_ind("parent","")
%apply;display_sosa_link("parent","")
%apply;access_ind("parent")
</td><td align="right" valign="up">
%apply;parent_age_at_birth()
%end;
%end;
</td></tr></table>
</ul>
</td>
<td align="left" valign="top">
%foreach;relation;
%if;(relation_type = [adoptive father/adoptive mother/adoptive parents]0 or
relation_type = [adoptive father/adoptive mother/adoptive parents]1 or
relation_type = [adoptive father/adoptive mother/adoptive parents]2)
<h3 class=adoptiveparents><font color="%highlight;">
%apply;capitalize(relation_type)
</font></h3>
<ul class=adoptiveparents>
%if;(has_relation_him and has_relation_her)
%apply;relation_him_her()
%elseif;has_relation_him;
%apply;relation_him()
%elseif;has_relation_her;nt color="%highlight;">%relation_type</font></h3>
%apply;relation_her()
%end;
</ul>
%end;
%end;
</td>
<td align="left" valign="top">
%foreach;relation;
%if;(relation_type = [recognizing father/recognizing mother/recognizing parents]0 or
relation_type = [recognizing father/recognizing mother/recognizing parents]1 or
relation_type = [recognizing father/recognizing mother/recognizing parents]2)
<h3 class=recognizingparents><font color="%highlight;">
%apply;capitalize(relation_type)
</font></h3>
<ul class=recognizingparents>
%if;(has_relation_him and has_relation_her)
%apply;relation_him_her()
%elseif;has_relation_him;
%apply;relation_him()
%elseif;has_relation_her;
%apply;relation_her()
%end;
</ul>
%end;
%end;
</td>
<td align="left" valign="top">
%foreach;relation;
%if;(relation_type = [candidate father/candidate mother/candidate parents]0 or
relation_type = [candidate father/candidate mother/candidate parents]1 or
relation_type = [candidate father/candidate mother/candidate parents]2)
<h3 class=candidateparents><font color="%highlight;">
%apply;capitalize(relation_type)
</font></h3>
<ul class=candidateparents>
%if;(has_relation_him and has_relation_her)
%apply;relation_him_her()
%elseif;has_relation_him;
%apply;relation_him()
%elseif;has_relation_her;
%apply;relation_her()
%end;
</ul>
%end;
%end;
</td>
<td align="left" valign="top">
%foreach;relation;
%if;(relation_type = [foster father/foster mother/foster parents]0 or
relation_type = [foster father/foster mother/foster parents]1 or
relation_type = [foster father/foster mother/foster parents]2)
<h3 class=fosterparents><font color="%highlight;">
%apply;capitalize(relation_type)
</font></h3>
<ul class=fosterparents>
%if;(has_relation_him and has_relation_her)
%apply;relation_him_her()
%elseif;has_relation_him;
%apply;relation_him()
%elseif;has_relation_her;
%apply;relation_her()
%end;
</ul>
%end;
%end;
</td></tr>
</table>
<!-- fin parents -->
<!-- définitions des termes du mariage -->
%define;married_to(date_place)
%if;is_male;
%if;are_married;[*married%t to:::date_place]0
%elseif;are_not_married;[*relationship%t to:::date_place]0
%elseif;are_engaged;[*engaged%t to:::date_place]0
%elseif;is_no_sexes_check;[*relationship%t to:::date_place]0
%elseif;is_no_mention;date_place [with]
%end;
%else;
%if;are_married;[*married%t to:::date_place]1
%elseif;are_not_married;[*relationship%t to:::date_place]1
%elseif;are_engaged;[*engaged%t to:::date_place]1
%elseif;is_no_sexes_check;[*relationship%t to:::date_place]1
%elseif;is_no_mention;date_place [with]
%end;
%end;
%end;
<!-- fin définitions des termes du mariage -->
<!-- définition du terme pour les témoins -->
%define;witness_relation(xxx, yyy)
[*witness at marriage of %s and %s:::xxx:yyy]
%end;
<!-- fin définition du terme pour les témoins -->
<!-- alliances et enfants -->
%if;has_families;
<h3 class="highlight">[*marriage/marriages]1 [and::child/children]1
</h3>
<ul>
%foreach;family;
<table border="%border;" style="width:90%%" cellspacing="0" cellpadding="0"><tr><td align="left">
%apply;type_puce_asc("spouse")
%family_cnt;.
%apply;married_to%with;
%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;
%apply;image_sex("spouse","")
%apply;picture_ind("spouse","")
%apply;display_sosa_link("spouse","")
%apply;access_ind("spouse")
<!-- voir ci-dessous
%if;has_witnesses;
%sp;([witness/witnesses]w:
%foreach;witness;
%if;not is_first;, %end;
%if;(cancel_links or witness.is_restricted)%witness;
%else;<a href="%prefix;%witness.access">%witness;</a>%end;
%witness.title;%witness.dates;
%end;
)%end;
-->
%if;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
</td></tr></table>
%if;(evar.opt != "two" and evar.opt != "three")
<ul>
%foreach;child;
<table border="%border;" style="width:90%%" cellspacing="0" cellpadding="0">
%apply;tr_color()
<td align="left">
%apply;type_puce_desc("child")
%child_cnt;.
%apply;image_sex("child","")
%apply;picture_ind("child","")
%apply;display_sosa_link("child","")
%apply;access_ind_name("child")
</li>
</td><td align="right" valign="up">
%if;child.has_families;
%foreach;child.family;
%if;(family_cnt != 1), %end;
%apply;detail_wedding()
%end;
%else;
%apply;not_married_no_descendants()
%end;
</td></tr></table>
%end;
</ul>
<!-- apply;desc_seq("") -->
%end;
%end;
</td></tr></table>
%if;(evar.opt = "from" and wizard)<em>(%origin_file;)</em><br%/>%nl;%end;
</li>
%end;
</ul>
%end;
<!-- fin alliances et enfants -->
<!-- témoins aux alliances -->
%if;has_families;
<table border="%border;" style="width:90%%" cellspacing="0" cellpadding="0"><tr>
%foreach;family;
%if;has_witnesses;
<td align="left" valign="up">
<h3 class="highlight">[*witness/witnesses]w [marriage/marriages]0 %family_cnt</h3>
<ul>
%foreach;witness;
%apply;type_puce_desc("witness")
%apply;image_sex("witness","")
%apply;picture_ind("witness","")
%apply;display_sosa_link("witness","")
%apply;access_ind("witness")
%end;
</td>
</ul>
%end;
%end;
</tr></table>
%end;
<!-- fin témoins aux alliances -->
<!-- enfants alternatifs -->
<style type="text/css">
.adoptivechildren {display:none}
.recognizedchildren {display:none}
.candidatechildren {display:none}
.fosterchildren {display:none}
/*check for adoptive children*/
%foreach;related;
%if;(related_type = [adoptive son/adoptive daughter/adoptive child]0 or
related_type = [adoptive son/adoptive daughter/adoptive child]1 or
related_type = [adoptive son/adoptive daughter/adoptive child]2)
.adoptivechildren {display:block}
%end;
%end;
/*check for recognizing children*/
%foreach;related;
%if;(related_type = [recognized son/recognized daughter/recognized child]0 or
related_type = [recognized son/recognized daughter/recognized child]1 or
related_type = [recognized son/recognized daughter/recognized child]2)
.recognizedchildren {display:block}
%end;
%end;
/*check for Candidate children*/
%foreach;related;
%if;(related_type = [candidate son/candidate daughter/candidate child]0 or
related_type = [candidate son/candidate daughter/candidate child]1 or
related_type = [candidate son/candidate daughter/candidate child]2)
.candidatechildren {display:block}
%end;
%end;
/*check for Foster children*/
%foreach;related;
%if;(related_type = [foster son/foster daughter/foster child]0 or
related_type = [foster son/foster daughter/foster child]1 or
related_type = [foster son/foster daughter/foster child]2)
.fosterchildren {display:block}
%end;
%end;
</style>
%define;related()
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("related")
%apply;image_sex("related","")
%apply;picture_ind("related","")
%apply;display_sosa_link("related","")
%apply;access_ind("related")
<!-- </td><td align="right" valign="up">
%if;related.has_families;
%foreach;related.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
%end;
<table border="%border;" width="100%%">
<colgroup span=4>
<col class=adoptivechildren width="1*">
<col class=recognizedchildren width="1*">
<col class=candidatechildren width="1*">
<col class=fosterchildren width="1*">
</colgroup>
<tr>
<td align="left" valign="top">
<hr class=adoptivechildren>
<h3 class=adoptivechildren><font color="%highlight;">[*adoptive son/adoptive daughter/adoptive children]2</font></h3>
<ul class=adoptivechildren>
%foreach;related;
%if;(related_type = [adoptive son/adoptive daughter/adoptive child]0 or
related_type = [adoptive son/adoptive daughter/adoptive child]1 or
related_type = [adoptive son/adoptive daughter/adoptive child]2)
%apply;related()
%end;
%end;
</ul>
</td>
<td align="left" valign="top">
<hr class=recognizedchildren>
<h3 class=recognizedchildren><font color="%highlight;">[*recognized son/recognized daughter/recognized children]2</font></h3>
<ul class=recognizedchildren>
%foreach;related;
%if;(related_type = [recognized son/recognized daughter/recognized child]0 or
related_type = [recognized son/recognized daughter/recognized child]1 or
related_type = [recognized son/recognized daughter/recognized child]2)
%apply;related()
%end;
%end;
</ul>
</td>
<td align="left" valign="top">
<hr class=candidatechildren>
<h3 class=candidatechildren><font color="%highlight;">[*candidate son/candidate daughter/candidate children]2</font></h3>
<ul class=candidatechildren>
%foreach;related;
%if;(related_type = [candidate son/candidate daughter/candidate child]0 or
related_type = [candidate son/candidate daughter/candidate child]1 or
related_type = [candidate son/candidate daughter/candidate child]2)
%apply;related()
%end;
%end;
</ul>
</td>
<td align="left" valign="top">
<hr class=fosterchildren>
<h3 class=fosterchildren><font color="%highlight;">[*foster son/foster daughter/foster children]2</font></h3>
<ul class=fosterchildren>
%foreach;related;
%if;(related_type = [foster son/foster daughter/foster child]0 or
related_type = [foster son/foster daughter/foster child]1 or
related_type = [foster son/foster daughter/foster child]2)
%apply;related()
%end;
%end;
</ul>
</td>
</tr>
</table>
<!-- fin enfants alternatifs -->
<!-- frères et soeurs y compris 1/2-->
<style type="text/css">
.siblings {display:none}
.consanguinesiblings {display:none}
.uterinesiblings {display:none}
/*check for siblings*/
%if;has_siblings;
.siblings {display:block}
%end;
/*check for consanguine siblings*/
%foreach;father.family;
%if;not(nb_children = 0 or spouse.access = mother.access)
.consanguinesiblings {display:block}
%end;
%end;
/*check for uterine siblings*/
%foreach;mother.family;
%if;not(nb_children = 0 or spouse.access = father.access)
.uterinesiblings {display:block}
%end;
%end;
</style>
<table border="%border;" width="100%%">
<colgroup span=3>
<col class=siblings width="33%%">
<col class=consanguinesiblings width="33%%">
<col class=uterinesiblings width="33%%">
</colgroup>
<tr>
<td align="left" valign="top">
%if;has_siblings;
<hr class=siblings>
<h3 class=siblings><font color="%highlight;">[*german siblings]</font></h3>
<ul class=siblings>
%foreach;father.child;
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
%apply;tr_color()
<td align="left">
%apply;type_puce_desc("child")
%child_cnt;.
%apply;image_sex("child","")
%apply;picture_ind("child","")
%apply;display_sosa_link("child","")
%if;is_self;
<u><b>%child_name;</b></u>%self.title;%self.dates;%nl;
%else;
%apply;access_ind_name("child")
%end;
</td><td align="right" valign="up">
%if;child.has_families;
%foreach;child.family;
%if;(family_cnt != 1), %end;
%apply;detail_wedding()
%end;
%else;
%apply;not_married_no_descendants()
%end;
</table>
%end;
</ul>
%end;
</td>
<td align="left" valign="top">
<hr class=consanguinesiblings>
<h3 class=consanguinesiblings><font color="%highlight;">[*consanguine siblings]</font></h3>
<ul class=consanguinesiblings>
%foreach;father.family;
%if;not(nb_children = 0 or spouse.access = mother.access)
%apply;type_puce_asc("spouse")
%apply;type_wedding()
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
%apply;image_sex("spouse","")
%apply;picture_ind("spouse","")
%apply;display_sosa_link("spouse","")
%apply;access_ind("spouse")
%apply;desc_seq("")
%end;
%end;
</ul>
</td>
<td align="left" valign="top">
<hr class=uterinesiblings>
<h3 class=uterinesiblings><font color="%highlight;">[*uterine siblings]</font></h3>
<ul class=uterinesiblings>
%foreach;mother.family;
%if;not(nb_children = 0 or spouse.access = father.access)
%apply;type_puce_asc("spouse")
%apply;type_wedding()
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
%apply;image_sex("spouse","")
%apply;picture_ind("spouse","")
%apply;display_sosa_link("spouse","")
%apply;access_ind("spouse")
%apply;desc_seq("")
%end;
%end;
</ul>
</td>
</tr>
</table>
<!-- fin frères et soeurs y compris 1/2 -->
<!-- descendance des grands parents -->
<style type="text/css">
.paternalgrandparents {display:none}
.maternalgrandparents {display:none}
/*check for siblings*/
%if;father.has_parents;
.paternalgrandparents {display:block}
%end;
/*check for siblings*/
%if;mother.has_parents;
.maternalgrandparents {display:block}
%end;
</style>
<!-- descendance des grands pères -->
<!-- mmm = father => paternel, mmm = mother => maternel -->
<!-- yyy = "", classique ou "parhigh", les parents de la personne sont en gras soulignés -->
%define;descendancy_grand_fathers(mmm,yyy)
%foreach;mmm.father.family;
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0"><tr><td align="left">
%apply;type_puce_asc("mmm.father")
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
%apply;image_sex("mmm.father","")
%apply;picture_ind("mmm.father","")
%apply;display_sosa_link("mmm.father","")
%if;(spouse.access = mmm.mother.access)
%apply;access_ind("mmm.father")
%else;
%mmm.father;%mmm.father.title;%mmm.father.dates;
%end;
%apply;type_puce_asc("spouse")
%apply;type_wedding()
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
%apply;image_sex("spouse","")
%apply;picture_ind("spouse","")
%apply;display_sosa_link("spouse","")
%if;(spouse.access = self.access)
<u><b>%spouse;</b></u>%spouse.title;%spouse.dates;
</td><td align="right" valign="up">
%apply;detail_wedding()
</td></tr></table>
%else;
%apply;access_ind("spouse")
</td></tr></table>
%apply;desc_seq("yyy")
%end;
<br%/>
%end;
%end;
<!-- descendance des grands mères -->
<!-- mmm = father => paternelle, mmm = mother => maternelle -->
<!-- yyy = "", classique ou "parhigh", les parents de la personne sont en gras soulignés -->
%define;descendancy_grand_mothers(mmm,yyy)
%foreach;mmm.mother.family;
%if;(spouse.access != mmm.father.access)
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0"><tr><td align="left">
%apply;type_puce_asc("mmm.mother")
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
%apply;image_sex("mmm.mother","")
%apply;picture_ind("mmm.mother","")
%apply;display_sosa_link("mmm.mother","")
%mmm.mother;%mmm.mother.title;%mmm.mother.dates;
%apply;type_puce_asc("spouse")
%apply;type_wedding()
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
%apply;image_sex("spouse","")
%apply;picture_ind("spouse","")
%apply;display_sosa_link("spouse","")
%if;(spouse.access = self.access)
<u><b>%spouse;</b></u>%spouse.title;%spouse.dates;
</td><td align="right" valign="up">
%apply;detail_wedding()
</td></tr></table>
%else;
%apply;access_ind("spouse")
</td></tr></table>
%apply;desc_seq("yyy")
%end;
%end;
<br%/>
%end;
%end;
<!-- ici on affiche la descendances des grands parents sur 1 génération pour donner les oncles et tantes
voir tout en bas la descendance sur 3 générations -->
<!-- affichage sur deux colonnes -->
<table border="%border;" width="100%%">
<colgroup span=2>
<col class=paternalgrandparents width="50%%">
<col class=maternalgrandparents width="50%%">
</colgroup>
<tr>
<td align="left" valign="top">
%if;father.has_parents;
<hr class=paternalgrandparents>
<h3 class=paternalgrandparents><font color="%highlight;" size="+1">[*paternal grand-parents], [uncles and aunts]1</font></h3>
<ul class=paternalgrandparents>
<!-- descendance du grand père paternel -->
%apply;descendancy_grand_fathers("father","parhigh")
<!-- descendance de la grand mère paternelle (hors celle du grand père paternel) -->
%apply;descendancy_grand_mothers("father","parhigh")
</ul>
%end;
</td>
<td align="left" valign="top">
%if;mother.has_parents;
<hr class=maternalgrandparents>
<h3 class=maternalgrandparents><font color="%highlight;" size="+1">[*maternal grand-parents], [uncles and aunts]1</font></h3>
<ul class=maternalgrandparents>
<!-- descendance du grand père maternel -->
%apply;descendancy_grand_fathers("mother","parhigh")
<!-- descendance de la grand mère maternelle (hors celle du grand père maternel) -->
%apply;descendancy_grand_mothers("mother","parhigh")
</ul>
%end;
</td>
</tr>
</table>
<!-- fin de la descendance des grands parents -->
<!-- relations (parrains, marraines et filleul(le)s) de la personne et alliances dont elle est témoin -->
<style type="text/css">
.relation {display:none}
/*check for relation*/
%foreach;relation;
%if;(relation_type = [godfather/godmother/godparents]0 or
relation_type = [godfather/godmother/godparents]1 or
relation_type = [godfather/godmother/godparents]2)
.relation {display:block}
%end;
%end;
%foreach;related;
%if;(related_type = [godson/goddaughter/godchild]0 or
related_type = [godson/goddaughter/godchild]1 or
related_type = [godson/goddaughter/godchild]2)
.relation {display:block}
%end;
%end;
%foreach;witness_relation;
.relation {display:block}
%end;
</style>
%if;has_relations;
<table border="%border;" width="100%%">
<colgroup span=1>
<col class=relation width="1*">
</colgroup>
<tr>
<td align="left" valign="top">
%apply;top()
<hr class=relation>
<h3 class=relation><font color="%highlight;">[*relation/relations]1</font></h3>
<ul class=relation>
%foreach;relation;
%if;(relation_type = [godfather/godmother/godparents]0 or
relation_type = [godfather/godmother/godparents]1 or
relation_type = [godfather/godmother/godparents]2)
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0"><tr><td align="left">
<li>%apply;capitalize(relation_type)
</td></tr></table>
%if;(has_relation_him and has_relation_her)
%nl;
<ul>
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_him")
%apply;image_sex("relation_him","")
%apply;picture_ind("relation_him","")
%apply;display_sosa_link("relation_him","")
%apply;access_ind("relation_him")
<!-- </td><td align="right" valign="up">
%if;relation_him.has_families;
%foreach;relation_him.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_her")
%apply;image_sex("relation_her","")
%apply;picture_ind("relation_her","")
%apply;display_sosa_link("relation_her","")
%apply;access_ind("relation_her")
<!-- </td><td align="right" valign="up">
%if;relation_her.has_families;
%foreach;relation_her.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
</ul>
%elseif;has_relation_him;
%nl;
<ul>
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_him")
%apply;image_sex("relation_him","")
%apply;picture_ind("relation_him","")
%apply;display_sosa_link("relation_him","")
%apply;access_ind("relation_him")
<!-- </td><td align="right" valign="up">
%if;relation_him.has_families;
%foreach;relation_him.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
</ul>
%elseif;has_relation_her;
%nl;
<ul>
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("relation_her")
%apply;image_sex("relation_her","")
%apply;picture_ind("relation_her","")
%apply;display_sosa_link("relation_her","")
%apply;access_ind("relation_her")
<!-- </td><td align="right" valign="up">
%if;relation_her.has_families;
%foreach;relation_her.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
</ul>
%end;
</li>
%end;
%end;
%foreach;related;
%if;(related_type = [godson/goddaughter/godchild]0 or
related_type = [godson/goddaughter/godchild]1 or
related_type = [godson/goddaughter/godchild]2)
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
%apply;type_puce_desc("related")
%apply;capitalize(related_type):
%apply;image_sex("related","")
%apply;picture_ind("related","")
%apply;display_sosa_link("related","")
%apply;access_ind("related")
<!-- </td><td align="right" valign="up">
%if;related.has_families;
%foreach;related.family;
%if;(family_cnt != 1), %end;
apply;detail_wedding()
%end;
%else;
apply;not_married_no_descendants()
%end;-->
</td></tr></table>
%end;
%end;
%foreach;witness_relation;
<table border="%border;" width="90%%" cellspacing="0" cellpadding="0">
<tr>
<td align="left">
<li style="list-style-type:disc">%nn;
%apply;witness_relation%with;
%if;cancel_links;%witness_relation.father;
%else<a href="%prefix;%witness_relation.father.access;">%witness_relation.father;</a>%end;
%witness_relation.father.title;%witness_relation.father.dates;
%and;
%if;cancel_links;%witness_relation.mother;
%else<a href="%prefix;%witness_relation.mother.access;">%witness_relation.mother;</a>%end;
%witness_relation.mother.title;%witness_relation.mother.dates;
%end;
</li>%nl;
</td></tr></table>
%end;
</ul>
</td>
</tr>
</table>
%end;
<!-- fin relations (parrains, marraines et filleul(le)s) de la personne et alliances dont elle est témoin -->
<!-- notes -->
%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))<a name="[note/notes]1">
<hr>
<h3><span class="highlight">[*note/notes]1</span></h3>
<dl><dd>
%if;(has_linked_page.BNOTE)
<p>%apply;capitalize(linked_page.BNOTE).</p>
%end;
%notes;
%if;(has_linked_page.NOTE)
<p>%apply;capitalize(linked_page.NOTE).</p>
%end;
</dd></dl>
%end;
<!-- fin notes -->
<!-- sources -->
%if;has_sources;<a name="[source/sources]1">
<hr>
<p>
<strong><em style="font-size:80%%">[*source/sources]1</strong>:
%foreach;source;
<br%/>- %source_type;: <strong>%source;</strong>
%end;
</em>
</p>
%end;
<!-- fin sources -->
<!-- zone de contrôles d'enqueue -->
%if;not cancel_links;
<hr>
<table border="%border;" width="90%%"><tr><td align="center">
<a href="%prefix;m=R;%access;" class="highlight" accesskey="R">[*relationship computing] (R)</a>
</td><td align="%left;">
<ul style="list-style:inside">
%if;has_parents;
<li>
<a href="%prefix;m=A;%access;" class="highlight">[*ancestors]</a></li>
%end;
%if;has_children;
<li>
<a href="%prefix;m=D;%access;" class="highlight">[*descendants]</a></li>
%end;
%if;(has_parents and (father.has_parents or mother.has_parents))
<li>
<a href="%prefix;m=C;%access;" class="highlight">[*cousins (general term)]</a></li>
%else;
%if;has_nephews_or_nieces;
<li>
<a href="%prefix;m=C;v1=1;v2=2;%access;" class="highlight">[*nephews and nieces]</a></li>
%end;
%end;
<!-- pas utile dans cette présentation
%if;has_parents;
%foreach;father.child;
%if;is_sibling_before;
<li>
<a href="%prefix;%child.access;" class="highlight">%nn;
%apply;capitalize(nth([previous sibling],sex))</a></li>
%end;
%if;is_sibling_after;
<li>
<a href="%prefix;%child.access;" class="highlight">%nn;
%apply;capitalize(nth([next sibling],sex))</a></li>
%end;
%end;
%end;
-->
</ul>
</td><td align="left"><p><br%/>
<ul>
%if;has_parents;
%if;has_children;
<li>
%end;
<a href="%prefix;m=A;%access&siblings=on¬es=on&t=T&v=5&image=on" class="highlight">[*tree] [ancestors]</a>
%end;
%if;has_children;
%if;has_parents;
<li>
%end;
<a href="%prefix;m=D;%access&siblings=on¬es=on&t=T&v=5&image=on" class="highlight">[*tree] [descendants]</a>
%end;
</ul>
</td>
%if;wizard;
<td>
<li><a href="%prefix;m=U;%access;" class="highlight" accesskey="U">[*update] (U)</a>
<li><a href="%prefix;m=MOD_IND;%ind_access;" class="highlight" accesskey="P">[*modify::person/persons]</a>
</td>
%end;
</tr>
</table>
%end;
<!-- fin zone de contrôles d'enqueue -->
<!-- définition de l'accès à une personne spécial arbre horizontal -->
%define;access(num,nnn)
num_
%apply;picture_ind("nnn","")
%apply;display_sosa_link("nnn","")
%if;("num" = 1)
%self;%nnn.title;%nnn.dates;
%if;(has_children and not cancel_links)
<a href="#[dtree]"><img src="%image_prefix;/moins.png"%wid_hei;moins.png; border="0" alt="[descendants]"%/></a>
%end;
%else;
%apply;access_ind("nnn")
%if;nnn.has_parents;
%if;not cancel_links;
<a href="%prefix;%nnn.access;#[tree]"><img src="%image_prefix;/plus.png"%wid_hei;plus.png; border="0" alt="[ancestors]"%/></a>
%else
%if;("num" >= 16) ==>%end;
%end;
%end;
%end;
%end;
<!-- fin définition de l'accès à une personne spécial arbre horizontal -->
<!-- arbre ascendants 4 générations -->
%if;has_parents;
<div class="saut_avant">
<a name="[tree]"></a>
%apply;top()
<hr>
<h3 class="highlight">[*ancestors]</h3>
%if;father.has_parents;
%if;father.father.has_parents;
%if;father.father.father.has_parents;
_____|%apply;access("16","father.father.father.father")%end;<br%/>
_____|%apply;access("8","father.father.father")<br%/>
/%if;father.father.father.has_parents; ¯¯¯¯¯|%apply;access("17","father.father.father.mother")%end;%end;<br%/>
_____|%apply;access("4","father.father")<br%/>
/%if;father.father.has_parents; \%end;%if;father.father.mother.has_parents; _____|%apply;access("18","father.father.mother.father")%end;<br%/>
/%if;father.father.has_parents; ¯¯¯¯¯|%apply;access("9","father.father.mother")%end;<br%/>
/%if;father.father.mother.has_parents; ¯¯¯¯¯|%apply;access("19","father.father.mother.mother")%end;%end;<br%/>
|%apply;access("2","father")<br%/>
|%if;father.has_parents; \%end;%if;father.mother.father.has_parents; _____|%apply;access("20","father.mother.father.father")%end;<br%/>
|%if;father.has_parents; \%end;%if;father.mother.has_parents; _____|%apply;access("10","father.mother.father")%end;<br%/>
|%if;father.has_parents; \%end;%if;father.mother.has_parents; /%end;%if;father.mother.father.has_parents; ¯¯¯¯¯|%apply;access("21","father.mother.father.mother")%end;<br%/>
|%if;father.has_parents; ¯¯¯¯¯|%apply;access("5","father.mother")%end;<br%/>
|%if;father.mother.has_parents; \%end;%if;father.mother.mother.has_parents; _____|%apply;access("22","father.mother.mother.father")%end;<br%/>
|%if;father.mother.has_parents; ¯¯¯¯¯|%apply;access("11","father.mother.mother")%end;<br%/>
|%if;father.mother.mother.has_parents; ¯¯¯¯¯|%apply;access("23","father.mother.mother.mother")%end;<br%/>
|--%apply;access("1","self")<br%/>
|%if;mother.father.father.has_parents; _____|%apply;access("24","mother.father.father.father")%end;<br%/>
|%if;mother.father.has_parents; _____|%apply;access("12","mother.father.father")%end;<br%/>
|%if;mother.father.has_parents; /%end;%if;mother.father.father.has_parents; ¯¯¯¯¯|%apply;access("25","mother.father.father.mother")%end;<br%/>
|%if;mother.has_parents; _____|%apply;access("6","mother.father")%end;<br%/>
|%if;mother.has_parents; /%end;%if;mother.father.has_parents; \%end;%if;mother.father.mother.has_parents; _____|%apply;access("26","mother.father.mother.father")%end;<br%/>
|%if;mother.has_parents; /%end;%if;mother.father.has_parents; ¯¯¯¯¯|%apply;access("13","mother.father.mother")%end;<br%/>
|%if;mother.has_parents; /%end;%if;mother.father.mother.has_parents; ¯¯¯¯¯|%apply;access("27","mother.father.mother.mother")%end;<br%/>
|%apply;access("3","mother")<br%/>
%if;mother.has_parents;
\%if;mother.mother.father.has_parents; _____|%apply;access("28","mother.mother.father.father")%end;<br%/>
\%if;mother.mother.has_parents; _____|%apply;access("14","mother.mother.father")%end;<br%/>
\%if;mother.mother.has_parents; /%end;%if;mother.mother.father.has_parents; ¯¯¯¯¯|%apply;access("29","mother.mother.father.mother")%end;<br%/>
¯¯¯¯¯|%apply;access("7","mother.mother")%end;<br%/>
%if;mother.mother.has_parents;
\%if;mother.mother.mother.has_parents; _____|%apply;access("30","mother.mother.mother.father")%end;<br%/>
¯¯¯¯¯|%apply;access("15","mother.mother.mother")<br%/>
%if;mother.mother.mother.has_parents;
¯¯¯¯¯|%apply;access("31","mother.mother.mother.mother")%end;%end;<br%/>
</div>
%end;
<!-- fin arbre ascendants 4 générations -->
<!-- descendants sur 5 générations
Rappel : si evar.opt = datree => descendance agnatique
si evar.opt = dctree => descendance cognatique
sinon => descendance complète
-->
%define;individu(nz)
<td colspan="nz" align="left" valign="middle">
%child_cnt;.
%apply;image_sex("child","")
%apply;picture_ind("child","")
%apply;display_sosa_link("child","")
%apply;access_ind("child")
<!-- %if;child.has_children;
%if;not cancel_links;
<a href="%prefix;%child.access;;opt=%evar.opt;#[dtree]"><img src="%image_prefix;/moins.png"%wid_hei;moins.png; border="0" alt="[descendants]"%/></a>
%end;
%end;-->
</td>
<td align="right" valign="middle">
%if;("nz" = "1")
%if;child.has_families;
%foreach;child.family;
%if;(family_cnt != 1), %end;
%apply;detail_wedding()
%end;
%else;
%apply;not_married_no_descendants()
%end
%else;
<!-- -->
%if;(evar.opt = "datree" and not child.is_male)
%if;child.has_families;
%foreach;child.family;
%if;(family_cnt != 1), %end;
%apply;detail_wedding()
%end;
%else;
%apply;not_married_no_descendants()
%end
%end
%if;(evar.opt = "dctree" and not child.is_female)
%if;child.has_families;
%foreach;child.family;
%if;(family_cnt != 1), %end;
%apply;detail_wedding()
%end;
%else;
%apply;not_married_no_descendants()
%end
%end
%end;
</td>
%end;
%define;spouse(nz)
<td colspan="nz" align="left" valign="middle">
<font size="-1">
%apply;type_wedding()%family_cnt;.
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
</font>
<font size="-2">
%apply;image_sex("spouse","10")
%apply;picture_ind("spouse","11")
%apply;display_sosa_link("spouse","11")
%apply;access_ind("spouse")
</font>
<td align="right" valign="middle">
</td>
%end;
%define;aaap_enfant(ttt,yyy,ppp,eee,fff)
<td width="5"></td>
<td width="5"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("yyy" = "p" or "yyy" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("yyy" = "u" or "yyy" = "d")<td width="1"></td>%end;
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="1"></td>
<td></td>
%if;("ppp" = "p" or "ppp" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ppp" = "u" or "ppp" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("eee" = "p" or "eee" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("eee" = "u" or "eee" = "d")<td width="1"></td>%end;
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
%if;("fff" = "u" or "fff" = "p")<td width="1">%apply;type_wedding()</td>
<td width="1"><font size="-1">%family_cnt;</font></td>%end;
%if;("fff" = "d" or "fff" = "n")<td width="1"></td>
<td width="1"></td>%end;
<td width="1" bgcolor="black">|</td>
<td width="5">-</td>
<td width="1"></td>
%apply;individu("1")
%end;
%define;aaap_enfant_spouse(ttt,yyy,ppp,eee)
<td width="5"></td>
<td width="5"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("yyy" = "p" or "yyy" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("yyy" = "u" or "yyy" = "d")<td width="1"></td>%end;
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="1"></td>
<td></td>
%if;("ppp" = "p" or "ppp" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ppp" = "u" or "ppp" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("eee" = "p" or "eee" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("eee" = "u" or "eee" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
<td width="1" bgcolor="white">|</td>
<td width="5"></td>
<td width="1"></td>
%apply;spouse("1")
%end;
%define;aap_enfant(ttt,yyy,ppp,eee)
<td width="5"></td>
<td width="5"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("yyy" = "p" or "yyy" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("yyy" = "u" or "yyy" = "d")<td width="1"></td>%end;
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="1"></td>
<td></td>
%if;("ppp" = "p" or "ppp" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ppp" = "u" or "ppp" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
%if;("eee" = "u" or "eee" = "p")<td width="1">%apply;type_wedding()</td>
<td width="1"><font size="-1">%family_cnt;</font></td>%end;
%if;("eee" = "d" or "eee" = "n")<td width="1"></td>
<td width="1"></td>%end;
<td width="1" bgcolor="black">|</td>
<td width="5">-</td>
<td width="1"></td>
%apply;individu("7")
%end;
%define;aap_enfant_spouse(ttt,yyy,ppp)
<td width="5"></td>
<td width="5"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("yyy" = "p" or "yyy" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("yyy" = "u" or "yyy" = "d")<td width="1"></td>%end;
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="1"></td>
<td></td>
%if;("ppp" = "p" or "ppp" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ppp" = "u" or "ppp" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
<td width="1" bgcolor="white">|</td>
<td width="5"></td>
<td width="1"></td>
%apply;spouse("7")
%end;
%define;desc_aap_enfant(ttt,yyy,ppp,eee)
</tr>
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%foreach;child;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;aaap_enfant("ttt","yyy","ppp","eee","u")
%elseif;(child_cnt = 1)
%apply;aaap_enfant("ttt","yyy","ppp","eee","p")
%elseif;(child_cnt = nb_children)
%apply;aaap_enfant("ttt","yyy","ppp","eee","d")
%else;
%apply;aaap_enfant("ttt","yyy","ppp","eee","n")
%end;
%foreach;child.family;
<tr>
%apply;aaap_enfant_spouse("ttt","yyy","ppp","eee")
</tr>
%end;
</tr>
%end;
%end;
%end;
%define;ap_enfant(ttt,yyy,ppp)
<td width="1"></td>
<td width="1"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="5" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="5"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("yyy" = "p" or "yyy" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("yyy" = "u" or "yyy" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
%if;("ppp" = "u" or "ppp" = "p")<td width="1">%apply;type_wedding()</td>
<td width="1"><font size="-1">%family_cnt;</font></td>%end;
%if;("ppp" = "d" or "ppp" = "n")<td width="1"></td>
<td width="1"></td>%end;
<td width="1" bgcolor="black">|</td>
<td width="5">-</td>
<td width="1"></td>
%apply;individu("13")
%end;
%define;ap_enfant_spouse(ttt,yyy)
<td width="1"></td>
<td width="1"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="5" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="5"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
%if;("yyy" = "p" or "yyy" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("yyy" = "u" or "yyy" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
<td width="1" bgcolor="white">|</td>
<td width="5"></td>
<td width="1"></td>
%apply;spouse("13")
%end;
%define;desc_ap_enfant_detail(ttt,yyy,ppp)
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;aap_enfant("ttt","yyy","ppp","u")
%if;child.has_children;
%apply;desc_aap_enfant("ttt","yyy","ppp","u")
%else;
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%end;
%end;
%elseif;(child_cnt = 1)
%apply;aap_enfant("ttt","yyy","ppp","p")
%if;child.has_children;
%apply;desc_aap_enfant("ttt","yyy","ppp","p")
%else;
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%end;
%end;
%elseif;(child_cnt = nb_children)
%apply;aap_enfant("ttt","yyy","ppp","d")
%if;child.has_children;
%apply;desc_aap_enfant("ttt","yyy","ppp","d")
%else;
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%end;
%end;
%else;
%apply;aap_enfant("ttt","yyy","ppp","n")
%if;child.has_children;
%apply;desc_aap_enfant("ttt","yyy","ppp","n")
%else;
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%end;
%end;
%end;
%end;
%define;desc_ap_enfant(ttt,yyy,ppp)
</tr>
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%foreach;child;
%if;(evar.opt = "datree")
%if;child.is_male;
<tr>
%apply;desc_ap_enfant_detail("ttt","yyy","ppp")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;aap_enfant("ttt","yyy","ppp","u")
%elseif;(child_cnt = 1)
%apply;aap_enfant("ttt","yyy","ppp","p")
%elseif;(child_cnt = nb_children)
%apply;aap_enfant("ttt","yyy","ppp","d")
%else;
%apply;aap_enfant("ttt","yyy","ppp","n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%end;
%end;
</tr>
<!---->
%end;
%elseif;(evar.opt = "dctree")
%if;child.is_female;
<tr>
%apply;desc_ap_enfant_detail("ttt","yyy","ppp")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;aap_enfant("ttt","yyy","ppp","u")
%elseif;(child_cnt = 1)
%apply;aap_enfant("ttt","yyy","ppp","p")
%elseif;(child_cnt = nb_children)
%apply;aap_enfant("ttt","yyy","ppp","d")
%else;
%apply;aap_enfant("ttt","yyy","ppp","n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;aap_enfant_spouse("ttt","yyy","ppp")
</tr>
%end;
%end;
</tr>
<!---->
%end;
%else;
<tr>
%apply;desc_ap_enfant_detail("ttt","yyy","ppp")
</tr>
%end;
%end;
%end;
%end;
%define;p_enfant(ttt,yyy)
<td width="5"></td>
<td width="5"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
%if;("yyy" = "u" or "yyy" = "p")<td width="1">%apply;type_wedding()</td>
<td width="1"><font size="-1">%family_cnt;</font></td>%end;
%if;("yyy" = "d" or "yyy" = "n")<td width="1"></td>
<td width="1"></td>%end;
<td width="1" bgcolor="black">|</td>
<td width="5">-</td>
<td width="1"></td>
%apply;individu("19")
%end;
%define;p_enfant_spouse(ttt)
<td width="5"></td>
<td width="5"></td>
%if;("ttt" = "p" or "ttt" = "n")<td width="1" bgcolor="black">|</td>%end;
%if;("ttt" = "u" or "ttt" = "d")<td width="1"></td>%end;
<td width="5"></td>
<td width="1"></td>
<td></td>
<td width="1"></td>
<td width="1"></td>
<td width="1" bgcolor="white">|</td>
<td width="1"></td>
<td width="1"></td>
%apply;spouse("19")
%end;
%define;desc_p_enfant_detail(ttt,yyy)
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;ap_enfant("ttt","yyy","u")
%if;child.has_children;
%apply;desc_ap_enfant("ttt","yyy","u")
%else;
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%end;
%end;
%elseif;(child_cnt = 1)
%apply;ap_enfant("ttt","yyy","p")
%if;child.has_children;
%apply;desc_ap_enfant("ttt","yyy","p")
%else;
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%end;
%end;
%elseif;(child_cnt = nb_children)
%apply;ap_enfant("ttt","yyy","d")
%if;child.has_children;
%apply;desc_ap_enfant("ttt","yyy","d")
%else;
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%end;
%end;
%else;
%apply;ap_enfant("ttt","yyy","n")
%if;child.has_children;
%apply;desc_ap_enfant("ttt","yyy","n")
%else;
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%end;
%end;
%end;
%end;
%define;desc_p_enfant(ttt,yyy)
</tr>
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%foreach;child;
%if;(evar.opt = "datree")
%if;child.is_male;
<tr>
%apply;desc_p_enfant_detail("ttt","yyy")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;ap_enfant("ttt","yyy","u")
%elseif;(child_cnt = 1)
%apply;ap_enfant("ttt","yyy","p")
%elseif;(child_cnt = nb_children)
%apply;ap_enfant("ttt","yyy","p")
%else;
%apply;ap_enfant("ttt","yyy","n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%end;
%end;
</tr>
<!---->
%end;
%elseif;(evar.opt = "dctree")
%if;child.is_female;
<tr>
%apply;desc_p_enfant_detail("ttt","yyy")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;ap_enfant("ttt","yyy","u")
%elseif;(child_cnt = 1)
%apply;ap_enfant("ttt","yyy","p")
%elseif;(child_cnt = nb_children)
%apply;ap_enfant("ttt","yyy","d")
%else;
%apply;ap_enfant("ttt","yyy","n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;ap_enfant_spouse("ttt","yyy")
</tr>
%end;
%end;
</tr>
<!---->
%end;
%else;
<tr>
%apply;desc_p_enfant_detail("ttt","yyy")
</tr>
%end;
%end;
%end;
%end;
%define;enfant(kkk)
%if;("kkk" = "u" or "kkk" = "p")<td width="5">%apply;type_wedding()</td>
<td width="1"><font size="-1">%family_cnt;</font></td>%end;
%if;("kkk" = "d" or "kkk" = "n")<td width="1"></td>
<td width="1"></td>%end;
<td width="1" bgcolor="black">|</td>
<td width="5">-</td>
<td width="1"></td>
%apply;individu("25")
%end;
%define;enfant_spouse()
<td width="1"></td>
<td width="1"></td>
<td width="1" bgcolor="white">|</td>
<td width="5"></td>
<td width="1"></td>
%apply;spouse("25")
%end;
%define;desc_enfant_detail(ttt)
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;p_enfant("ttt","u")
%if;child.has_children;
%apply;desc_p_enfant("ttt","u")
%else;
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%end;
%end;
%elseif;(child_cnt = 1)
%apply;p_enfant("ttt","p")
%if;child.has_children;
%apply;desc_p_enfant("ttt","p")
%else;
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%end;
%end;
%elseif;(child_cnt = nb_children)
%apply;p_enfant("ttt","d")
%if;child.has_children;
%apply;desc_p_enfant("ttt","d")
%else;
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%end;
%end;
%else;
%apply;p_enfant("ttt","n")
%if;child.has_children;
%apply;desc_p_enfant("ttt","n")
%else;
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%end;
%end;
%end;
%end;
%define;desc_enfant(ttt)
</tr>
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%foreach;child;
%if;(evar.opt = "datree")
%if;child.is_male;
<tr>
%apply;desc_enfant_detail("ttt")
</tr>
<!---->
%else
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;p_enfant("ttt","u")
%elseif;(child_cnt = 1)
%apply;p_enfant("ttt","p")
%elseif;(child_cnt = nb_children)
%apply;p_enfant("ttt","d")
%else;
%apply;p_enfant("ttt","n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%end;
%end;
</tr>
<!---->
%end;
%elseif;(evar.opt = "dctree")
%if;child.is_female;
<tr>
%apply;desc_enfant_detail("ttt")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;p_enfant("ttt","u")
%elseif;(child_cnt = 1)
%apply;p_enfant("ttt","p")
%elseif;(child_cnt = nb_children)
%apply;p_enfant("ttt","d")
%else;
%apply;p_enfant("ttt","n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;p_enfant_spouse("ttt")
</tr>
%end;
%end;
</tr>
<!---->
%end;
%else;
<tr>
%apply;desc_enfant_detail("ttt")
</tr>
%end;
%end;
%end;
%end;
%define;desc_parents_detail(ttt)
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;enfant("u")
%if;child.has_children;
%apply;desc_enfant("u")
%else;
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%end;
%end;
%elseif;(child_cnt = 1)
%apply;enfant("p")
%if;child.has_children;
%apply;desc_enfant("p")
%else;
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%end;
%end;
%elseif;(child_cnt = nb_children)
%apply;enfant("d")
%if;child.has_children;
%apply;desc_enfant("d")
%else;
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%end;
%end;
%else;
%apply;enfant("n")
%if;child.has_children;
%apply;desc_enfant("n")
%else;
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%end;
%end;
%end;
%end;
%define;desc_tree()
<table border="%border;" width="95%%" cellspacing="0" cellpadding="0">
<tr>
<td width="1"></td>
<td width="1"></td>
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="10%%"></td>
<td width="1"></td>
<td width="1"></td>
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="10%%"></td>
<td width="1"></td>
<td width="1"></td>
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="10%%"></td>
<td width="1"></td>
<td width="1"></td>
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="10%%"></td>
<td width="1"></td>
<td width="1"></td>
<td width="1"></td>
<td width="5"></td>
<td width="1"></td>
<td width="50%%"></td>
<td width="10%%"></td>
</tr>
%foreach;child;
%if;(evar.opt = "datree")
%if;child.is_male;
<tr>
%apply;desc_parents_detail("ttt")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;enfant("u")
%elseif;(child_cnt = 1)
%apply;enfant("p")
%elseif;(child_cnt = nb_children)
%apply;enfant("d")
%else;
%apply;enfant("n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%end;
%end;
</tr>
<!---->
%end;
%elseif;(evar.opt = "dctree")
%if;child.is_female;
<tr>
%apply;desc_parents_detail("ttt")
</tr>
<!---->
%else;
%apply;tr_color()
%if;(child_cnt = 1 and child_cnt = nb_children)
%apply;enfant("u")
%elseif;(child_cnt = 1)
%apply;enfant("p")
%elseif;(child_cnt = nb_children)
%apply;enfant("d")
%else;
%apply;enfant("n")
%end;
%if;child.has_children;
%foreach;child.family;
<tr>
%apply;enfant_spouse()
</tr>
%end;
%end;
</tr>
<!---->
%end;
%else;
<tr>
%apply;desc_parents_detail("ttt")
</tr>
%end;
%end;
</table>
%end;
%define;entete()
<a name="[dtree]"></a>
%apply;top()
<hr>
<dl>
%if;(evar.opt = "datree")
<!-- descendance agnatique -->
%if;not cancel_links;
<table border="%border;" align="right"><tr><td align="right">
<a href="%prefix;%self.access;#[dtree]"><img src="%image_prefix;/d.png" width="18" height="18"%sp; border="0" alt="[descendants]"></a>
<a href="%prefix;%self.access;;opt=dctree;#[dtree]"><img src="%image_prefix;/c.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]1"></a>
</td></tr></table>
%end;
<h3 class="highlight">[*agnatic descendants/cognatic descendants]0</h3>
%elseif;(evar.opt = "dctree")
<!-- descendance cognatique -->
%if;not cancel_links;
<table border="%border;" align="right"><tr><td align="right">
<a href="%prefix;%self.access;#[dtree]"><img src="%image_prefix;/d.png" width="18" height="18"%sp; border="0" alt="[descendants]"></a>
<a href="%prefix;%self.access;;opt=datree;#[dtree]"><img src="%image_prefix;/a.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]0"></a>
</td></tr></table>
%end;
<h3 class="highlight">[*agnatic descendants/cognatic descendants]1</h3>
%else;
<!-- descendance complète -->
%if;not cancel_links;
<table border="%border;" align="right"><tr><td align="right">
<a href="%prefix;%self.access;;opt=datree;#[dtree]"><img src="%image_prefix;/a.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]0"></a>
<a href="%prefix;%self.access;;opt=dctree;#[dtree]"><img src="%image_prefix;/c.png" width="18" height="18"%sp; border="0" alt="[agnatic descendants/cognatic descendants]1"></a>
</td></tr></table>
%end;
<h3 class="highlight">[*descendants]</h3>
%end;
%end;
%if;(has_families and has_children)
<div class="saut_avant">
%apply;entete()
<dt>
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
<img src="%image_prefix;/1pixel.png">
%apply;image_sex("self","")
%apply;picture_ind("self","")
%apply;display_sosa_link("self","")
%self;%self.title;%self.dates;
%if;has_parents;
<a href="#[tree]"><img src="%image_prefix;/plus.png"%wid_hei;plus.png; border="0" alt="[ancestors]"%/></a>
%end;
%foreach;family;
<dt>
<table border="%border;" style="width:90%%" cellspacing="0" cellpadding="0"><tr><td align="left">
%apply;type_wedding()<font size="-1">%family_cnt;.</font>
%if(family.marriage_date.year != "")<font size="-1">(%family.marriage_date.year;)</font>%end;
%apply;image_sex("spouse","")
%apply;picture_ind("spouse","")
%apply;display_sosa_link("spouse","")
%apply;access_ind("spouse")
%if;has_children;
</td></tr></table>
<dd>%apply;desc_tree()
%end;
</td></tr></table>
%end;
</dl>
</div>
%end;
<!-- fin descendants sur 5 générations -->
<!-- ************************************************************************************************************* -->
%if;(evar.opt = "misc")%misc_names;<p>%end;
<td>
<form method=GET action="%prefix">
<p align="center">
<input type=hidden name=pz value="Falko">
<input type=hidden name=nz value="Trojahn">
<input type=hidden name=ocz value="0">
<input type=hidden name=m value=NG>
<input name=n size=30 maxlength=200>
<input type=submit value="Suchen">
</form>
</td>
<div><a href="%prefix;"><img src="%image_prefix;/gwlogo.png" alt="..." width="64" height="72" style="border:0;float:%right;"%/></a><br%/>
</div>
%copyright;
%base_trailer;
</body>
</html>