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
|
\documentclass[border=1mm]{standalone}
\usepackage{luatex85}
\usepackage{luamplib}
\usepackage{dwmpcode}
\mplibtextextlabel{enable}
\begin{document}
\hbox to 5.3in{$\vcenter{%
\begin{mplibcode}
beginfig(1);
z1 = (10, 50);
z2 = (80, 190);
z3 = (0, 170);
z4 = (60, 10);
draw z1--z2;
draw z3--z4;
z0 = alpha [z1, z2] = beta [z3, z4];
forsuffixes @=0,1,2,3,4:
dotlabel.rt("$z_" & decimal @ & "$", z@)
withcolor 2/3 if @=0: red else: blue fi;
endfor
%label.urt(decimal alpha, (x2, y0));
%label.lrt(decimal beta, (x2, y0));
endfig;
\end{mplibcode}}
\qquad\vcenter{
\begin{code}
beginfig(1);
z1 = (10, 50);
z2 = (80, 190);
z3 = (0, 170);
z4 = (60, 10);
z0 = whatever [z1, z2] = whatever [z3, z4];
draw z1--z2;
draw z3--z4;
forsuffixes @=0,1,2,3,4:
dotlabel.rt("$z_" & decimal @ & "$", z@)
withcolor 2/3 if @=0: red else: blue fi;
endfor
endfig;
\end{code}}$\hss}
\end{document}
|