LaTeX-examples/documents/Programmierparadigmen/scripts/haskell/fakultaet-akkumulator.hs

mirror of https://github.com/MartinThoma/LaTeX-examples.git synced 2025-04-25 14:28:05 +02:00
fakAcc n acc = if (n==0) 
               then acc 
               else fakAcc (n-1) (n*acc)
fak n = fakAcc n 1
SW 2014-02-02 13:49:19 +01:00			`fakAcc n acc = if (n==0)`
			`then acc`
			`else fakAcc (n-1) (n*acc)`
Haskell angefangen 2014-02-01 15:32:13 +01:00			`fak n = fakAcc n 1`