SHOW:
|
|
- or go back to the newest paste.
1 | import geometry; | |
2 | import patterns; | |
3 | import markers ; | |
4 | //import graph; | |
5 | //import three; | |
6 | defaultpen(fontsize(11pt)); | |
7 | dotfactor=5; | |
8 | //labelmargin=0.25; | |
9 | - | add ("hatch",hatch (1.2mm , black )); |
9 | + | |
10 | point A,B,C,E1,L,O,K; | |
11 | - | point A,B,C,A1,B1,C1; |
11 | + | A=(0,0); C = 5*dir(0); B=3.5*dir(74); |
12 | - | C=(0,0); A = 3*dir(0); |
12 | + | line AB=line(A,B); line AC = line(A,C); |
13 | - | B=2.5*dir(60); |
13 | + | line BC=line(B,C); |
14 | - | A1 = C + 1/3*(B-C); |
14 | + | line l1 = bisector(AB,AC); |
15 | - | B1 = A + 1/3*(C-A); |
15 | + | line l2 = bisector(AB,BC); |
16 | - | C1= B + 1/3*(A-B); |
16 | + | |
17 | E1 = intersectionpoint(l1,BC); | |
18 | L = intersectionpoint(l2,AC); | |
19 | - | dot(C); dot(A); dot(B); |
19 | + | O = intersectionpoint(l1,l2); |
20 | - | dot(A1); dot(B1); dot(C1); |
20 | + | K = projection(A,L)*B; |
21 | draw(A--C--B--cycle,black+1bp); draw(A--E1); | |
22 | - | draw(C--A--B--cycle); |
22 | + | draw(B--L); draw(B--K); |
23 | - | draw(A1--C1--B1--cycle); |
23 | + | draw(A--L, white+opacity(0), StickIntervalMarker(2, 1, size=0.15cm)); |
24 | ||
25 | - | filldraw(A1--C1--B1--cycle,pattern ("hatch")); |
25 | + | dot(A,black+4bp); dot(A,white+3bp); |
26 | dot(B,black+4bp); dot(B,white+3bp); | |
27 | dot(C,black+4bp); dot(C,white+3bp); | |
28 | - | label("$C$",C,SW); label("$A$",A,SE); label("$B$",B,N); |
28 | + | dot(E1,black+4bp); dot(E1,white+3bp); |
29 | - | label("$A_1$",A1,W); label("$B_1$",B1,S); label("$C_1$",C1,E); |
29 | + | dot(L,black+4bp); dot(L,white+3bp); |
30 | dot(O,black+4bp); dot(O,white+3bp); | |
31 | dot(K,black+4bp); dot(K,white+3bp); | |
32 | ||
33 | markangle(1,radius=0.5cm,C,A,E1); | |
34 | markangle(1,radius=0.6cm,E1,A,B); | |
35 | markangle(2,radius=0.6cm,A,B,L); | |
36 | markangle(2,radius=0.4cm,L,B,C); | |
37 | markrightangle(size=0.25cm, B,K,A); | |
38 | ||
39 | label("$A$",A,SW); label("$C$",C,SE); label("$B$",B,N); | |
40 | label("$E$",E1,NE); label("$L$",L,S); label("$O$",O,1.1W); | |
41 | label("$K$",K,NE); | |
42 | label("$3a$",A--L,S); label("$b$",L--C,S); | |
43 | label("$6a$",A--B,W); label("$4a$",B--O,E); label("$2a$",O--L,E); | |
44 | label("$2b$",E1--C,2E); |