aboutsummaryrefslogtreecommitdiff
path: root/src/tests.ts
diff options
context:
space:
mode:
authorAkshay Nair <phenax5@gmail.com>2023-12-15 22:36:03 +0530
committerAkshay Nair <phenax5@gmail.com>2023-12-15 22:36:03 +0530
commitefc0358c1e2b52308d3df68aa713cef5dc6e6bfe (patch)
tree40bac1f220895180c1cb99f044ac56eb4ed1ccbb /src/tests.ts
parent3d91b8c0fe73d24e3bcf13e7d7e8079f58975500 (diff)
downloadts-theorem-provinator-efc0358c1e2b52308d3df68aa713cef5dc6e6bfe.tar.gz
ts-theorem-provinator-efc0358c1e2b52308d3df68aa713cef5dc6e6bfe.zip
refactor: moves stuff around
Diffstat (limited to 'src/tests.ts')
-rw-r--r--src/tests.ts85
1 files changed, 0 insertions, 85 deletions
diff --git a/src/tests.ts b/src/tests.ts
deleted file mode 100644
index 7f331a6..0000000
--- a/src/tests.ts
+++ /dev/null
@@ -1,85 +0,0 @@
-import { addition, multiplication } from './index';
-import { Add, Multiply, Succ, _0 } from './nat';
-import { ApplyRewrite, ChainRewrites, Sym, Eq, VerifyEquation, Equation, assert, Evaluate } from './util';
-
-export type specChainRewrites = [
- assert<Eq<
- ChainRewrites<
- [
- addition.Commutativity<_0, 'B'>,
- addition.Identity<'B'>,
- ],
- Add<Add<_0, 'B'>, 'C'>
- >,
- Add<'B', 'C'>
- >>,
- assert<Eq<
- ChainRewrites<
- [
- addition.Commutativity<_0, 'B'>,
- addition.Identity<'B'>,
- Sym<addition.Identity<Add<'B', 'C'>>>,
- addition.Commutativity<Add<'B', 'C'>, _0>,
- ],
- Add<Add<_0, 'B'>, 'C'>
- >,
- Add<_0, Add<'B', 'C'>>
- >>,
-]
-
-export namespace spec_addition {
- export type specIdentity = [
- assert<Eq<
- ApplyRewrite<Add<'A', Add<'B', _0>>, addition.Identity<'B'>>,
- Add<'A', 'B'>
- >>,
- assert<Eq<
- ApplyRewrite<Add<Add<'A', 'B'>, _0>, addition.Identity<Add<'A', 'B'>>>,
- Add<'A', 'B'>
- >>,
- assert<Eq<
- ApplyRewrite<Add<'A', 'B'>, Sym<addition.Identity<Add<'A', 'B'>>>>,
- Add<Add<'A', 'B'>, _0>
- >>,
- assert<Eq<
- ApplyRewrite<Add<'A', Add<'B', Add<'C', _0>>>, addition.Identity<'C'>>,
- Add<'A', Add<'B', 'C'>>
- >>,
- ]
-
- export type specCommutativity = [
- assert<Eq<
- ApplyRewrite<Add<'A', 'B'>, addition.Commutativity<'A', 'B'>>,
- Add<'B', 'A'>
- >>,
- assert<Eq<
- ApplyRewrite<Add<Add<'A', 'B'>, 'C'>, addition.Commutativity<'A', 'B'>>,
- Add<Add<'B', 'A'>, 'C'>
- >>,
- assert<Eq<
- ApplyRewrite<Add<'A', Add<'B', 'C'>>, addition.Commutativity<'B', 'C'>>,
- Add<'A', Add<'C', 'B'>>
- >>,
- ]
-}
-
-export namespace multiplication_spec {
- export type specCommutativity = [
- assert<Eq<
- ApplyRewrite<Multiply<Multiply<'A', 'B'>, 'C'>, multiplication.Commutativity<'A', 'B'>>,
- Multiply<Multiply<'B', 'A'>, 'C'>
- >>,
- ]
- export type specDistributivity = [
- assert<Eq<
- Evaluate<multiplication.Distributivity<'A', 'B', 'C'>>,
- Add<Multiply<'A', 'C'>, Multiply<'B', 'C'>>
- >>,
- ]
- export type specAssociativity = [
- assert<Eq<
- Evaluate<multiplication.Associativity<'A', 'B', 'C'>>,
- Multiply<'A', Multiply<'B', 'C'>>
- >>,
- ]
-}