-f(x, y) {
- return x;
+//f(x, y) {
+// var ret = 0;
+// if (x < y) {
+// ret = x;
+// }
+// else {
+// ret = y;
+// }
+// return ret;
+//}//
+
+//main() {
+// Int x1 = 1;
+// var x2 = 4;
+// var x3 = f(x1, x2);
+// print(x1);
+// x1 = 5;
+// return x3 + x1;
+//}
+
+isE(x) :: [a] -> Bool {
+ if (x == []) {
+ return True;
+ } else {
+ return False;
+ }
}
main() {
- Int x1 = 1;
- x1 = 5;
- f(x1, 2);
- return x1;
+ // [Int] x2 = 0 : x1;
+ // [Int] x3 = [];
+ // (Int, Bool) x4 = (4, True);
+ // //Bool y1 = isEmpty(x2); //gives weird type error, not sure why
+// isEmpty(x2);
+ [Int] x1 = 8 : 2 : [];
+ (Bool, Int) z = (True, 2);
+ var y = z.fst;
+ var x = (True, 5) : (False,0) : [];
+ var sdaf = isE(x1);
+ var z = isEmpty(x1);
+ x.hd.snd = 8;
+ return;
}