Lambda calculus-like library written in TypeScript.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
jlc/test/bool.spec.ts

130 lines
3.1 KiB

import { describe, expect, it } from '@jest/globals';
import { undef } from '../src/core';
import { toBoolean as $, False, True, fromBoolean as _, and, eq, iif, not, or, xor } from '../src/bool';
describe('Bool', () => {
describe('toBoolean', () => {
it('converts True', () => {
expect($(True)).toBe(true);
});
it('converts False', () => {
expect($(False)).toBe(false);
});
});
describe('fromBoolean', () => {
it('converts true', () => {
expect($(_(true))).toBe(true);
});
it('converts false', () => {
expect($(_(false))).toBe(false);
});
});
describe('iif', () => {
it('returns true argument', () => {
expect($(iif._(True)._(True)._(False))).toBe(true);
});
it('returns false argument', () => {
expect($(iif._(False)._(True)._(False))).toBe(false);
});
it('ignores other argument', () => {
expect($(iif._(True)._(True)._(undef))).toBe(true);
expect($(iif._(False)._(undef)._(False))).toBe(false);
});
});
describe('eq', () => {
it('False eq False is True', () => {
expect($(eq._(False)._(False))).toBe(true);
});
it('False eq True is False', () => {
expect($(eq._(False)._(True))).toBe(false);
});
it('True eq False is False', () => {
expect($(eq._(True)._(False))).toBe(false);
});
it('True eq True is True', () => {
expect($(eq._(True)._(True))).toBe(true);
});
});
describe('not', () => {
it('not False is True', () => {
expect($(not._(False))).toBe(true);
});
it('not True is False', () => {
expect($(not._(True))).toBe(false);
});
});
describe('and', () => {
it('False and False is False', () => {
expect($(and._(False)._(False))).toBe(false);
});
it('False and True is False', () => {
expect($(and._(False)._(True))).toBe(false);
});
it('True and False is False', () => {
expect($(and._(True)._(False))).toBe(false);
});
it('True and True is True', () => {
expect($(and._(True)._(True))).toBe(true);
});
it('False and ignores other argument', () => {
expect($(and._(False)._(undef))).toBe(false);
});
});
describe('or', () => {
it('False or False is False', () => {
expect($(or._(False)._(False))).toBe(false);
});
it('False or True is True', () => {
expect($(or._(False)._(True))).toBe(true);
});
it('True or False is True', () => {
expect($(or._(True)._(False))).toBe(true);
});
it('True or True is True', () => {
expect($(or._(True)._(True))).toBe(true);
});
it('True or ignores other argument', () => {
expect($(or._(True)._(undef))).toBe(true);
});
});
describe('xor', () => {
it('False xor False is False', () => {
expect($(xor._(False)._(False))).toBe(false);
});
it('False xor True is True', () => {
expect($(xor._(False)._(True))).toBe(true);
});
it('True xor False is True', () => {
expect($(xor._(True)._(False))).toBe(true);
});
it('True xor True is False', () => {
expect($(xor._(True)._(True))).toBe(false);
});
});
});