%let;prefix_a;%prefix_base_password;p=%evar.p;;n=%evar.n;%in; %(%access does not work %) %if;not cancel_links; %if;(evar.m="A") %if;(evar.slices = "on")

%nn; [*display by slices/slice width/overlap/total width]0%nn;

%hidden; %foreach;env_binding; %if;(env.key != "slices") %end; %end;

[*don't group the common branches together]

[*display by slices/slice width/overlap/total width]1

[*display by slices/slice width/overlap/total width]2

[*display by slices/slice width/overlap/total width]3 (%dag.min_wid;-%dag.max_wid;)

%else; %if;(evar.notab != "on") %end; %end;

---

%( to adjust vertical positionning (no menubar %) %let;evarv;%if;(evar.v!="")%evar.v;%else;3%end;%in; %let;maxlev;%apply;min%with; %if;(bvar.max_anc_tree!="")%bvar.max_anc_tree;%else;120%end;%and; %if;(bvar.max_anc_level!="")%bvar.max_anc_level;%else;120%end;%and; %expr(static_max_anc_level)%end;%in; %let;maxv;%if;(maxlev<10 or maxlev=evarv+5 and evarv>5)%expr(evarv+5) %else;10%end;%in; %let;minv;%if;(maxlev>9 and maxlev9 and evarv>5)%expr(evarv-4) %else;1%end;%in; %(minv %minv; < evarv %evarv; < maxv %maxv; (maxlev %maxlev;)%)

%if;(evar.t = "A")[*male line/female line]0%nn; %elseif;(evar.t = "C")[*male line/female line]1%nn; %else[*ascendants tree]%end;

%if;(maxlev>9 and evarv>5)  -⁵  - %end; %for;i;minv;maxv; %i; %end; %if;(maxlev>9 and maxlev-evarv>=5)  +  +⁵ %end;

%if;(evarv>1)

A C T

%end;

%if;(evarv>1 and evar.t="T")

%end;

%elseif;(evar.m="RLM" or evar.m="DAG")

[*multi relations graph]

%if;("v7," in bvar.plugins) %else; %end;

%else;

[*tree]

%end; %( evar.m="A" %) %end; %( if not cancel_links %) %if;(evar.slices!="on") %if;(link_next!="" and evar.cgl!="on")

%if;(evar.i!="") %let;l_o;&ei=%evar.i;&i=%evar.ei;%nn; %if;(evar.image!="")&image=%evar.image;%end;%nn; %if;(evar.spouse!="")&spouse=%evar.spouse;%end;%nn; %if;(evar.bd!="")&bd=%evar.bd;%end;%nn; %if;(evar.color!="")&color=%evar.color;%end;%nn; %in; [*relationship link/relationship links]1 [*relationship by marriage] %end; %if;(evar.spouse!="on")%end;

%end; %if;(evar.notab = "on" or evar.pos2 != "") %let;dpos;%if;(evar.dpos != "")%evar.dpos;%else;78%end;%in; %let;pos1;%if;(evar.pos1 != "")%evar.pos1;%else;0%end;%in; %let;pos2;%if;(evar.pos2 != "")%evar.pos2;%else;%dpos;%end;%in; %let;overlap;%if;(evar.overlap != "")%evar.overlap;%else;10%end;%in; %if;(pos1 != 0 or pos2 < dag.ncol)

%if;(pos1 = 0) %nn; %else; << %end;%nl %if;(pos2 >= dag.ncol) %nn; %else; >> %end;%nl;

%end;

    %foreach;dag_line;
      %foreach;dag_line_pre;
        %foreach;dag_cell_pre;
          %dag_cell_pre;%nn;
        %end;%nl;
      %end;
    %end;
    

%else;

%foreach;dag_line; %foreach;dag_cell; %end; %end; %nn; %if;dag_cell.is_nothing; %nn; %elseif;dag_cell.is_bar; %if;(dag_cell.bar_link != "" and evar.cgl != "on") |%nn; %else;|%end; %elseif;(dag_cell.item != "")%dag_cell.item; %elseif;(dag_cell.text != "")%dag_cell.text; %else; %if;dag_cell.is_hr_left; %nn; %elseif;dag_cell.is_hr_right; %nn; %else; %nn; %end; %end;

%end; %end; %include;trl %include;copyr