/* un triangle, ses hauteurs et l'orthocentre */

import math;
size(6cm,0);
// Tracé du triangle
pair A=0, B=(3,1), C=(1.5,3);
path p=A--B--C--cycle;
draw(p);
// On va définir D[0],D[1],D[2] trois points des hauteurs issues
// respectivement de A, B et C
pair[] D=new pair[2]; 
// Tracé des hauteurs, avec une boucle cette fois
for (int i = 0; i <= 2; ++i)
{
D[i]=point(p,i)+dir(90+degrees(point(p,i+1)-point(p,i+2),false));
drawline(point(p,i),D[i],1bp+green+dashed);
}
// Construction de l'orthocentre
pair H=extension(A,D[0],B,D[1]);
dot(H,blue);