picture p;
p := btex test etex;
beginfig(1)
label(p,origin);
endfig
end.