}
}
-//foldr(f, acc, xs) {
-// if(isEmpty(xs)) {
-// return acc;
-// } else {
-// return foldr(f, f(xs.hd, acc), xs.tl);
-// }
-//}
+foldr(f, acc, xs) {
+ if(isEmpty(xs)) {
+ return acc;
+ } else {
+ return foldr(f, f(xs.hd, acc), xs.tl);
+ }
+}
+
+l2(x) :: Int -> Void {
+ //return print(3);
+ var y = print(3);
+ return;
+}
main() {
- var f = \x -> x+1;
- var z = map(\x->x+1, 1:2:[]);
- //var x = foldr(plus, 0, 1:2:[]);
+ //var f = \x->print(x);
+ var z = map(\x->print(3), 1:2:[]);
+ var x = print(3);
+ //var x = foldr(\x y->x+y, 0, 1:2:[]);
//print(x);
return;
}
\ No newline at end of file