15 lines
556 B
JavaScript
15 lines
556 B
JavaScript
import { fnType } from "../type_registry.js";
|
|
import {Type, Function} 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 },
|
|
]};
|