fix check
[minfp.git] / tests / preamble.mfp
index b984811..70fc870 100644 (file)
@@ -10,16 +10,12 @@ $ ifxr 0 x y = x y;
 + ifxl 6 = code add;
 
 on f g a b = f (g a) (g b);
-onn = \f. \g. \a. \b. f (g a) (g b);
 
 //Conditional operators
 if = code if;
 
-//fac i = if (i == 0) 1 $ i * fac (i - 1);
+fac i = if (i == 0) 1 $ i * fac (i - 1);
 id x = x;
 
 even i = if (i == 0) True (odd (i - 1));
 odd i = if (i == 0) False (even (i - 1));
-
-//start = on;
-start = ($) id 42;