summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/featpost/example/quartertorus.mp
blob: b979b7f26f1831623b9aa0dd0159faf083c6028c (plain)
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
% quartertorus.mp
% L. Nobre G.
% 2006

input featpost3Dplus2D;

verbatimtex
\documentclass{article} 
\usepackage{mathpazo} 
\begin{document} 
etex

f := (3,5,2.5);

beginfig(1);
  color a, b, c, g;
  numeric fac, siz;
  fac = 0.05;
  siz = 0.3;
  g = -green;
  a = blue-red;
  b = g-fac*a;
  c = -a-fac*g;
  drawoptions( withpen pencircle scaled 2.5pt );
  quartertorus( black, g, a, siz );
  quartertorus( black, b, c, siz );
  quartertorus( black, green, -red, siz );
  quartertorus( -0.7*blue, blue, 0.6red+green, siz );
  label( btex $\vec{\Upsilon}$ etex, rp( c ) );
endfig;

verbatimtex 
\end{document} 
etex

end.