单相相变的内向法向量

Question

如果有人知道乳胶中的这段代码，请与我分享，这将会很有帮助。

Answer 1

对于向内的法向量，渐近线似乎是一个不错的方法。从用户选择的一组点开始，我们创建一个循环路径；然后time沿着该路径使用用户选择的 s，最后绘制它们的向内法向量。

% https://www.overleaf.com/read/fxbmsmmdfthx
\documentclass{article}
\usepackage{asymptote}
\title{Inward normal vectors}
\begin{document}
\begin{asy}
// can Run on http://asymptote.ualberta.ca/
unitsize(2cm);
pair[] P={(0,0),(-1,1),(-.5,1.75),(0,1.5),(2.5,1.75),(2,0),(1,.25),(1.5,-2),(0,-2.25),(-.5,-2)};
guide g=operator..(...P)..cycle;
filldraw(g,cyan+opacity(.3),deepcyan+1pt);
label("$\theta\equiv 0$",(1.8,1));
real[] times=new real[] {.2,2.7,3.3,4,4.5,5.3,6,6.4,7.5,8.6,9.5};
for (real t : times) {
pair M=point(g,t);
pair Mt=.4*dir(g,t);
pair Mn=rotate(-90)*Mt;
draw("$\vec{n}$",M--M+Mn,Arrow);
}
\end{asy}
\end{document}