blob: ebe30e5ca1dd5ee9b3a29edc47e03b85b55769f8 (
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
|
% --- start of displayed preamble in the book ---
input metaobj
% Circles produced as before
% --- end of displayed preamble in the book ---
newCircle.a(btex start etex);
newCircle.b(btex end etex);
a.c=origin;
b.c-a.c=(1.5cm,1cm);
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
ncarcbox(a)(b) "arcangleA(-30)",
"linecolor(blue)","linewidth(1pt)",
"nodesepA(5mm)","nodesepB(5mm)",
"boxsize(1cm)";
ncarc(a)(b)
"arcangleA(-30)", "arcangleB(-30)",
"linestyle(dashed evenly)";
drawObj(a,b);
endfig;
end;
|