progress and some refactoring

primitives/unit.js

@@ -0,0 +1,13 @@
+import { typedFnType } from "../structures/types.js";
+import { Bool, Type, Unit } from "./types.js";
+
+const eqUnit = x => y => x === y;
+
+export const ModuleUnit = {l:[
+  {i: {}, t: Unit},
+
+  {i: Unit, t: Type},
+
+  // Unit -> Unit -> Bool
+  ...typedFnType(eqUnit, fnType => fnType(Unit)(fnType(Unit)(Bool))),
+]};