James, How about this.
BL:=87; z0=origin; z1=(5,0); z4=dir(BL); % Intermediate point z3=10/y4*z4; z2=z3+z1; or alternatively without having to define z4 BL:=87; z0=origin; z1=(5,0); z3=10/(ypart dir(BL))*dir(BL); z2=z3+z1; ___________________________________________________________________________________ If your question is of interest to others as well, please add an entry to the Wiki! maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context webpage : http://www.pragma-ade.nl / http://tex.aanhet.net archive : http://foundry.supelec.fr/projects/contextrev/ wiki : http://contextgarden.net ___________________________________________________________________________________