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
|
/* -*-ePiX-*- */
#include "epix.h"
using namespace ePiX;
double dx(0.5), dy(0.05), sc(0.8);
void veloc(const P& loc, const P& off,
const std::string& msg, epix_label_posn A)
{
arrow(loc, loc + P(0.5*dx,0));
label(loc, off, msg, A);
}
int main()
{
picture(P(0,0), P(1.5,1), "2.4 x 1.6in");
begin();
bold();
arrow_inset(0.5);
arrow_ratio(2);
arrow_width(2);
P O1(0,0), O2(dx, dy),
pX1(xmax(), 0), pX2(xmax(), dy),
pY1(sc*dx, sc*dx), pY2(O2 + pY1),
pZ1(0,ymax()), pZ2(O2 + pZ1);
line(O1, pX1);
line(O1, pY1);
line(O1, pZ1);
line(O2, pX2);
line(O2, pY2);
line(O2, pZ2);
veloc(O2 + P(3*dy, dy), P(6,2), "$v$", tr);
veloc(pY2 + P( 0, -dy), P(2,-4), "$v$", br);
veloc(pZ2 + P(dy, -dy), P(2,-4), "$v$", br);
label(O1, P(0,-4), "$K$", b);
label(O2 - P(0, dy), P(0,-4), "$K'$", b);
label(pX1, P(2,-2), "$x$", br);
label(pX2, P(2, 2), "$x'$", tr);
label(pY1, P(-2, 2), "$y$", tl);
label(pY2, P(-2, 2), "$y'$", tl);
label(pZ1, P(0, 2), "$z$", t);
label(pZ2, P(0, 2), "$z'$", t);
tikz_format();
end();
}
|
