15 lines
556 B
JavaScript
15 lines
556 B
JavaScript
import { fnType } from "../structures/function.js";
|
|
import { Type } from "../metacircular.js";
|
|
import { Bool } from "./symbols.js";
|
|
|
|
const eqBool = x => y => x === y;
|
|
|
|
const Bool_to_Bool = fnType({in: Bool, out: Bool});
|
|
const Bool_to_Bool_to_Bool = fnType({in: Bool, out: Bool_to_Bool});
|
|
|
|
export const ModuleBool = {l:[
|
|
{i: Bool , t: Type },
|
|
{i: Bool_to_Bool , t: Function },
|
|
{i: Bool_to_Bool_to_Bool , t: Function },
|
|
{i: eqBool , t: Bool_to_Bool_to_Bool },
|
|
]};
|