23 lines
510 B
Plaintext
23 lines
510 B
Plaintext
app [main] { pf: platform "https://github.com/roc-lang/basic-cli/releases/download/0.16.0/O00IPk-Krg_diNS2dVWlI0ZQP794Vctxzv0ha96mK0E.tar.br" }
|
|
|
|
import pf.Stdout
|
|
|
|
addAndStringify = \num1, num2 ->
|
|
sum = num1 + num2
|
|
|
|
if sum == 0 then
|
|
""
|
|
else
|
|
Num.toStr sum
|
|
|
|
calcFac = \number ->
|
|
if number == 0 then
|
|
1
|
|
else
|
|
(number * (calcFac (number - 1)))
|
|
|
|
main =
|
|
Stdout.line! "I'm a Roc application!"
|
|
Stdout.line! (addAndStringify 2 3)
|
|
Stdout.line! (Num.toStr (calcFac 10))
|