Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
10
Task/Factorial/FunL/factorial-1.funl
Normal file
10
Task/Factorial/FunL/factorial-1.funl
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
def factorial( n ) =
|
||||
if n < 0
|
||||
error( 'factorial: n should be non-negative' )
|
||||
else
|
||||
res = 1
|
||||
|
||||
for i <- 2..n
|
||||
res *= i
|
||||
|
||||
res
|
||||
5
Task/Factorial/FunL/factorial-2.funl
Normal file
5
Task/Factorial/FunL/factorial-2.funl
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
def
|
||||
factorial( (0|1) ) = 1
|
||||
factorial( n )
|
||||
| n > 0 = n*factorial( n - 1 )
|
||||
| otherwise = error( 'factorial: n should be non-negative' )
|
||||
8
Task/Factorial/FunL/factorial-3.funl
Normal file
8
Task/Factorial/FunL/factorial-3.funl
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
def factorial( n )
|
||||
| n >= 0 =
|
||||
def
|
||||
fact( acc, 0 ) = acc
|
||||
fact( acc, n ) = fact( acc*n, n - 1 )
|
||||
|
||||
fact( 1, n )
|
||||
| otherwise = error( 'factorial: n should be non-negative' )
|
||||
3
Task/Factorial/FunL/factorial-4.funl
Normal file
3
Task/Factorial/FunL/factorial-4.funl
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
def factorial( n )
|
||||
| n >= 0 = product( 1..n )
|
||||
| otherwise = error( 'factorial: n should be non-negative' )
|
||||
Loading…
Add table
Add a link
Reference in a new issue