Rakarake/churf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added .crf to every sample-program

Browse source
This commit is contained in:
Samuel Hammersberg 2023-03-26 18:38:07 +02:00
parent 9ea3a3dc56
commit ccfae19541
10 changed files with 23 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

24
sample-programs/basic-8
View file

@ -1,24 +0,0 @@
data Maybe (a) where {
Nothing : Maybe (a)
Just : a -> Maybe (a)
};
fromJust : Maybe (a) -> a ;
fromJust a =
case a of {
Just a => a
};
fromMaybe : a -> Maybe (a) -> a ;
fromMaybe a b =
case b of {
Just a => a;
Nothing => a
};
maybe : b -> (a -> b) -> Maybe (a) -> b;
maybe b f ma =
case ma of {
Just a => f a;
Nothing => b
}