File: tarai.tex

package info (click to toggle)
texlive-extra 2014.20141024-1
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 2,016,484 kB
  • ctags: 21,582
  • sloc: perl: 140,144; python: 16,926; makefile: 12,969; sh: 9,285; ansic: 3,415; java: 3,090; csh: 2,987; xml: 1,050; lisp: 630; ruby: 487; lex: 358; tcl: 142; sed: 36; pascal: 25; cpp: 18; awk: 10; haskell: 5
file content (14 lines) | stat: -rw-r--r-- 331 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
\documentclass{article}
\directlua{
  function tarai(x,y,z)
    if(x<=y) then
      return y
    else
      return tarai(tarai(x-1, y, z), tarai(y-1, z, x), tarai(z-1, x, y))
    end
  end
}
\newcommand\tarai[3]{\directlua{tex.print(tarai(#1, #2, #3))}}
\begin{document}
$\mathrm{Tarai}(14,10,6) = \tarai{14}{10}{6}$
\end{document}