1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
\RequirePackage{luatex85} % old definitions of PDF primitives, need for lualatex, xelatex ignores it
\documentclass{article}
\usepackage[russian]{babel}
\usepackage[arrow,graph]{xy}
\usepackage[margin=2cm]{geometry}
\usepackage{fontspec}
\setmainfont{CMU Serif}
\nofiles
\everymath={\rm}
\let\к=\textit
\let\ж=\textbf
\let\мж=\mathbf
\newdimen\sH
\def\tsH#1{\setbox0=\txt{#1}\global\sH=\wd0\POS *!L{\copy0}}
\title{Классификация жизненных форм}
\author{}
\date{}
\begin{document}
\maketitle
\thispagestyle{empty}
\begin{center}
\shorthandoff{"}
\xygraph{%
*!R\txt{Организмы}="A"
(:[rr]*!L\txt{Эндотрофные, E})
:[uurr]!{\tsH{Омнитрофные}}[r/.8\sH/]
(:[urrr(.5)]*!L\txt{Двумерно, O$_2$})
:[drrr(.5)]*!L\txt{Трехмерно, O$_3$}
"A"
:[drr]!{\tsH{Экзотрофные}}[r/.8\sH/]="B"
((:[urr]!{\tsH{Активные}}[r/.7\sH/]
(:[urrr(.5)]*!L\txt{Нападающие, A$_n$})
(:[drrr(.5)]*!L\txt{Охотящиеся, A$_o$}))
(:[rr]*!L\txt{Растущие, R}))
"B"
(:[drr]*!L\txt{Седативные, S})
:[ddrr]!{\tsH{Пропускающие}}[r/.8\sH/]
(:[urrr(.7)]*+!L\txt{Неподвижно\\ фильтрующие,\\ F$_n$})
:[drrr(.7)]*+!L\txt{Подвижно\\ фильтрующие,\\ F$_p$}
}
\shorthandon{"}
\end{center}
{\parindent0pt\obeylines
Примеры:
\к{Centroheliozoa} --- A$_n$, R, \ж{F$_\мж{p}$}
\к{Echinodermata} --- S, \ж{A$_\мж{n}$}, F$_p$
\к{Spermatophyta} --- \ж{O$_\мж{2}$}, R, E, S
\к{Eumycota} --- \ж{R}, E, S
\к{Chlorophyta} --- F$_n$, A$_o$, \ж{O$_\мж{1}$}, O$_2$
\к{Scolecida} --- E, M$_2$, \ж{A$_\мж{n}$}, F$_n$
}
\end{document}
|
