msyds/rlp
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases 2 Wiki Activity

update examples

Browse Source
This commit is contained in:
crumbtoo
2024-02-09 17:56:38 -07:00
parent 50a4d0010c
commit 615a6f1b07
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
examples/Core/constDivZero.cr
View File

@@ -1,3 +1,3 @@
k x y = x; k x y = x;
main = k 3 ((/#) 1 0); main = k 3 (/# 1 0);

2
examples/Core/factorial.cr
View File

@@ -1,6 +1,6 @@
fac n = case (==#) n 0 of fac n = case (==#) n 0 of
{ <1> -> 1 { <1> -> 1
; <0> -> (*#) n (fac ((-#) n 1)) ; <0> -> *# n (fac (-# n 1))
}; };
main = fac 3; main = fac 3;