Advertisement
sutasuu

H2_Pic1

Sep 16th, 2024 (edited)
24
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Asymptote 0.97 KB | Source Code | 0 0
  1. import geometry;
  2.  
  3. size(9cm, 0);
  4. defaultpen(fontsize(10pt));
  5. dotfactor = 6;
  6. point K,L,M,Np, B, H,A,A1;
  7. K=origin; L=4*dir(88); Np=3*dir(0); M=L+0.8*Np;
  8. B=(M+Np)/2;
  9. H=intersectionpoint(line(L,M), line(K,B));
  10. line d=parallel(M, line(K,H));
  11. A=intersectionpoint(line(L,B), d);
  12. A1=intersectionpoint(line(L,K), d);
  13.  
  14. markangle(radius=0.3cm, n=2, M,Np,K);
  15. markangle(radius=0.3cm, n=2, Np,M,H);
  16. markangle(radius=0.3cm, n=1, K,B,Np);
  17. markangle(radius=0.3cm, n=1, H,B,M);
  18.  
  19. draw(K--B^^B--H,white+opacity(0), StickIntervalMarker(1, 3, size=0.15cm));
  20. draw(Np--B^^B--M, white+opacity(0), StickIntervalMarker(1, 2, size=0.15cm));
  21. draw(A1--A^^A--M, white+opacity(0), StickIntervalMarker(1, 1, size=0.15cm));
  22.  
  23. draw(M--H^^K--H^^L--B^^A1--M);
  24. draw(K--L--M--Np--cycle, black+1.5pt);
  25.  
  26. dot(K^^L^^M^^Np^^H^^B^^A^^A1);
  27. label("$K$", K, S);
  28. label("$\alpha$", L, N);
  29. label("$5$", M, N);
  30. label("$\alpha$", Np, S);
  31. label("$7$", H, N);
  32. label("$8$", B, SE);
  33. label("$5$", A, S);
  34. label("$15$", A1, W);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement