Asymptote/Command/metapost/cutafter

beginfig(1)

   pair A, B, C;
   A:=(0,0); B:=(1cm,0); C:=(0,1cm);
   draw A--B--C;
 

endfig;