diff options
Diffstat (limited to 'macros/latex/contrib/tkz/tkz-elements/latex/tkz_elements_functions_lines.lua')
-rw-r--r-- | macros/latex/contrib/tkz/tkz-elements/latex/tkz_elements_functions_lines.lua | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/macros/latex/contrib/tkz/tkz-elements/latex/tkz_elements_functions_lines.lua b/macros/latex/contrib/tkz/tkz-elements/latex/tkz_elements_functions_lines.lua index 642d048809..c9d840d89c 100644 --- a/macros/latex/contrib/tkz/tkz-elements/latex/tkz_elements_functions_lines.lua +++ b/macros/latex/contrib/tkz/tkz-elements/latex/tkz_elements_functions_lines.lua @@ -1,6 +1,6 @@ -- tkz_elements_functions_lines.lua --- date 2024/01/16 --- version 1.82c +-- date 2024/02/04 +-- version 2.00c -- 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 @@ -28,9 +28,7 @@ function ll_from_ ( p , a , b ) end function slope_ (a,b) - local z = b - a - angle = point.arg(z) - return angle + return angle_normalize_ (point.arg(b-a)) end function gold_segment_ (a,b) @@ -132,10 +130,9 @@ function square_ (a,b) end function in_segment_ (a,b,pt) - local sc,epsilon - epsilon = 10^(-12) + local sc sc = point.mod (pt-a) + point.mod (pt-b) - point.mod(b-a) - if sc <= epsilon + if sc <= tkz_epsilon then return true else |