\startMPinclusions
   fontmapfile "=lm-ec.map";
\stopMPinclusions

\startuniqueMPgraphic{Dcaron}
   path p[];
   picture q;

   q:= glyph "Dcaron" of "ec-lmr10" scaled .2;
   i:= 1;
   for item within q:
       p[i] := pathpart item;
       i:= i+1;
   endfor

   draw_arrow_path(p1);
   draw_arrow_path(p2);
   draw_arrow_path(p3);

   passarrayvariable("Dcaron",p,1,3,1);
   setbounds currentpicture to boundingbox q;
\stopuniqueMPgraphic


\starttext
\ctxlua{metapost.showlog = true}
\uniqueMPgraphic{Dcaron}
\ctxlua{inspect(metapost.variables[Dcaron])}
\stoptext