@stevenvo780/st-lang 4.4.0 → 4.5.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (158) hide show
  1. package/README.md +78 -37
  2. package/dist/coinduction/index.d.ts +136 -0
  3. package/dist/coinduction/index.d.ts.map +1 -0
  4. package/dist/coinduction/index.js +318 -0
  5. package/dist/coinduction/index.js.map +1 -0
  6. package/dist/combinators-ski/abstract.d.ts +5 -0
  7. package/dist/combinators-ski/abstract.d.ts.map +1 -0
  8. package/dist/combinators-ski/abstract.js +88 -0
  9. package/dist/combinators-ski/abstract.js.map +1 -0
  10. package/dist/combinators-ski/index.d.ts +6 -0
  11. package/dist/combinators-ski/index.d.ts.map +1 -0
  12. package/dist/combinators-ski/index.js +30 -0
  13. package/dist/combinators-ski/index.js.map +1 -0
  14. package/dist/combinators-ski/reduce.d.ts +10 -0
  15. package/dist/combinators-ski/reduce.d.ts.map +1 -0
  16. package/dist/combinators-ski/reduce.js +118 -0
  17. package/dist/combinators-ski/reduce.js.map +1 -0
  18. package/dist/combinators-ski/types.d.ts +23 -0
  19. package/dist/combinators-ski/types.d.ts.map +1 -0
  20. package/dist/combinators-ski/types.js +102 -0
  21. package/dist/combinators-ski/types.js.map +1 -0
  22. package/dist/constructive-reals/index.d.ts +132 -0
  23. package/dist/constructive-reals/index.d.ts.map +1 -0
  24. package/dist/constructive-reals/index.js +723 -0
  25. package/dist/constructive-reals/index.js.map +1 -0
  26. package/dist/game-semantics/convert.d.ts +4 -0
  27. package/dist/game-semantics/convert.d.ts.map +1 -0
  28. package/dist/game-semantics/convert.js +28 -0
  29. package/dist/game-semantics/convert.js.map +1 -0
  30. package/dist/game-semantics/index.d.ts +6 -0
  31. package/dist/game-semantics/index.d.ts.map +1 -0
  32. package/dist/game-semantics/index.js +28 -0
  33. package/dist/game-semantics/index.js.map +1 -0
  34. package/dist/game-semantics/strategy.d.ts +34 -0
  35. package/dist/game-semantics/strategy.d.ts.map +1 -0
  36. package/dist/game-semantics/strategy.js +336 -0
  37. package/dist/game-semantics/strategy.js.map +1 -0
  38. package/dist/game-semantics/types.d.ts +64 -0
  39. package/dist/game-semantics/types.d.ts.map +1 -0
  40. package/dist/game-semantics/types.js +78 -0
  41. package/dist/game-semantics/types.js.map +1 -0
  42. package/dist/higher-order-unify/index.d.ts +5 -0
  43. package/dist/higher-order-unify/index.d.ts.map +1 -0
  44. package/dist/higher-order-unify/index.js +27 -0
  45. package/dist/higher-order-unify/index.js.map +1 -0
  46. package/dist/higher-order-unify/normalize.d.ts +14 -0
  47. package/dist/higher-order-unify/normalize.d.ts.map +1 -0
  48. package/dist/higher-order-unify/normalize.js +191 -0
  49. package/dist/higher-order-unify/normalize.js.map +1 -0
  50. package/dist/higher-order-unify/pattern.d.ts +4 -0
  51. package/dist/higher-order-unify/pattern.d.ts.map +1 -0
  52. package/dist/higher-order-unify/pattern.js +70 -0
  53. package/dist/higher-order-unify/pattern.js.map +1 -0
  54. package/dist/higher-order-unify/types.d.ts +19 -0
  55. package/dist/higher-order-unify/types.d.ts.map +1 -0
  56. package/dist/higher-order-unify/types.js +14 -0
  57. package/dist/higher-order-unify/types.js.map +1 -0
  58. package/dist/higher-order-unify/unify.d.ts +5 -0
  59. package/dist/higher-order-unify/unify.d.ts.map +1 -0
  60. package/dist/higher-order-unify/unify.js +306 -0
  61. package/dist/higher-order-unify/unify.js.map +1 -0
  62. package/dist/index.d.ts +10 -0
  63. package/dist/index.d.ts.map +1 -1
  64. package/dist/index.js +40 -1
  65. package/dist/index.js.map +1 -1
  66. package/dist/nbe/index.d.ts +3 -0
  67. package/dist/nbe/index.d.ts.map +1 -0
  68. package/dist/nbe/index.js +25 -0
  69. package/dist/nbe/index.js.map +1 -0
  70. package/dist/nbe/nbe.d.ts +7 -0
  71. package/dist/nbe/nbe.d.ts.map +1 -0
  72. package/dist/nbe/nbe.js +118 -0
  73. package/dist/nbe/nbe.js.map +1 -0
  74. package/dist/nbe/types.d.ts +54 -0
  75. package/dist/nbe/types.d.ts.map +1 -0
  76. package/dist/nbe/types.js +117 -0
  77. package/dist/nbe/types.js.map +1 -0
  78. package/dist/profile-bridge/index.d.ts +64 -0
  79. package/dist/profile-bridge/index.d.ts.map +1 -0
  80. package/dist/profile-bridge/index.js +328 -0
  81. package/dist/profile-bridge/index.js.map +1 -0
  82. package/dist/proof-nets/construct.d.ts +3 -0
  83. package/dist/proof-nets/construct.d.ts.map +1 -0
  84. package/dist/proof-nets/construct.js +85 -0
  85. package/dist/proof-nets/construct.js.map +1 -0
  86. package/dist/proof-nets/correctness.d.ts +3 -0
  87. package/dist/proof-nets/correctness.d.ts.map +1 -0
  88. package/dist/proof-nets/correctness.js +213 -0
  89. package/dist/proof-nets/correctness.js.map +1 -0
  90. package/dist/proof-nets/cut-elim.d.ts +9 -0
  91. package/dist/proof-nets/cut-elim.d.ts.map +1 -0
  92. package/dist/proof-nets/cut-elim.js +149 -0
  93. package/dist/proof-nets/cut-elim.js.map +1 -0
  94. package/dist/proof-nets/index.d.ts +6 -0
  95. package/dist/proof-nets/index.d.ts.map +1 -0
  96. package/dist/proof-nets/index.js +33 -0
  97. package/dist/proof-nets/index.js.map +1 -0
  98. package/dist/proof-nets/types.d.ts +36 -0
  99. package/dist/proof-nets/types.d.ts.map +1 -0
  100. package/dist/proof-nets/types.js +89 -0
  101. package/dist/proof-nets/types.js.map +1 -0
  102. package/dist/tableau-framework/TableauProver.d.ts +10 -0
  103. package/dist/tableau-framework/TableauProver.d.ts.map +1 -0
  104. package/dist/tableau-framework/TableauProver.js +118 -0
  105. package/dist/tableau-framework/TableauProver.js.map +1 -0
  106. package/dist/tableau-framework/index.d.ts +5 -0
  107. package/dist/tableau-framework/index.d.ts.map +1 -0
  108. package/dist/tableau-framework/index.js +11 -0
  109. package/dist/tableau-framework/index.js.map +1 -0
  110. package/dist/tableau-framework/propositional.d.ts +11 -0
  111. package/dist/tableau-framework/propositional.d.ts.map +1 -0
  112. package/dist/tableau-framework/propositional.js +143 -0
  113. package/dist/tableau-framework/propositional.js.map +1 -0
  114. package/dist/tableau-framework/types.d.ts +32 -0
  115. package/dist/tableau-framework/types.d.ts.map +1 -0
  116. package/dist/tableau-framework/types.js +6 -0
  117. package/dist/tableau-framework/types.js.map +1 -0
  118. package/dist/tests/coinduction/coinduction.test.d.ts +2 -0
  119. package/dist/tests/coinduction/coinduction.test.d.ts.map +1 -0
  120. package/dist/tests/coinduction/coinduction.test.js +217 -0
  121. package/dist/tests/coinduction/coinduction.test.js.map +1 -0
  122. package/dist/tests/combinators-ski/combinators-ski.test.d.ts +2 -0
  123. package/dist/tests/combinators-ski/combinators-ski.test.d.ts.map +1 -0
  124. package/dist/tests/combinators-ski/combinators-ski.test.js +211 -0
  125. package/dist/tests/combinators-ski/combinators-ski.test.js.map +1 -0
  126. package/dist/tests/constructive-reals/constructive-reals.test.d.ts +2 -0
  127. package/dist/tests/constructive-reals/constructive-reals.test.d.ts.map +1 -0
  128. package/dist/tests/constructive-reals/constructive-reals.test.js +357 -0
  129. package/dist/tests/constructive-reals/constructive-reals.test.js.map +1 -0
  130. package/dist/tests/game-semantics/game-semantics.test.d.ts +2 -0
  131. package/dist/tests/game-semantics/game-semantics.test.d.ts.map +1 -0
  132. package/dist/tests/game-semantics/game-semantics.test.js +143 -0
  133. package/dist/tests/game-semantics/game-semantics.test.js.map +1 -0
  134. package/dist/tests/higher-order-unify/ho-unify.test.d.ts +2 -0
  135. package/dist/tests/higher-order-unify/ho-unify.test.d.ts.map +1 -0
  136. package/dist/tests/higher-order-unify/ho-unify.test.js +264 -0
  137. package/dist/tests/higher-order-unify/ho-unify.test.js.map +1 -0
  138. package/dist/tests/integration/cross-modules.test.d.ts +8 -0
  139. package/dist/tests/integration/cross-modules.test.d.ts.map +1 -0
  140. package/dist/tests/integration/cross-modules.test.js +668 -0
  141. package/dist/tests/integration/cross-modules.test.js.map +1 -0
  142. package/dist/tests/nbe/nbe.test.d.ts +2 -0
  143. package/dist/tests/nbe/nbe.test.d.ts.map +1 -0
  144. package/dist/tests/nbe/nbe.test.js +121 -0
  145. package/dist/tests/nbe/nbe.test.js.map +1 -0
  146. package/dist/tests/profile-bridge/translations.test.d.ts +2 -0
  147. package/dist/tests/profile-bridge/translations.test.d.ts.map +1 -0
  148. package/dist/tests/profile-bridge/translations.test.js +266 -0
  149. package/dist/tests/profile-bridge/translations.test.js.map +1 -0
  150. package/dist/tests/proof-nets/proof-nets.test.d.ts +2 -0
  151. package/dist/tests/proof-nets/proof-nets.test.d.ts.map +1 -0
  152. package/dist/tests/proof-nets/proof-nets.test.js +263 -0
  153. package/dist/tests/proof-nets/proof-nets.test.js.map +1 -0
  154. package/dist/tests/tableau-framework/tableau.test.d.ts +2 -0
  155. package/dist/tests/tableau-framework/tableau.test.d.ts.map +1 -0
  156. package/dist/tests/tableau-framework/tableau.test.js +196 -0
  157. package/dist/tests/tableau-framework/tableau.test.js.map +1 -0
  158. package/package.json +2 -1
@@ -0,0 +1,217 @@
1
+ "use strict";
2
+ // ============================================================
3
+ // ST Coinduction — Tests
4
+ // ============================================================
5
+ // Cubre:
6
+ // • Constructores corecursivos (repeat, iterate, unfold).
7
+ // • Streams notables (naturals, fibonacci).
8
+ // • Functor/aplicativo (map, zipWith, zip, scan).
9
+ // • Identidades coinductivas vía isBisimilar (acotado).
10
+ // • Bisimulación up-to vía `prove` con relaciones explícitas.
11
+ // ============================================================
12
+ Object.defineProperty(exports, "__esModule", { value: true });
13
+ const vitest_1 = require("vitest");
14
+ const coinduction_1 = require("../../coinduction");
15
+ (0, vitest_1.describe)('Coinduction — constructores básicos', () => {
16
+ (0, vitest_1.it)('repeat genera un stream constante', () => {
17
+ const xs = (0, coinduction_1.repeat)(7);
18
+ (0, vitest_1.expect)((0, coinduction_1.take)(xs, 5)).toEqual([7, 7, 7, 7, 7]);
19
+ });
20
+ (0, vitest_1.it)('repeat preserva identidad de cola (punto fijo)', () => {
21
+ // tail(repeat x) === repeat x (mismo nodo) — propiedad coinductiva
22
+ // fuerte que sólo se cumple por la implementación con auto-referencia.
23
+ const xs = (0, coinduction_1.repeat)(0);
24
+ (0, vitest_1.expect)(xs.tail()).toBe(xs);
25
+ });
26
+ (0, vitest_1.it)('iterate aplica f repetidamente', () => {
27
+ const xs = (0, coinduction_1.iterate)((n) => n * 2, 1);
28
+ (0, vitest_1.expect)((0, coinduction_1.take)(xs, 6)).toEqual([1, 2, 4, 8, 16, 32]);
29
+ });
30
+ (0, vitest_1.it)('cons construye correctamente cabeza y cola', () => {
31
+ const xs = (0, coinduction_1.cons)(99, () => (0, coinduction_1.repeat)(0));
32
+ (0, vitest_1.expect)(xs.head).toBe(99);
33
+ (0, vitest_1.expect)((0, coinduction_1.take)(xs, 4)).toEqual([99, 0, 0, 0]);
34
+ });
35
+ (0, vitest_1.it)('unfold anamorfismo: enumera potencias de 2', () => {
36
+ const powers = (0, coinduction_1.unfold)(1, (s) => [s, s * 2]);
37
+ (0, vitest_1.expect)((0, coinduction_1.take)(powers, 5)).toEqual([1, 2, 4, 8, 16]);
38
+ });
39
+ });
40
+ (0, vitest_1.describe)('Coinduction — observaciones', () => {
41
+ (0, vitest_1.it)('take devuelve los primeros n elementos', () => {
42
+ (0, vitest_1.expect)((0, coinduction_1.take)(coinduction_1.naturals, 5)).toEqual([0, 1, 2, 3, 4]);
43
+ });
44
+ (0, vitest_1.it)('take con n=0 devuelve array vacío', () => {
45
+ (0, vitest_1.expect)((0, coinduction_1.take)(coinduction_1.naturals, 0)).toEqual([]);
46
+ });
47
+ (0, vitest_1.it)('take rechaza n negativo o no entero', () => {
48
+ (0, vitest_1.expect)(() => (0, coinduction_1.take)(coinduction_1.naturals, -1)).toThrow();
49
+ (0, vitest_1.expect)(() => (0, coinduction_1.take)(coinduction_1.naturals, 1.5)).toThrow();
50
+ });
51
+ (0, vitest_1.it)('drop descarta n elementos', () => {
52
+ (0, vitest_1.expect)((0, coinduction_1.take)((0, coinduction_1.drop)(coinduction_1.naturals, 3), 4)).toEqual([3, 4, 5, 6]);
53
+ });
54
+ (0, vitest_1.it)('nth recupera el i-ésimo elemento', () => {
55
+ (0, vitest_1.expect)((0, coinduction_1.nth)(coinduction_1.naturals, 0)).toBe(0);
56
+ (0, vitest_1.expect)((0, coinduction_1.nth)(coinduction_1.naturals, 10)).toBe(10);
57
+ (0, vitest_1.expect)((0, coinduction_1.nth)(coinduction_1.fibonacci, 9)).toBe(34);
58
+ });
59
+ });
60
+ (0, vitest_1.describe)('Coinduction — streams notables', () => {
61
+ (0, vitest_1.it)('naturals = 0, 1, 2, ...', () => {
62
+ (0, vitest_1.expect)((0, coinduction_1.take)(coinduction_1.naturals, 5)).toEqual([0, 1, 2, 3, 4]);
63
+ });
64
+ (0, vitest_1.it)('fibonacci = 0, 1, 1, 2, 3, 5, 8, 13, 21, 34, ...', () => {
65
+ (0, vitest_1.expect)((0, coinduction_1.take)(coinduction_1.fibonacci, 10)).toEqual([0, 1, 1, 2, 3, 5, 8, 13, 21, 34]);
66
+ });
67
+ (0, vitest_1.it)('fibonacci satisface F(n+2) = F(n+1) + F(n)', () => {
68
+ const fs = (0, coinduction_1.take)(coinduction_1.fibonacci, 20);
69
+ for (let i = 0; i + 2 < fs.length; i++) {
70
+ const a = fs[i];
71
+ const b = fs[i + 1];
72
+ const c = fs[i + 2];
73
+ if (a === undefined || b === undefined || c === undefined) {
74
+ throw new Error('fibonacci sample shorter than expected');
75
+ }
76
+ (0, vitest_1.expect)(c).toBe(a + b);
77
+ }
78
+ });
79
+ });
80
+ (0, vitest_1.describe)('Coinduction — functor/aplicativos', () => {
81
+ (0, vitest_1.it)('map respeta identidad observacionalmente: map(id, s) ~ s', () => {
82
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)((0, coinduction_1.map)((x) => x, coinduction_1.naturals), coinduction_1.naturals, 50)).toBe(true);
83
+ });
84
+ (0, vitest_1.it)('zipWith combina elemento a elemento', () => {
85
+ const sumS = (0, coinduction_1.zipWith)((a, b) => a + b, coinduction_1.naturals, coinduction_1.naturals);
86
+ (0, vitest_1.expect)((0, coinduction_1.take)(sumS, 5)).toEqual([0, 2, 4, 6, 8]);
87
+ });
88
+ (0, vitest_1.it)('zip produce pares', () => {
89
+ const ps = (0, coinduction_1.take)((0, coinduction_1.zip)(coinduction_1.naturals, (0, coinduction_1.repeat)('x')), 3);
90
+ (0, vitest_1.expect)(ps).toEqual([
91
+ [0, 'x'],
92
+ [1, 'x'],
93
+ [2, 'x'],
94
+ ]);
95
+ });
96
+ (0, vitest_1.it)('filter mantiene sólo elementos que pasan el predicado', () => {
97
+ const evens = (0, coinduction_1.filter)((n) => n % 2 === 0, coinduction_1.naturals);
98
+ (0, vitest_1.expect)((0, coinduction_1.take)(evens, 5)).toEqual([0, 2, 4, 6, 8]);
99
+ });
100
+ (0, vitest_1.it)('scan acumula prefijos: scan(+, 0, naturals) = 0, 0, 1, 3, 6, 10, ...', () => {
101
+ const s = (0, coinduction_1.scan)((acc, x) => acc + x, 0, coinduction_1.naturals);
102
+ (0, vitest_1.expect)((0, coinduction_1.take)(s, 6)).toEqual([0, 0, 1, 3, 6, 10]);
103
+ });
104
+ (0, vitest_1.it)('interleave alterna a, b, a, b, ...', () => {
105
+ const xs = (0, coinduction_1.interleave)((0, coinduction_1.repeat)('a'), (0, coinduction_1.repeat)('b'));
106
+ (0, vitest_1.expect)((0, coinduction_1.take)(xs, 6)).toEqual(['a', 'b', 'a', 'b', 'a', 'b']);
107
+ });
108
+ });
109
+ (0, vitest_1.describe)('Coinduction — bisimulación acotada', () => {
110
+ (0, vitest_1.it)('isBisimilar es reflexivo sobre naturals', () => {
111
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(coinduction_1.naturals, coinduction_1.naturals, 100)).toBe(true);
112
+ });
113
+ (0, vitest_1.it)('isBisimilar detecta divergencia inmediata', () => {
114
+ const a = (0, coinduction_1.cons)(1, () => (0, coinduction_1.repeat)(0));
115
+ const b = (0, coinduction_1.cons)(2, () => (0, coinduction_1.repeat)(0));
116
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(a, b, 10)).toBe(false);
117
+ });
118
+ (0, vitest_1.it)('isBisimilar(naturals, map(id, naturals)) — corecursión idempotente', () => {
119
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(coinduction_1.naturals, (0, coinduction_1.map)((x) => x, coinduction_1.naturals), 100)).toBe(true);
120
+ });
121
+ (0, vitest_1.it)('isBisimilar de fibonacci consigo mismo', () => {
122
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(coinduction_1.fibonacci, coinduction_1.fibonacci, 30)).toBe(true);
123
+ });
124
+ (0, vitest_1.it)('isBisimilar detecta divergencia en la cola', () => {
125
+ // a = 0, 1, 2, 3, 4, ...
126
+ // b = 0, 1, 2, 99, 4, ...
127
+ const b = (0, coinduction_1.cons)(0, () => (0, coinduction_1.cons)(1, () => (0, coinduction_1.cons)(2, () => (0, coinduction_1.cons)(99, () => (0, coinduction_1.drop)(coinduction_1.naturals, 4)))));
128
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(coinduction_1.naturals, b, 10)).toBe(false);
129
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(coinduction_1.naturals, b, 3)).toBe(true); // primeros 3 sí coinciden
130
+ });
131
+ (0, vitest_1.it)('isBisimilar funciona con elementos compuestos (objetos planos)', () => {
132
+ const a = (0, coinduction_1.iterate)((p) => ({ x: p.x + 1 }), { x: 0 });
133
+ const b = (0, coinduction_1.map)((n) => ({ x: n }), coinduction_1.naturals);
134
+ (0, vitest_1.expect)((0, coinduction_1.isBisimilar)(a, b, 20)).toBe(true);
135
+ });
136
+ (0, vitest_1.it)('isBisimilar rechaza depth inválido', () => {
137
+ (0, vitest_1.expect)(() => (0, coinduction_1.isBisimilar)(coinduction_1.naturals, coinduction_1.naturals, -1)).toThrow();
138
+ (0, vitest_1.expect)(() => (0, coinduction_1.isBisimilar)(coinduction_1.naturals, coinduction_1.naturals, 1.5)).toThrow();
139
+ });
140
+ });
141
+ (0, vitest_1.describe)('Coinduction — bisimulación up-to (prove)', () => {
142
+ // Identidad clásica: map f (map g s) ~ map (f ∘ g) s.
143
+ // La relación que la atestigua: R(a, b) ≡ "a = map f (map g s')
144
+ // y b = map (f∘g) s' para algún s'". Computacionalmente, una vez
145
+ // que sabés que las cabezas coinciden, las colas se obtienen
146
+ // aplicando los destructores; la propiedad se sostiene por
147
+ // construcción. Para `prove`, basta dar una relación que sea
148
+ // verdadera para el par inicial y se mantenga bajo tail.
149
+ (0, vitest_1.it)('map (f ∘ g) s ~ map f (map g s)', () => {
150
+ const f = (n) => n + 1;
151
+ const g = (n) => n * 2;
152
+ const lhs = (0, coinduction_1.map)(f, (0, coinduction_1.map)(g, coinduction_1.naturals));
153
+ const rhs = (0, coinduction_1.map)((n) => f(g(n)), coinduction_1.naturals);
154
+ const ok = (0, coinduction_1.prove)({
155
+ initial: [lhs, rhs],
156
+ // Relación: "ambos producen los mismos elementos hasta el inf."
157
+ // El motor de prove ya chequea head equality + avance, asi que
158
+ // basta un trivially-true predicate aquí (es la identidad up-to).
159
+ relation: (_a, _b) => true,
160
+ }, 50);
161
+ (0, vitest_1.expect)(ok).toBe(true);
162
+ });
163
+ (0, vitest_1.it)('prove falla si la relación es falsa en el par inicial', () => {
164
+ const ok = (0, coinduction_1.prove)({
165
+ initial: [coinduction_1.naturals, coinduction_1.naturals],
166
+ relation: (_a, _b) => false,
167
+ }, 5);
168
+ (0, vitest_1.expect)(ok).toBe(false);
169
+ });
170
+ (0, vitest_1.it)('prove detecta divergencia incluso con relación trivially-true', () => {
171
+ const a = coinduction_1.naturals;
172
+ const b = (0, coinduction_1.cons)(0, () => (0, coinduction_1.cons)(99, () => (0, coinduction_1.drop)(coinduction_1.naturals, 2)));
173
+ const ok = (0, coinduction_1.prove)({ initial: [a, b], relation: (_a, _b) => true }, 5);
174
+ (0, vitest_1.expect)(ok).toBe(false); // head del segundo paso difiere (1 vs 99)
175
+ });
176
+ (0, vitest_1.it)('prove para repeat: repeat x ~ cons(x, () => repeat x)', () => {
177
+ const x = 42;
178
+ const lhs = (0, coinduction_1.repeat)(x);
179
+ const rhs = (0, coinduction_1.cons)(x, () => (0, coinduction_1.repeat)(x));
180
+ // Relación R(a, b): "ambos son streams constantes x"
181
+ const ok = (0, coinduction_1.prove)({
182
+ initial: [lhs, rhs],
183
+ relation: (a, b) => a.head === x && b.head === x,
184
+ }, 100);
185
+ (0, vitest_1.expect)(ok).toBe(true);
186
+ });
187
+ (0, vitest_1.it)('prove para iterate: tail(iterate f x) ~ iterate f (f x)', () => {
188
+ const f = (n) => n + 3;
189
+ const lhs = (0, coinduction_1.iterate)(f, 0).tail();
190
+ const rhs = (0, coinduction_1.iterate)(f, f(0));
191
+ const ok = (0, coinduction_1.prove)({
192
+ initial: [lhs, rhs],
193
+ relation: (_a, _b) => true,
194
+ }, 50);
195
+ (0, vitest_1.expect)(ok).toBe(true);
196
+ });
197
+ (0, vitest_1.it)('prove rechaza depth inválido', () => {
198
+ (0, vitest_1.expect)(() => (0, coinduction_1.prove)({ initial: [coinduction_1.naturals, coinduction_1.naturals], relation: () => true }, -1)).toThrow();
199
+ });
200
+ });
201
+ (0, vitest_1.describe)('Coinduction — equality helper', () => {
202
+ const { equal } = coinduction_1.__internals;
203
+ (0, vitest_1.it)('equal sobre primitivos usa Object.is (NaN igual a NaN)', () => {
204
+ (0, vitest_1.expect)(equal(NaN, NaN)).toBe(true);
205
+ (0, vitest_1.expect)(equal(1, 1)).toBe(true);
206
+ (0, vitest_1.expect)(equal(1, '1')).toBe(false);
207
+ });
208
+ (0, vitest_1.it)('equal sobre arrays', () => {
209
+ (0, vitest_1.expect)(equal([1, 2, 3], [1, 2, 3])).toBe(true);
210
+ (0, vitest_1.expect)(equal([1, 2], [1, 2, 3])).toBe(false);
211
+ });
212
+ (0, vitest_1.it)('equal sobre objetos planos', () => {
213
+ (0, vitest_1.expect)(equal({ a: 1, b: 2 }, { a: 1, b: 2 })).toBe(true);
214
+ (0, vitest_1.expect)(equal({ a: 1 }, { a: 1, b: 2 })).toBe(false);
215
+ });
216
+ });
217
+ //# sourceMappingURL=coinduction.test.js.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"coinduction.test.js","sourceRoot":"","sources":["../../../src/tests/coinduction/coinduction.test.ts"],"names":[],"mappings":";AAAA,+DAA+D;AAC/D,yBAAyB;AACzB,+DAA+D;AAC/D,SAAS;AACT,4DAA4D;AAC5D,8CAA8C;AAC9C,oDAAoD;AACpD,0DAA0D;AAC1D,gEAAgE;AAChE,+DAA+D;;AAE/D,mCAA8C;AAC9C,mDAoB2B;AAE3B,IAAA,iBAAQ,EAAC,qCAAqC,EAAE,GAAG,EAAE;IACnD,IAAA,WAAE,EAAC,mCAAmC,EAAE,GAAG,EAAE;QAC3C,MAAM,EAAE,GAAG,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC;QACrB,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IAC/C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,gDAAgD,EAAE,GAAG,EAAE;QACxD,mEAAmE;QACnE,uEAAuE;QACvE,MAAM,EAAE,GAAG,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC;QACrB,IAAA,eAAM,EAAC,EAAE,CAAC,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IAC7B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,gCAAgC,EAAE,GAAG,EAAE;QACxC,MAAM,EAAE,GAAG,IAAA,qBAAO,EAAC,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC,CAAC;QAC5C,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;IACpD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4CAA4C,EAAE,GAAG,EAAE;QACpD,MAAM,EAAE,GAAG,IAAA,kBAAI,EAAC,EAAE,EAAE,GAAG,EAAE,CAAC,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC,CAAC;QACrC,IAAA,eAAM,EAAC,EAAE,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACzB,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IAC7C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4CAA4C,EAAE,GAAG,EAAE;QACpD,MAAM,MAAM,GAAG,IAAA,oBAAM,EAAC,CAAC,EAAE,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,CAAqB,CAAC,CAAC;QACxE,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,MAAM,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC;IACpD,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,6BAA6B,EAAE,GAAG,EAAE;IAC3C,IAAA,WAAE,EAAC,wCAAwC,EAAE,GAAG,EAAE;QAChD,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mCAAmC,EAAE,GAAG,EAAE;QAC3C,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;IACxC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,qCAAqC,EAAE,GAAG,EAAE;QAC7C,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC;QAC3C,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,GAAG,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC;IAC9C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2BAA2B,EAAE,GAAG,EAAE;QACnC,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IAC3D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kCAAkC,EAAE,GAAG,EAAE;QAC1C,IAAA,eAAM,EAAC,IAAA,iBAAG,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QACjC,IAAA,eAAM,EAAC,IAAA,iBAAG,EAAC,sBAAQ,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,iBAAG,EAAC,uBAAS,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACrC,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,gCAAgC,EAAE,GAAG,EAAE;IAC9C,IAAA,WAAE,EAAC,yBAAyB,EAAE,GAAG,EAAE;QACjC,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kDAAkD,EAAE,GAAG,EAAE;QAC1D,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,uBAAS,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;IACzE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4CAA4C,EAAE,GAAG,EAAE;QACpD,MAAM,EAAE,GAAG,IAAA,kBAAI,EAAC,uBAAS,EAAE,EAAE,CAAC,CAAC;QAC/B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,GAAG,EAAE,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YACvC,MAAM,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC;YAChB,MAAM,CAAC,GAAG,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;YACpB,MAAM,CAAC,GAAG,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;YACpB,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,KAAK,SAAS,EAAE,CAAC;gBAC1D,MAAM,IAAI,KAAK,CAAC,wCAAwC,CAAC,CAAC;YAC5D,CAAC;YACD,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;QACxB,CAAC;IACH,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,mCAAmC,EAAE,GAAG,EAAE;IACjD,IAAA,WAAE,EAAC,0DAA0D,EAAE,GAAG,EAAE;QAClE,IAAA,eAAM,EACJ,IAAA,yBAAW,EACT,IAAA,iBAAG,EAAC,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,EAAE,sBAAQ,CAAC,EAC/B,sBAAQ,EACR,EAAE,CACH,CACF,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACf,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,qCAAqC,EAAE,GAAG,EAAE;QAC7C,MAAM,IAAI,GAAG,IAAA,qBAAO,EAAC,CAAC,CAAS,EAAE,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,EAAE,sBAAQ,EAAE,sBAAQ,CAAC,CAAC;QAC1E,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACjD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mBAAmB,EAAE,GAAG,EAAE;QAC3B,MAAM,EAAE,GAAG,IAAA,kBAAI,EAAC,IAAA,iBAAG,EAAC,sBAAQ,EAAE,IAAA,oBAAM,EAAC,GAAG,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;QAC/C,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,OAAO,CAAC;YACjB,CAAC,CAAC,EAAE,GAAG,CAAC;YACR,CAAC,CAAC,EAAE,GAAG,CAAC;YACR,CAAC,CAAC,EAAE,GAAG,CAAC;SACT,CAAC,CAAC;IACL,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uDAAuD,EAAE,GAAG,EAAE;QAC/D,MAAM,KAAK,GAAG,IAAA,oBAAM,EAAC,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,EAAE,sBAAQ,CAAC,CAAC;QAC3D,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,KAAK,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IAClD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,sEAAsE,EAAE,GAAG,EAAE;QAC9E,MAAM,CAAC,GAAG,IAAA,kBAAI,EAAC,CAAC,GAAW,EAAE,CAAS,EAAE,EAAE,CAAC,GAAG,GAAG,CAAC,EAAE,CAAC,EAAE,sBAAQ,CAAC,CAAC;QACjE,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC;IAClD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oCAAoC,EAAE,GAAG,EAAE;QAC5C,MAAM,EAAE,GAAG,IAAA,wBAAU,EAAC,IAAA,oBAAM,EAAC,GAAG,CAAC,EAAE,IAAA,oBAAM,EAAC,GAAG,CAAC,CAAC,CAAC;QAChD,IAAA,eAAM,EAAC,IAAA,kBAAI,EAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC;IAC9D,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,oCAAoC,EAAE,GAAG,EAAE;IAClD,IAAA,WAAE,EAAC,yCAAyC,EAAE,GAAG,EAAE;QACjD,IAAA,eAAM,EAAC,IAAA,yBAAW,EAAC,sBAAQ,EAAE,sBAAQ,EAAE,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC1D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2CAA2C,EAAE,GAAG,EAAE;QACnD,MAAM,CAAC,GAAG,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC,CAAC;QACnC,MAAM,CAAC,GAAG,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,yBAAW,EAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC5C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oEAAoE,EAAE,GAAG,EAAE;QAC5E,IAAA,eAAM,EACJ,IAAA,yBAAW,EACT,sBAAQ,EACR,IAAA,iBAAG,EAAC,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,EAAE,sBAAQ,CAAC,EAC/B,GAAG,CACJ,CACF,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACf,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,wCAAwC,EAAE,GAAG,EAAE;QAChD,IAAA,eAAM,EAAC,IAAA,yBAAW,EAAC,uBAAS,EAAE,uBAAS,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC3D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4CAA4C,EAAE,GAAG,EAAE;QACpD,yBAAyB;QACzB,0BAA0B;QAC1B,MAAM,CAAC,GAAG,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,EAAE,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;QACzF,IAAA,eAAM,EAAC,IAAA,yBAAW,EAAC,sBAAQ,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;QACjD,IAAA,eAAM,EAAC,IAAA,yBAAW,EAAC,sBAAQ,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,0BAA0B;IAC5E,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,gEAAgE,EAAE,GAAG,EAAE;QACxE,MAAM,CAAC,GAAG,IAAA,qBAAO,EAAC,CAAC,CAAgB,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC;QACpE,MAAM,CAAC,GAAG,IAAA,iBAAG,EAAC,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,sBAAQ,CAAC,CAAC;QACnD,IAAA,eAAM,EAAC,IAAA,yBAAW,EAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC3C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oCAAoC,EAAE,GAAG,EAAE;QAC5C,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,yBAAW,EAAC,sBAAQ,EAAE,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC;QAC5D,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,yBAAW,EAAC,sBAAQ,EAAE,sBAAQ,EAAE,GAAG,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC;IAC/D,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,0CAA0C,EAAE,GAAG,EAAE;IACxD,sDAAsD;IACtD,gEAAgE;IAChE,iEAAiE;IACjE,6DAA6D;IAC7D,2DAA2D;IAC3D,6DAA6D;IAC7D,yDAAyD;IACzD,IAAA,WAAE,EAAC,mCAAmC,EAAE,GAAG,EAAE;QAC3C,MAAM,CAAC,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC;QAC/B,MAAM,CAAC,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC;QAC/B,MAAM,GAAG,GAAG,IAAA,iBAAG,EAAC,CAAC,EAAE,IAAA,iBAAG,EAAC,CAAC,EAAE,sBAAQ,CAAC,CAAC,CAAC;QACrC,MAAM,GAAG,GAAG,IAAA,iBAAG,EAAC,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,sBAAQ,CAAC,CAAC;QAElD,MAAM,EAAE,GAAG,IAAA,mBAAK,EACd;YACE,OAAO,EAAE,CAAC,GAAG,EAAE,GAAG,CAAC;YACnB,gEAAgE;YAChE,+DAA+D;YAC/D,kEAAkE;YAClE,QAAQ,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,IAAI;SAC3B,EACD,EAAE,CACH,CAAC;QACF,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACxB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uDAAuD,EAAE,GAAG,EAAE;QAC/D,MAAM,EAAE,GAAG,IAAA,mBAAK,EACd;YACE,OAAO,EAAE,CAAC,sBAAQ,EAAE,sBAAQ,CAAC;YAC7B,QAAQ,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,KAAK;SAC5B,EACD,CAAC,CACF,CAAC;QACF,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,+DAA+D,EAAE,GAAG,EAAE;QACvE,MAAM,CAAC,GAAG,sBAAQ,CAAC;QACnB,MAAM,CAAC,GAAG,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,EAAE,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAI,EAAC,sBAAQ,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;QAC3D,MAAM,EAAE,GAAG,IAAA,mBAAK,EAAC,EAAE,OAAO,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,QAAQ,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC,CAAC;QACrE,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,0CAA0C;IACpE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,yDAAyD,EAAE,GAAG,EAAE;QACjE,MAAM,CAAC,GAAG,EAAE,CAAC;QACb,MAAM,GAAG,GAAG,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC;QACtB,MAAM,GAAG,GAAmB,IAAA,kBAAI,EAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,oBAAM,EAAC,CAAC,CAAC,CAAC,CAAC;QACrD,qDAAqD;QACrD,MAAM,EAAE,GAAG,IAAA,mBAAK,EACd;YACE,OAAO,EAAE,CAAC,GAAG,EAAE,GAAG,CAAC;YACnB,QAAQ,EAAE,CAAC,CAAiB,EAAE,CAAiB,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,KAAK,CAAC,IAAI,CAAC,CAAC,IAAI,KAAK,CAAC;SACjF,EACD,GAAG,CACJ,CAAC;QACF,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACxB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2DAA2D,EAAE,GAAG,EAAE;QACnE,MAAM,CAAC,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC;QAC/B,MAAM,GAAG,GAAG,IAAA,qBAAO,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC;QACjC,MAAM,GAAG,GAAG,IAAA,qBAAO,EAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;QAC7B,MAAM,EAAE,GAAG,IAAA,mBAAK,EACd;YACE,OAAO,EAAE,CAAC,GAAG,EAAE,GAAG,CAAC;YACnB,QAAQ,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,IAAI;SAC3B,EACD,EAAE,CACH,CAAC;QACF,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACxB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,8BAA8B,EAAE,GAAG,EAAE;QACtC,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,mBAAK,EAAC,EAAE,OAAO,EAAE,CAAC,sBAAQ,EAAE,sBAAQ,CAAC,EAAE,QAAQ,EAAE,GAAG,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC;IAC7F,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,+BAA+B,EAAE,GAAG,EAAE;IAC7C,MAAM,EAAE,KAAK,EAAE,GAAG,yBAAW,CAAC;IAE9B,IAAA,WAAE,EAAC,wDAAwD,EAAE,GAAG,EAAE;QAChE,IAAA,eAAM,EAAC,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC/B,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACpC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oBAAoB,EAAE,GAAG,EAAE;QAC5B,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC/C,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC/C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4BAA4B,EAAE,GAAG,EAAE;QACpC,IAAA,eAAM,EAAC,KAAK,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACzD,IAAA,eAAM,EAAC,KAAK,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACtD,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC"}
@@ -0,0 +1,2 @@
1
+ export {};
2
+ //# sourceMappingURL=combinators-ski.test.d.ts.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"combinators-ski.test.d.ts","sourceRoot":"","sources":["../../../src/tests/combinators-ski/combinators-ski.test.ts"],"names":[],"mappings":""}
@@ -0,0 +1,211 @@
1
+ "use strict";
2
+ Object.defineProperty(exports, "__esModule", { value: true });
3
+ const vitest_1 = require("vitest");
4
+ const combinators_ski_1 = require("../../combinators-ski");
5
+ const lambda_calc_1 = require("../../lambda-calc");
6
+ (0, vitest_1.describe)('combinators-ski / reducción básica', () => {
7
+ (0, vitest_1.it)('I x reduce a x en un paso', () => {
8
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('x'));
9
+ const r = (0, combinators_ski_1.reduceStep)(t);
10
+ (0, vitest_1.expect)(r).not.toBeNull();
11
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(r, (0, combinators_ski_1.cvar)('x'))).toBe(true);
12
+ });
13
+ (0, vitest_1.it)('K x y reduce a x en un paso', () => {
14
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x'), (0, combinators_ski_1.cvar)('y'));
15
+ const r = (0, combinators_ski_1.reduceStep)(t);
16
+ (0, vitest_1.expect)(r).not.toBeNull();
17
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(r, (0, combinators_ski_1.cvar)('x'))).toBe(true);
18
+ });
19
+ (0, vitest_1.it)('K x y descarta y aunque y tenga redex', () => {
20
+ // y = I z; tras K x (I z) debe quedar x — sin reducir el segundo arg.
21
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x'), (0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('z')));
22
+ const norm = (0, combinators_ski_1.normalize)(t);
23
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
24
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(norm.result, (0, combinators_ski_1.cvar)('x'))).toBe(true);
25
+ });
26
+ (0, vitest_1.it)('S x y z reduce a x z (y z)', () => {
27
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.S)(), (0, combinators_ski_1.cvar)('x'), (0, combinators_ski_1.cvar)('y'), (0, combinators_ski_1.cvar)('z'));
28
+ const r = (0, combinators_ski_1.reduceStep)(t);
29
+ (0, vitest_1.expect)(r).not.toBeNull();
30
+ const expected = (0, combinators_ski_1.app)((0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('x'), (0, combinators_ski_1.cvar)('z')), (0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('y'), (0, combinators_ski_1.cvar)('z')));
31
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(r, expected)).toBe(true);
32
+ });
33
+ (0, vitest_1.it)('S K K x reduce a x (= I)', () => {
34
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.S)(), (0, combinators_ski_1.K)(), (0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x'));
35
+ const norm = (0, combinators_ski_1.normalize)(t);
36
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
37
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(norm.result, (0, combinators_ski_1.cvar)('x'))).toBe(true);
38
+ });
39
+ (0, vitest_1.it)('isNormalForm: variable libre sola es forma normal', () => {
40
+ (0, vitest_1.expect)((0, combinators_ski_1.isNormalForm)((0, combinators_ski_1.cvar)('x'))).toBe(true);
41
+ (0, vitest_1.expect)((0, combinators_ski_1.isNormalForm)((0, combinators_ski_1.I)())).toBe(true);
42
+ (0, vitest_1.expect)((0, combinators_ski_1.isNormalForm)((0, combinators_ski_1.K)())).toBe(true);
43
+ (0, vitest_1.expect)((0, combinators_ski_1.isNormalForm)((0, combinators_ski_1.S)())).toBe(true);
44
+ });
45
+ (0, vitest_1.it)('isNormalForm: K x sin segundo arg también es FN (under-applied)', () => {
46
+ // K x todavía no tiene los 2 args que necesita.
47
+ (0, vitest_1.expect)((0, combinators_ski_1.isNormalForm)((0, combinators_ski_1.app)((0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x')))).toBe(true);
48
+ (0, vitest_1.expect)((0, combinators_ski_1.isNormalForm)((0, combinators_ski_1.app)((0, combinators_ski_1.S)(), (0, combinators_ski_1.cvar)('x'), (0, combinators_ski_1.cvar)('y')))).toBe(true);
49
+ });
50
+ (0, vitest_1.it)('reduceStep baja por las ramas si no hay redex en cabeza', () => {
51
+ // (K x) (I y) — la cabeza está under-applied a 1 arg; igual baja
52
+ // al subtérmino (I y) para reducirlo.
53
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.app)((0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x')), (0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('y')));
54
+ // Primer paso ahora reduce K x (I y) → x (atomic head, well-applied).
55
+ const r = (0, combinators_ski_1.reduceStep)(t);
56
+ (0, vitest_1.expect)(r).not.toBeNull();
57
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(r, (0, combinators_ski_1.cvar)('x'))).toBe(true);
58
+ });
59
+ });
60
+ (0, vitest_1.describe)('combinators-ski / divergencia y maxSteps', () => {
61
+ (0, vitest_1.it)('un término divergente respeta maxSteps con terminated=false', () => {
62
+ // Omega-equivalente en SKI: SII(SII) — clásico divergente.
63
+ // x = SII; x x = (SII)(SII) → I(SII)(I(SII)) → SII (SII) ...
64
+ const SII = (0, combinators_ski_1.app)((0, combinators_ski_1.S)(), (0, combinators_ski_1.I)(), (0, combinators_ski_1.I)());
65
+ const omega = (0, combinators_ski_1.app)(SII, SII);
66
+ const r = (0, combinators_ski_1.normalize)(omega, 50);
67
+ (0, vitest_1.expect)(r.terminated).toBe(false);
68
+ (0, vitest_1.expect)(r.steps).toBe(50);
69
+ });
70
+ });
71
+ (0, vitest_1.describe)('combinators-ski / bracket abstraction (λ → SKI)', () => {
72
+ (0, vitest_1.it)('abstractFromLambda(λx.x) = I', () => {
73
+ const t = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.v)('x'));
74
+ const c = (0, combinators_ski_1.abstractFromLambda)(t);
75
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(c, (0, combinators_ski_1.I)())).toBe(true);
76
+ });
77
+ (0, vitest_1.it)('abstractFromLambda(λx.λy.x) es equivalente a K', () => {
78
+ // [y] x = K x (x ∉ FV(x)... pero x ≠ y, sí es K x)
79
+ // [x] (K x) = S (K K) I (forma canónica, no sintácticamente K)
80
+ // Aplicado a dos args debe colapsar a x.
81
+ const t = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.v)('x')));
82
+ const c = (0, combinators_ski_1.abstractFromLambda)(t);
83
+ // Test semántico: aplicado a (a, b) debe normalizar a `a`.
84
+ const applied = (0, combinators_ski_1.app)(c, (0, combinators_ski_1.cvar)('a'), (0, combinators_ski_1.cvar)('b'));
85
+ const norm = (0, combinators_ski_1.normalize)(applied);
86
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
87
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(norm.result, (0, combinators_ski_1.cvar)('a'))).toBe(true);
88
+ });
89
+ (0, vitest_1.it)('abstractFromLambda(λx.λy.λz. x z (y z)) es equivalente a S', () => {
90
+ // S = λx.λy.λz. x z (y z)
91
+ const t = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.lam)('z', (0, lambda_calc_1.apN)((0, lambda_calc_1.v)('x'), (0, lambda_calc_1.v)('z'), (0, lambda_calc_1.ap)((0, lambda_calc_1.v)('y'), (0, lambda_calc_1.v)('z'))))));
92
+ const c = (0, combinators_ski_1.abstractFromLambda)(t);
93
+ // Aplicado a (f, g, h) debe normalizar a f h (g h).
94
+ const applied = (0, combinators_ski_1.app)(c, (0, combinators_ski_1.cvar)('f'), (0, combinators_ski_1.cvar)('g'), (0, combinators_ski_1.cvar)('h'));
95
+ const norm = (0, combinators_ski_1.normalize)(applied);
96
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
97
+ const expected = (0, combinators_ski_1.app)((0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('f'), (0, combinators_ski_1.cvar)('h')), (0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('g'), (0, combinators_ski_1.cvar)('h')));
98
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(norm.result, expected)).toBe(true);
99
+ });
100
+ (0, vitest_1.it)('abstractFromLambda(λx.y) = K y (constante respecto a x)', () => {
101
+ const t = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.v)('y'));
102
+ const c = (0, combinators_ski_1.abstractFromLambda)(t);
103
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(c, (0, combinators_ski_1.app)((0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('y')))).toBe(true);
104
+ });
105
+ (0, vitest_1.it)('abstractFromLambda(λx.λy. x y) es equivalente a I aplicado', () => {
106
+ // λx.λy. x y ≡ λx. x bajo η (en λ-cálculo).
107
+ // SKI bracket genera algo más grande; lo probamos vía aplicación.
108
+ const t = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.ap)((0, lambda_calc_1.v)('x'), (0, lambda_calc_1.v)('y'))));
109
+ const c = (0, combinators_ski_1.abstractFromLambda)(t);
110
+ const applied = (0, combinators_ski_1.app)(c, (0, combinators_ski_1.cvar)('f'), (0, combinators_ski_1.cvar)('a'));
111
+ const norm = (0, combinators_ski_1.normalize)(applied);
112
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
113
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(norm.result, (0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('f'), (0, combinators_ski_1.cvar)('a')))).toBe(true);
114
+ });
115
+ (0, vitest_1.it)('abstractFromLambda no contiene abstracciones (sólo S/K/I/var/app)', () => {
116
+ // Cualquier λ-término debe traducirse a una expresión de combinadores pura.
117
+ const t = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.lam)('z', (0, lambda_calc_1.apN)((0, lambda_calc_1.v)('x'), (0, lambda_calc_1.v)('z'), (0, lambda_calc_1.ap)((0, lambda_calc_1.v)('y'), (0, lambda_calc_1.v)('z'))))));
118
+ const c = (0, combinators_ski_1.abstractFromLambda)(t);
119
+ assertNoBinders(c);
120
+ });
121
+ });
122
+ (0, vitest_1.describe)('combinators-ski / round-trip semántico', () => {
123
+ (0, vitest_1.it)('toLambda(I), toLambda(K), toLambda(S) son las definiciones λ canónicas', () => {
124
+ (0, vitest_1.expect)((0, lambda_calc_1.alphaEq)((0, combinators_ski_1.toLambda)((0, combinators_ski_1.I)()), (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.v)('x')))).toBe(true);
125
+ (0, vitest_1.expect)((0, lambda_calc_1.alphaEq)((0, combinators_ski_1.toLambda)((0, combinators_ski_1.K)()), (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.v)('x'))))).toBe(true);
126
+ const Slam = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.lam)('z', (0, lambda_calc_1.apN)((0, lambda_calc_1.v)('x'), (0, lambda_calc_1.v)('z'), (0, lambda_calc_1.ap)((0, lambda_calc_1.v)('y'), (0, lambda_calc_1.v)('z'))))));
127
+ (0, vitest_1.expect)((0, lambda_calc_1.alphaEq)((0, combinators_ski_1.toLambda)((0, combinators_ski_1.S)()), Slam)).toBe(true);
128
+ });
129
+ (0, vitest_1.it)('round-trip λ → SKI → λ preserva la semántica aplicada (identidad)', () => {
130
+ // Aplicamos `(λx.x) a` y `(toLambda(abstract(λx.x))) a` y comparamos formas normales.
131
+ const idLam = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.v)('x'));
132
+ const skis = (0, combinators_ski_1.abstractFromLambda)(idLam);
133
+ const lamBack = (0, combinators_ski_1.toLambda)(skis);
134
+ const lhs = (0, lambda_calc_1.normalize)((0, lambda_calc_1.ap)(idLam, (0, lambda_calc_1.v)('a')));
135
+ const rhs = (0, lambda_calc_1.normalize)((0, lambda_calc_1.ap)(lamBack, (0, lambda_calc_1.v)('a')));
136
+ (0, vitest_1.expect)(lhs.terminated).toBe(true);
137
+ (0, vitest_1.expect)(rhs.terminated).toBe(true);
138
+ (0, vitest_1.expect)((0, lambda_calc_1.alphaEq)(lhs.result, rhs.result)).toBe(true);
139
+ });
140
+ (0, vitest_1.it)('round-trip preserva semántica de K aplicado a (a, b)', () => {
141
+ const Klam = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.v)('x')));
142
+ const skis = (0, combinators_ski_1.abstractFromLambda)(Klam);
143
+ const lamBack = (0, combinators_ski_1.toLambda)(skis);
144
+ const applied = (0, lambda_calc_1.apN)(lamBack, (0, lambda_calc_1.v)('a'), (0, lambda_calc_1.v)('b'));
145
+ const norm = (0, lambda_calc_1.normalize)(applied);
146
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
147
+ (0, vitest_1.expect)((0, lambda_calc_1.alphaEq)(norm.result, (0, lambda_calc_1.v)('a'))).toBe(true);
148
+ });
149
+ (0, vitest_1.it)('round-trip preserva semántica de S aplicado a (f, g, h)', () => {
150
+ const Slam = (0, lambda_calc_1.lam)('x', (0, lambda_calc_1.lam)('y', (0, lambda_calc_1.lam)('z', (0, lambda_calc_1.apN)((0, lambda_calc_1.v)('x'), (0, lambda_calc_1.v)('z'), (0, lambda_calc_1.ap)((0, lambda_calc_1.v)('y'), (0, lambda_calc_1.v)('z'))))));
151
+ const skis = (0, combinators_ski_1.abstractFromLambda)(Slam);
152
+ const lamBack = (0, combinators_ski_1.toLambda)(skis);
153
+ const applied = (0, lambda_calc_1.apN)(lamBack, (0, lambda_calc_1.v)('f'), (0, lambda_calc_1.v)('g'), (0, lambda_calc_1.v)('h'));
154
+ const norm = (0, lambda_calc_1.normalize)(applied);
155
+ (0, vitest_1.expect)(norm.terminated).toBe(true);
156
+ // Forma normal: f h (g h).
157
+ const expected = (0, lambda_calc_1.apN)((0, lambda_calc_1.v)('f'), (0, lambda_calc_1.v)('h'), (0, lambda_calc_1.ap)((0, lambda_calc_1.v)('g'), (0, lambda_calc_1.v)('h')));
158
+ (0, vitest_1.expect)((0, lambda_calc_1.alphaEq)(norm.result, expected)).toBe(true);
159
+ });
160
+ });
161
+ (0, vitest_1.describe)('combinators-ski / utilidades', () => {
162
+ (0, vitest_1.it)('termToString imprime aplicaciones asociativas a la izquierda', () => {
163
+ // S K K x → "S K K x" (sin paréntesis: todo es app-izquierda)
164
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.S)(), (0, combinators_ski_1.K)(), (0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x'));
165
+ (0, vitest_1.expect)((0, combinators_ski_1.termToString)(t)).toBe('S K K x');
166
+ });
167
+ (0, vitest_1.it)('termToString agrupa con paréntesis los args que son aplicaciones', () => {
168
+ // f (g x)
169
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('f'), (0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('g'), (0, combinators_ski_1.cvar)('x')));
170
+ (0, vitest_1.expect)((0, combinators_ski_1.termToString)(t)).toBe('f (g x)');
171
+ });
172
+ (0, vitest_1.it)('freeVars enumera variables libres', () => {
173
+ // S (K x) y → libres: {x, y}
174
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.S)(), (0, combinators_ski_1.app)((0, combinators_ski_1.K)(), (0, combinators_ski_1.cvar)('x')), (0, combinators_ski_1.cvar)('y'));
175
+ const fv = (0, combinators_ski_1.freeVars)(t);
176
+ (0, vitest_1.expect)(fv.has('x')).toBe(true);
177
+ (0, vitest_1.expect)(fv.has('y')).toBe(true);
178
+ (0, vitest_1.expect)(fv.size).toBe(2);
179
+ });
180
+ (0, vitest_1.it)('app con un solo argumento devuelve el término tal cual', () => {
181
+ const t = (0, combinators_ski_1.app)((0, combinators_ski_1.cvar)('x'));
182
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)(t, (0, combinators_ski_1.cvar)('x'))).toBe(true);
183
+ });
184
+ (0, vitest_1.it)('app() sin argumentos lanza', () => {
185
+ (0, vitest_1.expect)(() => (0, combinators_ski_1.app)()).toThrow();
186
+ });
187
+ (0, vitest_1.it)('ctermEq distingue por estructura', () => {
188
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)((0, combinators_ski_1.I)(), (0, combinators_ski_1.I)())).toBe(true);
189
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)((0, combinators_ski_1.K)(), (0, combinators_ski_1.S)())).toBe(false);
190
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)((0, combinators_ski_1.cvar)('x'), (0, combinators_ski_1.cvar)('y'))).toBe(false);
191
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)((0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('x')), (0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('x')))).toBe(true);
192
+ (0, vitest_1.expect)((0, combinators_ski_1.ctermEq)((0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('x')), (0, combinators_ski_1.app)((0, combinators_ski_1.I)(), (0, combinators_ski_1.cvar)('y')))).toBe(false);
193
+ });
194
+ });
195
+ // Helper de test: confirma que un CTerm no contiene nodos de tipo 'abs'
196
+ // (sería estructuralmente imposible en SKI, pero comprueba que el tipo
197
+ // generado por bracket abstraction es realmente puro).
198
+ function assertNoBinders(t) {
199
+ switch (t.kind) {
200
+ case 'S':
201
+ case 'K':
202
+ case 'I':
203
+ case 'var':
204
+ return;
205
+ case 'app':
206
+ assertNoBinders(t.fn);
207
+ assertNoBinders(t.arg);
208
+ return;
209
+ }
210
+ }
211
+ //# sourceMappingURL=combinators-ski.test.js.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"combinators-ski.test.js","sourceRoot":"","sources":["../../../src/tests/combinators-ski/combinators-ski.test.ts"],"names":[],"mappings":";;AAAA,mCAA8C;AAC9C,2DAc+B;AAE/B,mDAO2B;AAG3B,IAAA,iBAAQ,EAAC,oCAAoC,EAAE,GAAG,EAAE;IAClD,IAAA,WAAE,EAAC,2BAA2B,EAAE,GAAG,EAAE;QACnC,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QAC9B,MAAM,CAAC,GAAG,IAAA,4BAAU,EAAC,CAAC,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,EAAE,CAAC;QACzB,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC5C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,6BAA6B,EAAE,GAAG,EAAE;QACrC,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACzC,MAAM,CAAC,GAAG,IAAA,4BAAU,EAAC,CAAC,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,EAAE,CAAC;QACzB,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC5C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uCAAuC,EAAE,GAAG,EAAE;QAC/C,sEAAsE;QACtE,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACnD,MAAM,IAAI,GAAG,IAAA,2BAAS,EAAC,CAAC,CAAC,CAAC;QAC1B,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4BAA4B,EAAE,GAAG,EAAE;QACpC,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACpD,MAAM,CAAC,GAAG,IAAA,4BAAU,EAAC,CAAC,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,EAAE,CAAC;QACzB,MAAM,QAAQ,GAAG,IAAA,qBAAG,EAAC,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC3E,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAE,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC3C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,0BAA0B,EAAE,GAAG,EAAE;QAClC,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACxC,MAAM,IAAI,GAAG,IAAA,2BAAS,EAAC,CAAC,CAAC,CAAC;QAC1B,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mDAAmD,EAAE,GAAG,EAAE;QAC3D,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC3C,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,IAAA,mBAAC,GAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACrC,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,IAAA,mBAAC,GAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACrC,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,IAAA,mBAAC,GAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACvC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iEAAiE,EAAE,GAAG,EAAE;QACzE,gDAAgD;QAChD,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACrD,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAClE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,yDAAyD,EAAE,GAAG,EAAE;QACjE,kEAAkE;QAClE,sCAAsC;QACtC,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACxD,sEAAsE;QACtE,MAAM,CAAC,GAAG,IAAA,4BAAU,EAAC,CAAC,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,EAAE,CAAC;QACzB,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC5C,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,0CAA0C,EAAE,GAAG,EAAE;IACxD,IAAA,WAAE,EAAC,6DAA6D,EAAE,GAAG,EAAE;QACrE,2DAA2D;QAC3D,8DAA8D;QAC9D,MAAM,GAAG,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,CAAC,CAAC;QAC/B,MAAM,KAAK,GAAG,IAAA,qBAAG,EAAC,GAAG,EAAE,GAAG,CAAC,CAAC;QAC5B,MAAM,CAAC,GAAG,IAAA,2BAAS,EAAC,KAAK,EAAE,EAAE,CAAC,CAAC;QAC/B,IAAA,eAAM,EAAC,CAAC,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;QACjC,IAAA,eAAM,EAAC,CAAC,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IAC3B,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,iDAAiD,EAAE,GAAG,EAAE;IAC/D,IAAA,WAAE,EAAC,8BAA8B,EAAE,GAAG,EAAE;QACtC,MAAM,CAAC,GAAG,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC;QAChC,MAAM,CAAC,GAAG,IAAA,oCAAkB,EAAC,CAAC,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAC,EAAE,IAAA,mBAAC,GAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,gDAAgD,EAAE,GAAG,EAAE;QACxD,yDAAyD;QACzD,mEAAmE;QACnE,yCAAyC;QACzC,MAAM,CAAC,GAAG,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC1C,MAAM,CAAC,GAAG,IAAA,oCAAkB,EAAC,CAAC,CAAC,CAAC;QAChC,2DAA2D;QAC3D,MAAM,OAAO,GAAG,IAAA,qBAAG,EAAC,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QAC7C,MAAM,IAAI,GAAG,IAAA,2BAAS,EAAC,OAAO,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4DAA4D,EAAE,GAAG,EAAE;QACpE,0BAA0B;QAC1B,MAAM,CAAC,GAAG,IAAA,iBAAG,EACX,GAAG,EACH,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAM,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,gBAAK,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CACtF,CAAC;QACF,MAAM,CAAC,GAAG,IAAA,oCAAkB,EAAC,CAAC,CAAC,CAAC;QAChC,oDAAoD;QACpD,MAAM,OAAO,GAAG,IAAA,qBAAG,EAAC,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACxD,MAAM,IAAI,GAAG,IAAA,2BAAS,EAAC,OAAO,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,MAAM,QAAQ,GAAG,IAAA,qBAAG,EAAC,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC3E,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACpD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,yDAAyD,EAAE,GAAG,EAAE;QACjE,MAAM,CAAC,GAAG,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC;QAChC,MAAM,CAAC,GAAG,IAAA,oCAAkB,EAAC,CAAC,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4DAA4D,EAAE,GAAG,EAAE;QACpE,iDAAiD;QACjD,kEAAkE;QAClE,MAAM,CAAC,GAAG,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,gBAAK,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;QAC9D,MAAM,CAAC,GAAG,IAAA,oCAAkB,EAAC,CAAC,CAAC,CAAC;QAChC,MAAM,OAAO,GAAG,IAAA,qBAAG,EAAC,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QAC7C,MAAM,IAAI,GAAG,IAAA,2BAAS,EAAC,OAAO,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mEAAmE,EAAE,GAAG,EAAE;QAC3E,4EAA4E;QAC5E,MAAM,CAAC,GAAG,IAAA,iBAAG,EACX,GAAG,EACH,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAM,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,gBAAK,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CACtF,CAAC;QACF,MAAM,CAAC,GAAG,IAAA,oCAAkB,EAAC,CAAC,CAAC,CAAC;QAChC,eAAe,CAAC,CAAC,CAAC,CAAC;IACrB,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,wCAAwC,EAAE,GAAG,EAAE;IACtD,IAAA,WAAE,EAAC,wEAAwE,EAAE,GAAG,EAAE;QAChF,IAAA,eAAM,EAAC,IAAA,qBAAO,EAAC,IAAA,0BAAQ,EAAC,IAAA,mBAAC,GAAE,CAAC,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACjE,IAAA,eAAM,EAAC,IAAA,qBAAO,EAAC,IAAA,0BAAQ,EAAC,IAAA,mBAAC,GAAE,CAAC,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC3E,MAAM,IAAI,GAAe,IAAA,iBAAG,EAC1B,GAAG,EACH,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAM,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,gBAAK,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CACtF,CAAC;QACF,IAAA,eAAM,EAAC,IAAA,qBAAO,EAAC,IAAA,0BAAQ,EAAC,IAAA,mBAAC,GAAE,CAAC,EAAE,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAClD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mEAAmE,EAAE,GAAG,EAAE;QAC3E,sFAAsF;QACtF,MAAM,KAAK,GAAe,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC;QAChD,MAAM,IAAI,GAAG,IAAA,oCAAkB,EAAC,KAAK,CAAC,CAAC;QACvC,MAAM,OAAO,GAAG,IAAA,0BAAQ,EAAC,IAAI,CAAC,CAAC;QAC/B,MAAM,GAAG,GAAG,IAAA,uBAAY,EAAC,IAAA,gBAAK,EAAC,KAAK,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACpD,MAAM,GAAG,GAAG,IAAA,uBAAY,EAAC,IAAA,gBAAK,EAAC,OAAO,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACtD,IAAA,eAAM,EAAC,GAAG,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAClC,IAAA,eAAM,EAAC,GAAG,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAClC,IAAA,eAAM,EAAC,IAAA,qBAAO,EAAC,GAAG,CAAC,MAAM,EAAE,GAAG,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,sDAAsD,EAAE,GAAG,EAAE;QAC9D,MAAM,IAAI,GAAe,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACzD,MAAM,IAAI,GAAG,IAAA,oCAAkB,EAAC,IAAI,CAAC,CAAC;QACtC,MAAM,OAAO,GAAG,IAAA,0BAAQ,EAAC,IAAI,CAAC,CAAC;QAC/B,MAAM,OAAO,GAAG,IAAA,iBAAM,EAAC,OAAO,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC;QAC1D,MAAM,IAAI,GAAG,IAAA,uBAAY,EAAC,OAAO,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAA,qBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACvD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,yDAAyD,EAAE,GAAG,EAAE;QACjE,MAAM,IAAI,GAAe,IAAA,iBAAG,EAC1B,GAAG,EACH,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAG,EAAC,GAAG,EAAE,IAAA,iBAAM,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,gBAAK,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CACtF,CAAC;QACF,MAAM,IAAI,GAAG,IAAA,oCAAkB,EAAC,IAAI,CAAC,CAAC;QACtC,MAAM,OAAO,GAAG,IAAA,0BAAQ,EAAC,IAAI,CAAC,CAAC;QAC/B,MAAM,OAAO,GAAG,IAAA,iBAAM,EAAC,OAAO,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC;QACvE,MAAM,IAAI,GAAG,IAAA,uBAAY,EAAC,OAAO,CAAC,CAAC;QACnC,IAAA,eAAM,EAAC,IAAI,CAAC,UAAU,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACnC,2BAA2B;QAC3B,MAAM,QAAQ,GAAG,IAAA,iBAAM,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,gBAAK,EAAC,IAAA,eAAM,EAAC,GAAG,CAAC,EAAE,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACnF,IAAA,eAAM,EAAC,IAAA,qBAAO,EAAC,IAAI,CAAC,MAAM,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACpD,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,8BAA8B,EAAE,GAAG,EAAE;IAC5C,IAAA,WAAE,EAAC,8DAA8D,EAAE,GAAG,EAAE;QACtE,+DAA+D;QAC/D,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACxC,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;IAC1C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kEAAkE,EAAE,GAAG,EAAE;QAC1E,UAAU;QACV,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QACpD,IAAA,eAAM,EAAC,IAAA,8BAAY,EAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;IAC1C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mCAAmC,EAAE,GAAG,EAAE;QAC3C,8BAA8B;QAC9B,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACnD,MAAM,EAAE,GAAG,IAAA,0BAAQ,EAAC,CAAC,CAAC,CAAC;QACvB,IAAA,eAAM,EAAC,EAAE,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC/B,IAAA,eAAM,EAAC,EAAE,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC/B,IAAA,eAAM,EAAC,EAAE,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAC1B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,wDAAwD,EAAE,GAAG,EAAE;QAChE,MAAM,CAAC,GAAG,IAAA,qBAAG,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC;QACzB,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC3C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4BAA4B,EAAE,GAAG,EAAE;QACpC,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,qBAAG,GAAE,CAAC,CAAC,OAAO,EAAE,CAAC;IAChC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kCAAkC,EAAE,GAAG,EAAE;QAC1C,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACrC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,mBAAC,GAAE,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;QACtC,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAA,sBAAI,EAAC,GAAG,CAAC,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;QAClD,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACrE,IAAA,eAAM,EAAC,IAAA,yBAAO,EAAC,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,EAAE,IAAA,qBAAG,EAAC,IAAA,mBAAC,GAAE,EAAE,IAAA,sBAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACxE,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,wEAAwE;AACxE,uEAAuE;AACvE,uDAAuD;AACvD,SAAS,eAAe,CAAC,CAAQ;IAC/B,QAAQ,CAAC,CAAC,IAAI,EAAE,CAAC;QACf,KAAK,GAAG,CAAC;QACT,KAAK,GAAG,CAAC;QACT,KAAK,GAAG,CAAC;QACT,KAAK,KAAK;YACR,OAAO;QACT,KAAK,KAAK;YACR,eAAe,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;YACtB,eAAe,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;YACvB,OAAO;IACX,CAAC;AACH,CAAC"}
@@ -0,0 +1,2 @@
1
+ export {};
2
+ //# sourceMappingURL=constructive-reals.test.d.ts.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"constructive-reals.test.d.ts","sourceRoot":"","sources":["../../../src/tests/constructive-reals/constructive-reals.test.ts"],"names":[],"mappings":""}