Asmyptote study 5

 1 import graph;
 2 size(5cm, 0);
 3 
 4 currentpen = linewidth(.8bp);
 5 
 6 real f(real a) { return a^2; }
 7 
 8 pair[] pp = { (-1,f(-1)), (0,f(0)), (1,f(1))};
 9 
10 // dotfactor = 7; // 定义 dot 大小，只在未定义 currentpen 时有效
11 dot(pp[1], UnFill); // 标记点 pp[1]，空心点
12 
13 path g = graph(pp, operator ..);  // 将 pair[] pp 用 .. 连接
14 draw(g);
15 
16 pair p=dir(g, 1);  // path g 第 1 点(从0计数)处向量
17 draw("dir(g, 1)", pp[1] -- pp[1]+p, red, Arrow); // 画出上面的向量
18 
19 arrow("path g", pp[0], NE, .8cm, blue);  // 指示箭头
20 arrow("pair p[1]", pp[1], N, .8cm, blue);