Advertisement
cpierquet

xintlagrange

May 27th, 2025
936
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Latex 0.81 KB | None | 0 0
  1. \documentclass{article}
  2. \usepackage{xintexpr,pgffor,listofitems}
  3.  
  4. \NewDocumentCommand\CreerPolynomeLagrange{ m }{%
  5.     \setsepchar{§/,}%
  6.     \readlist*\lagrangepoints{#1}%
  7.     0%
  8.     \foreach \i in {1,...,\lagrangepointslen}{%
  9.         +\lagrangepoints[\i,2]%
  10.         \foreach \j in {1,...,\lagrangepointslen}{%
  11.             \xintifboolexpr{\i == \j}%
  12.             {}%
  13.             {*(x-(\lagrangepoints[\j,1]))/((\lagrangepoints[\i,1])-(\lagrangepoints[\j,1]))}%
  14.         }%
  15.     }%
  16. }
  17.  
  18. \begin{document}
  19.  
  20. \CreerPolynomeLagrange{1,2§3,4§10,1} %l'affichage semble ok
  21.  
  22. \CreerPolynomeLagrange{1,2§3,4§6,-3§10,2} %idem
  23.  
  24. %\xintdeffloatfunc test(x) := \CreerPolynomeLagrange{1,2§3,4§10,1};  %ne veut rien savoir, j'ai essayé de stocker le résultat de \CreerPolynomeLagrange dans une macro et de faire \xintdeffloatfunc test(x) := \mymacro; mais idem...
  25.  
  26. \end{document}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement