// import geometry_dev; // extension devenue l'extension geometry officielle
import geometry;        // le 12/05/09, dans la version 1.71 d'asymptote. :-))
size(7cm,0);
// On définit un stylo,
pen p=.8bp+blue;
// ... un second repère
coordsys R=cartesiansystem((1,2),i=(1,0),j=(-1,1));
// On affiche les deux repères.
show(currentcoordsys);
show(Label("$O'$",p), 
	 Label("$\vec{u}$",p), Label("$\vec{v}$",p), 
	 R, ipen=p);
// Point A(2,1) dans le repère par défaut, en rouge
pair A=(2,1);
dot("", A, SW, red);
// et B le couple de coordonnées de A dans le repère R
point B=point(R, A/R);
dot("", B, NE, p);