diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/tkz-elements/tkz_elements_triangle.lua')
-rw-r--r-- | Master/texmf-dist/tex/latex/tkz-elements/tkz_elements_triangle.lua | 49 |
1 files changed, 36 insertions, 13 deletions
diff --git a/Master/texmf-dist/tex/latex/tkz-elements/tkz_elements_triangle.lua b/Master/texmf-dist/tex/latex/tkz-elements/tkz_elements_triangle.lua index c6dd2c37573..84b10273dad 100644 --- a/Master/texmf-dist/tex/latex/tkz-elements/tkz_elements_triangle.lua +++ b/Master/texmf-dist/tex/latex/tkz-elements/tkz_elements_triangle.lua @@ -1,6 +1,6 @@ -- tkz_elements_triangles.lua --- date 2024/04/27 --- version 2.25c +-- date 2024/07/16 +-- version 2.30c -- Copyright 2024 Alain Matthes -- This work may be distributed and/or modified under the -- conditions of the LaTeX Project Public License, either version 1.3 @@ -57,19 +57,19 @@ end -- points -- ----------------------- function triangle: trilinear (a,b,c) - return barycenter_ ( {self.pa,a*self.a },{self.pb,b*self.b},{self.pc,c*self.c} ) + return barycenter_ ({self.pa,a*self.a},{self.pb,b*self.b},{self.pc,c*self.c}) end function triangle: barycentric (a,b,c) - return barycenter_ ( {self.pa,a },{self.pb,b},{self.pc,c} ) + return barycenter_ ({self.pa,a},{self.pb,b},{self.pc,c}) end function triangle: bevan_point () - return circum_center_ ( self : excentral_tr()) + return circum_center_ ( excentral_tr_ ( self.pa , self.pb , self.pc)) end function triangle: mittenpunkt_point () - return lemoine_point_ ( self : excentral_tr()) + return lemoine_point_ ( excentral_tr_ ( self.pa , self.pb , self.pc)) end function triangle: gergonne_point () @@ -322,13 +322,20 @@ function triangle : cevian_circle (p) pta,ptb,ptc = cevian_ (self.pa,self.pb,self.pc,p) return circle : new (circum_circle_ (pta,ptb,ptc),pta) end + +function triangle : symmedial_circle () + local pta,ptb,ptc,p + p = lemoine_point_ ( self.pa , self.pb , self.pc) + pta,ptb,ptc = cevian_ (self.pa,self.pb,self.pc,p) + return circle : new (circum_circle_ (pta,ptb,ptc),pta) +end - function triangle : conway_circle () - local i,t - i = in_center_ (self.pa,self.pb,self.pc) - t = report_ (self.pb,self.pa,length(self.pb,self.pc),self.pa) - return circle : new (i,t) - end +function triangle : conway_circle () + local i,t + i = in_center_ (self.pa,self.pb,self.pc) + t = report_ (self.pb,self.pa,length(self.pb,self.pc),self.pa) + return circle : new (i,t) +end function triangle : pedal_circle (pt) local x,y,z,c @@ -338,7 +345,13 @@ function triangle : pedal_circle (pt) c = circum_center_ (x,y,z) return circle : new (c,x) end - + +function triangle: bevan_circle () + local o,r,s,t + o = circum_center_ ( excentral_tr_ ( self.pa , self.pb , self.pc)) + r,s,t = excentral_tr_ ( self.pa , self.pb , self.pc) +return circle : new (o, r) +end ------------------- -- Result -> triangle ------------------- @@ -392,6 +405,12 @@ function triangle: symmedian () return triangle : new (cevian_ (self.pa,self.pb,self.pc,p)) end +function triangle: symmedial () + local p + p = lemoine_point_ ( self.pa , self.pb , self.pc) + return triangle : new (cevian_ (self.pa,self.pb,self.pc,p)) +end + function triangle: euler () return triangle : new (euler_points_ (self.pa,self.pb,self.pc) ) end @@ -403,6 +422,10 @@ function triangle: pedal (pt) z = projection_ (self.pa,self.pb,pt) return triangle : new (x,y,z) end + +function triangle: similar () + return triangle : new (similar_ (self.pa,self.pb,self.pc) ) +end ------------------- -- Result -> ellipse ------------------- |