input geometriesyr12;
figure(0,0,6u,8u);
pair A,B,E,T,I,J,R,V;
V=u*(0.75,0.75);
T-V=u*(3,0);
R-T=u*(0,5);
E-R=V-T;
A=1/3[V,E];
B=1/3[V,T];
I=iso(E,R);
J=iso(T,R);
trace hachurage(I--E--A--B--T--J--cycle,150,0.25,0) withcolor gris;
trace V--E--R--T--cycle;
trace A--B;
trace I--J;
trace E--T;
trace codesegments(T,J,J,R,2);
trace codesegments(R,I,I,E,4);
trace cotationmil(V,A,2mm,10,btex 1,6 etex);
trace cotationmil(V,T,-5mm,10,btex 3 etex);
trace cotationmil(T,R,-7mm,10,btex 4,8 etex);
nomme.llft(V);
nomme.bot(B);
nomme.lrt(T);
nomme.rt(J);
nomme.urt(R);
nomme.top(I);
nomme.ulft(E);
nomme.ulft(A);
fin;
figure(0,0,6.5u,5u);
pair A,B,C,I,J;
A=u*(0.75,0.75);
B-A=u*(5,0);
C=4.9/7[A,B];
I=u*(4,3);
J=4.9/7[A,I];
trace triangle(A,B,I);
trace J--C;
nomme.llft(A);
nomme.lrt(B);
nomme.bot(C);
nomme.top(I);
nomme.top(J);
fin;
end