@stevenvo780/st-lang 4.8.0 → 4.10.0

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 (265) hide show
  1. package/dist/logic/profiles/natural-deduction-nk/formula.d.ts +18 -0
  2. package/dist/logic/profiles/natural-deduction-nk/formula.d.ts.map +1 -0
  3. package/dist/logic/profiles/natural-deduction-nk/formula.js +102 -0
  4. package/dist/logic/profiles/natural-deduction-nk/formula.js.map +1 -0
  5. package/dist/logic/profiles/natural-deduction-nk/index.d.ts +5 -0
  6. package/dist/logic/profiles/natural-deduction-nk/index.d.ts.map +1 -0
  7. package/dist/logic/profiles/natural-deduction-nk/index.js +28 -0
  8. package/dist/logic/profiles/natural-deduction-nk/index.js.map +1 -0
  9. package/dist/logic/profiles/natural-deduction-nk/prover.d.ts +49 -0
  10. package/dist/logic/profiles/natural-deduction-nk/prover.d.ts.map +1 -0
  11. package/dist/logic/profiles/natural-deduction-nk/prover.js +557 -0
  12. package/dist/logic/profiles/natural-deduction-nk/prover.js.map +1 -0
  13. package/dist/logic/profiles/natural-deduction-nk/types.d.ts +48 -0
  14. package/dist/logic/profiles/natural-deduction-nk/types.d.ts.map +1 -0
  15. package/dist/logic/profiles/natural-deduction-nk/types.js +35 -0
  16. package/dist/logic/profiles/natural-deduction-nk/types.js.map +1 -0
  17. package/dist/logic/profiles/quantum/index.d.ts +153 -0
  18. package/dist/logic/profiles/quantum/index.d.ts.map +1 -0
  19. package/dist/logic/profiles/quantum/index.js +788 -0
  20. package/dist/logic/profiles/quantum/index.js.map +1 -0
  21. package/dist/namespaces/reasoning.d.ts +2 -1
  22. package/dist/namespaces/reasoning.d.ts.map +1 -1
  23. package/dist/namespaces/reasoning.js +3 -1
  24. package/dist/namespaces/reasoning.js.map +1 -1
  25. package/dist/proof-systems/certificate/canonical.d.ts +18 -0
  26. package/dist/proof-systems/certificate/canonical.d.ts.map +1 -0
  27. package/dist/proof-systems/certificate/canonical.js +79 -0
  28. package/dist/proof-systems/certificate/canonical.js.map +1 -0
  29. package/dist/proof-systems/certificate/generate.d.ts +39 -0
  30. package/dist/proof-systems/certificate/generate.d.ts.map +1 -0
  31. package/dist/proof-systems/certificate/generate.js +259 -0
  32. package/dist/proof-systems/certificate/generate.js.map +1 -0
  33. package/dist/proof-systems/certificate/index.d.ts +7 -0
  34. package/dist/proof-systems/certificate/index.d.ts.map +1 -0
  35. package/dist/proof-systems/certificate/index.js +23 -0
  36. package/dist/proof-systems/certificate/index.js.map +1 -0
  37. package/dist/proof-systems/certificate/lfsc.d.ts +15 -0
  38. package/dist/proof-systems/certificate/lfsc.d.ts.map +1 -0
  39. package/dist/proof-systems/certificate/lfsc.js +395 -0
  40. package/dist/proof-systems/certificate/lfsc.js.map +1 -0
  41. package/dist/proof-systems/certificate/rules.d.ts +8 -0
  42. package/dist/proof-systems/certificate/rules.d.ts.map +1 -0
  43. package/dist/proof-systems/certificate/rules.js +369 -0
  44. package/dist/proof-systems/certificate/rules.js.map +1 -0
  45. package/dist/proof-systems/certificate/types.d.ts +114 -0
  46. package/dist/proof-systems/certificate/types.d.ts.map +1 -0
  47. package/dist/proof-systems/certificate/types.js +18 -0
  48. package/dist/proof-systems/certificate/types.js.map +1 -0
  49. package/dist/proof-systems/certificate/verify.d.ts +20 -0
  50. package/dist/proof-systems/certificate/verify.d.ts.map +1 -0
  51. package/dist/proof-systems/certificate/verify.js +171 -0
  52. package/dist/proof-systems/certificate/verify.js.map +1 -0
  53. package/dist/reasoning/automata/dfa.d.ts +17 -0
  54. package/dist/reasoning/automata/dfa.d.ts.map +1 -0
  55. package/dist/reasoning/automata/dfa.js +276 -0
  56. package/dist/reasoning/automata/dfa.js.map +1 -0
  57. package/dist/reasoning/automata/index.d.ts +8 -0
  58. package/dist/reasoning/automata/index.d.ts.map +1 -0
  59. package/dist/reasoning/automata/index.js +64 -0
  60. package/dist/reasoning/automata/index.js.map +1 -0
  61. package/dist/reasoning/automata/languages.d.ts +10 -0
  62. package/dist/reasoning/automata/languages.d.ts.map +1 -0
  63. package/dist/reasoning/automata/languages.js +78 -0
  64. package/dist/reasoning/automata/languages.js.map +1 -0
  65. package/dist/reasoning/automata/nfa.d.ts +8 -0
  66. package/dist/reasoning/automata/nfa.d.ts.map +1 -0
  67. package/dist/reasoning/automata/nfa.js +122 -0
  68. package/dist/reasoning/automata/nfa.js.map +1 -0
  69. package/dist/reasoning/automata/pda.d.ts +10 -0
  70. package/dist/reasoning/automata/pda.d.ts.map +1 -0
  71. package/dist/reasoning/automata/pda.js +169 -0
  72. package/dist/reasoning/automata/pda.js.map +1 -0
  73. package/dist/reasoning/automata/regex.d.ts +6 -0
  74. package/dist/reasoning/automata/regex.d.ts.map +1 -0
  75. package/dist/reasoning/automata/regex.js +259 -0
  76. package/dist/reasoning/automata/regex.js.map +1 -0
  77. package/dist/reasoning/automata/types.d.ts +69 -0
  78. package/dist/reasoning/automata/types.d.ts.map +1 -0
  79. package/dist/reasoning/automata/types.js +29 -0
  80. package/dist/reasoning/automata/types.js.map +1 -0
  81. package/dist/reasoning/ban-logic/analyze.d.ts +31 -0
  82. package/dist/reasoning/ban-logic/analyze.d.ts.map +1 -0
  83. package/dist/reasoning/ban-logic/analyze.js +113 -0
  84. package/dist/reasoning/ban-logic/analyze.js.map +1 -0
  85. package/dist/reasoning/ban-logic/index.d.ts +7 -0
  86. package/dist/reasoning/ban-logic/index.d.ts.map +1 -0
  87. package/dist/reasoning/ban-logic/index.js +66 -0
  88. package/dist/reasoning/ban-logic/index.js.map +1 -0
  89. package/dist/reasoning/ban-logic/protocols.d.ts +54 -0
  90. package/dist/reasoning/ban-logic/protocols.d.ts.map +1 -0
  91. package/dist/reasoning/ban-logic/protocols.js +219 -0
  92. package/dist/reasoning/ban-logic/protocols.js.map +1 -0
  93. package/dist/reasoning/ban-logic/rules.d.ts +83 -0
  94. package/dist/reasoning/ban-logic/rules.d.ts.map +1 -0
  95. package/dist/reasoning/ban-logic/rules.js +409 -0
  96. package/dist/reasoning/ban-logic/rules.js.map +1 -0
  97. package/dist/reasoning/ban-logic/terms.d.ts +26 -0
  98. package/dist/reasoning/ban-logic/terms.d.ts.map +1 -0
  99. package/dist/reasoning/ban-logic/terms.js +262 -0
  100. package/dist/reasoning/ban-logic/terms.js.map +1 -0
  101. package/dist/reasoning/ban-logic/types.d.ts +107 -0
  102. package/dist/reasoning/ban-logic/types.d.ts.map +1 -0
  103. package/dist/reasoning/ban-logic/types.js +27 -0
  104. package/dist/reasoning/ban-logic/types.js.map +1 -0
  105. package/dist/reasoning/computability/index.d.ts +239 -0
  106. package/dist/reasoning/computability/index.d.ts.map +1 -0
  107. package/dist/reasoning/computability/index.js +851 -0
  108. package/dist/reasoning/computability/index.js.map +1 -0
  109. package/dist/reasoning/differential-privacy/index.d.ts +121 -0
  110. package/dist/reasoning/differential-privacy/index.d.ts.map +1 -0
  111. package/dist/reasoning/differential-privacy/index.js +417 -0
  112. package/dist/reasoning/differential-privacy/index.js.map +1 -0
  113. package/dist/reasoning/number-theory/crt.d.ts +9 -0
  114. package/dist/reasoning/number-theory/crt.d.ts.map +1 -0
  115. package/dist/reasoning/number-theory/crt.js +39 -0
  116. package/dist/reasoning/number-theory/crt.js.map +1 -0
  117. package/dist/reasoning/number-theory/diophantine.d.ts +10 -0
  118. package/dist/reasoning/number-theory/diophantine.d.ts.map +1 -0
  119. package/dist/reasoning/number-theory/diophantine.js +87 -0
  120. package/dist/reasoning/number-theory/diophantine.js.map +1 -0
  121. package/dist/reasoning/number-theory/factorization.d.ts +12 -0
  122. package/dist/reasoning/number-theory/factorization.d.ts.map +1 -0
  123. package/dist/reasoning/number-theory/factorization.js +136 -0
  124. package/dist/reasoning/number-theory/factorization.js.map +1 -0
  125. package/dist/reasoning/number-theory/gcd.d.ts +8 -0
  126. package/dist/reasoning/number-theory/gcd.d.ts.map +1 -0
  127. package/dist/reasoning/number-theory/gcd.js +51 -0
  128. package/dist/reasoning/number-theory/gcd.js.map +1 -0
  129. package/dist/reasoning/number-theory/index.d.ts +9 -0
  130. package/dist/reasoning/number-theory/index.d.ts.map +1 -0
  131. package/dist/reasoning/number-theory/index.js +46 -0
  132. package/dist/reasoning/number-theory/index.js.map +1 -0
  133. package/dist/reasoning/number-theory/modular.d.ts +6 -0
  134. package/dist/reasoning/number-theory/modular.d.ts.map +1 -0
  135. package/dist/reasoning/number-theory/modular.js +75 -0
  136. package/dist/reasoning/number-theory/modular.js.map +1 -0
  137. package/dist/reasoning/number-theory/primality.d.ts +6 -0
  138. package/dist/reasoning/number-theory/primality.d.ts.map +1 -0
  139. package/dist/reasoning/number-theory/primality.js +144 -0
  140. package/dist/reasoning/number-theory/primality.js.map +1 -0
  141. package/dist/reasoning/number-theory/symbols.d.ts +3 -0
  142. package/dist/reasoning/number-theory/symbols.d.ts.map +1 -0
  143. package/dist/reasoning/number-theory/symbols.js +57 -0
  144. package/dist/reasoning/number-theory/symbols.js.map +1 -0
  145. package/dist/reasoning/real-analysis/index.d.ts +127 -0
  146. package/dist/reasoning/real-analysis/index.d.ts.map +1 -0
  147. package/dist/reasoning/real-analysis/index.js +638 -0
  148. package/dist/reasoning/real-analysis/index.js.map +1 -0
  149. package/dist/reasoning/topology/index.d.ts +41 -0
  150. package/dist/reasoning/topology/index.d.ts.map +1 -0
  151. package/dist/reasoning/topology/index.js +739 -0
  152. package/dist/reasoning/topology/index.js.map +1 -0
  153. package/dist/tests/logic/profiles/natural-deduction-nk/nk.test.d.ts +2 -0
  154. package/dist/tests/logic/profiles/natural-deduction-nk/nk.test.d.ts.map +1 -0
  155. package/dist/tests/logic/profiles/natural-deduction-nk/nk.test.js +288 -0
  156. package/dist/tests/logic/profiles/natural-deduction-nk/nk.test.js.map +1 -0
  157. package/dist/tests/logic/profiles/quantum/quantum.test.d.ts +2 -0
  158. package/dist/tests/logic/profiles/quantum/quantum.test.d.ts.map +1 -0
  159. package/dist/tests/logic/profiles/quantum/quantum.test.js +209 -0
  160. package/dist/tests/logic/profiles/quantum/quantum.test.js.map +1 -0
  161. package/dist/tests/proof-systems/certificate/certificate.test.d.ts +2 -0
  162. package/dist/tests/proof-systems/certificate/certificate.test.d.ts.map +1 -0
  163. package/dist/tests/proof-systems/certificate/certificate.test.js +449 -0
  164. package/dist/tests/proof-systems/certificate/certificate.test.js.map +1 -0
  165. package/dist/tests/reasoning/automata/automata.test.d.ts +2 -0
  166. package/dist/tests/reasoning/automata/automata.test.d.ts.map +1 -0
  167. package/dist/tests/reasoning/automata/automata.test.js +310 -0
  168. package/dist/tests/reasoning/automata/automata.test.js.map +1 -0
  169. package/dist/tests/reasoning/ban-logic/ban-logic.test.d.ts +2 -0
  170. package/dist/tests/reasoning/ban-logic/ban-logic.test.d.ts.map +1 -0
  171. package/dist/tests/reasoning/ban-logic/ban-logic.test.js +270 -0
  172. package/dist/tests/reasoning/ban-logic/ban-logic.test.js.map +1 -0
  173. package/dist/tests/reasoning/computability/computability.test.d.ts +2 -0
  174. package/dist/tests/reasoning/computability/computability.test.d.ts.map +1 -0
  175. package/dist/tests/reasoning/computability/computability.test.js +246 -0
  176. package/dist/tests/reasoning/computability/computability.test.js.map +1 -0
  177. package/dist/tests/reasoning/differential-privacy/differential-privacy.test.d.ts +2 -0
  178. package/dist/tests/reasoning/differential-privacy/differential-privacy.test.d.ts.map +1 -0
  179. package/dist/tests/reasoning/differential-privacy/differential-privacy.test.js +388 -0
  180. package/dist/tests/reasoning/differential-privacy/differential-privacy.test.js.map +1 -0
  181. package/dist/tests/reasoning/number-theory/number-theory.test.d.ts +2 -0
  182. package/dist/tests/reasoning/number-theory/number-theory.test.d.ts.map +1 -0
  183. package/dist/tests/reasoning/number-theory/number-theory.test.js +170 -0
  184. package/dist/tests/reasoning/number-theory/number-theory.test.js.map +1 -0
  185. package/dist/tests/reasoning/real-analysis/real-analysis.test.d.ts +2 -0
  186. package/dist/tests/reasoning/real-analysis/real-analysis.test.d.ts.map +1 -0
  187. package/dist/tests/reasoning/real-analysis/real-analysis.test.js +197 -0
  188. package/dist/tests/reasoning/real-analysis/real-analysis.test.js.map +1 -0
  189. package/dist/tests/reasoning/topology/topology.test.d.ts +2 -0
  190. package/dist/tests/reasoning/topology/topology.test.d.ts.map +1 -0
  191. package/dist/tests/reasoning/topology/topology.test.js +327 -0
  192. package/dist/tests/reasoning/topology/topology.test.js.map +1 -0
  193. package/dist/tests/tooling/exporters/lean4/lean4-exporter.test.d.ts +2 -0
  194. package/dist/tests/tooling/exporters/lean4/lean4-exporter.test.d.ts.map +1 -0
  195. package/dist/tests/tooling/exporters/lean4/lean4-exporter.test.js +473 -0
  196. package/dist/tests/tooling/exporters/lean4/lean4-exporter.test.js.map +1 -0
  197. package/dist/tests/tooling/mathlib/mathlib.test.d.ts +2 -0
  198. package/dist/tests/tooling/mathlib/mathlib.test.d.ts.map +1 -0
  199. package/dist/tests/tooling/mathlib/mathlib.test.js +214 -0
  200. package/dist/tests/tooling/mathlib/mathlib.test.js.map +1 -0
  201. package/dist/tests/type-theory/effects/effects.test.d.ts +2 -0
  202. package/dist/tests/type-theory/effects/effects.test.d.ts.map +1 -0
  203. package/dist/tests/type-theory/effects/effects.test.js +242 -0
  204. package/dist/tests/type-theory/effects/effects.test.js.map +1 -0
  205. package/dist/tooling/exporters/lean4/index.d.ts +47 -0
  206. package/dist/tooling/exporters/lean4/index.d.ts.map +1 -0
  207. package/dist/tooling/exporters/lean4/index.js +423 -0
  208. package/dist/tooling/exporters/lean4/index.js.map +1 -0
  209. package/dist/tooling/mathlib/group.d.ts +27 -0
  210. package/dist/tooling/mathlib/group.d.ts.map +1 -0
  211. package/dist/tooling/mathlib/group.js +89 -0
  212. package/dist/tooling/mathlib/group.js.map +1 -0
  213. package/dist/tooling/mathlib/index.d.ts +8 -0
  214. package/dist/tooling/mathlib/index.d.ts.map +1 -0
  215. package/dist/tooling/mathlib/index.js +40 -0
  216. package/dist/tooling/mathlib/index.js.map +1 -0
  217. package/dist/tooling/mathlib/instances.d.ts +29 -0
  218. package/dist/tooling/mathlib/instances.d.ts.map +1 -0
  219. package/dist/tooling/mathlib/instances.js +139 -0
  220. package/dist/tooling/mathlib/instances.js.map +1 -0
  221. package/dist/tooling/mathlib/lemmas.d.ts +3 -0
  222. package/dist/tooling/mathlib/lemmas.d.ts.map +1 -0
  223. package/dist/tooling/mathlib/lemmas.js +72 -0
  224. package/dist/tooling/mathlib/lemmas.js.map +1 -0
  225. package/dist/tooling/mathlib/order.d.ts +29 -0
  226. package/dist/tooling/mathlib/order.d.ts.map +1 -0
  227. package/dist/tooling/mathlib/order.js +91 -0
  228. package/dist/tooling/mathlib/order.js.map +1 -0
  229. package/dist/tooling/mathlib/ring.d.ts +15 -0
  230. package/dist/tooling/mathlib/ring.d.ts.map +1 -0
  231. package/dist/tooling/mathlib/ring.js +91 -0
  232. package/dist/tooling/mathlib/ring.js.map +1 -0
  233. package/dist/tooling/mathlib/types.d.ts +62 -0
  234. package/dist/tooling/mathlib/types.d.ts.map +1 -0
  235. package/dist/tooling/mathlib/types.js +7 -0
  236. package/dist/tooling/mathlib/types.js.map +1 -0
  237. package/dist/type-theory/effects/core.d.ts +27 -0
  238. package/dist/type-theory/effects/core.d.ts.map +1 -0
  239. package/dist/type-theory/effects/core.js +79 -0
  240. package/dist/type-theory/effects/core.js.map +1 -0
  241. package/dist/type-theory/effects/exception.d.ts +18 -0
  242. package/dist/type-theory/effects/exception.d.ts.map +1 -0
  243. package/dist/type-theory/effects/exception.js +59 -0
  244. package/dist/type-theory/effects/exception.js.map +1 -0
  245. package/dist/type-theory/effects/index.d.ts +11 -0
  246. package/dist/type-theory/effects/index.d.ts.map +1 -0
  247. package/dist/type-theory/effects/index.js +50 -0
  248. package/dist/type-theory/effects/index.js.map +1 -0
  249. package/dist/type-theory/effects/reader.d.ts +20 -0
  250. package/dist/type-theory/effects/reader.d.ts.map +1 -0
  251. package/dist/type-theory/effects/reader.js +62 -0
  252. package/dist/type-theory/effects/reader.js.map +1 -0
  253. package/dist/type-theory/effects/state.d.ts +31 -0
  254. package/dist/type-theory/effects/state.d.ts.map +1 -0
  255. package/dist/type-theory/effects/state.js +91 -0
  256. package/dist/type-theory/effects/state.js.map +1 -0
  257. package/dist/type-theory/effects/types.d.ts +45 -0
  258. package/dist/type-theory/effects/types.d.ts.map +1 -0
  259. package/dist/type-theory/effects/types.js +21 -0
  260. package/dist/type-theory/effects/types.js.map +1 -0
  261. package/dist/type-theory/effects/writer.d.ts +30 -0
  262. package/dist/type-theory/effects/writer.d.ts.map +1 -0
  263. package/dist/type-theory/effects/writer.js +79 -0
  264. package/dist/type-theory/effects/writer.js.map +1 -0
  265. package/package.json +1 -1
@@ -0,0 +1,214 @@
1
+ "use strict";
2
+ // ============================================================
3
+ // Tests: ST Mathlib — order theory, group theory, ring theory,
4
+ // instancias estándar y lemas.
5
+ // ============================================================
6
+ Object.defineProperty(exports, "__esModule", { value: true });
7
+ const vitest_1 = require("vitest");
8
+ const mathlib_1 = require("../../../tooling/mathlib");
9
+ // ============================================================
10
+ // Order theory
11
+ // ============================================================
12
+ (0, vitest_1.describe)('order theory — divisibility poset on {1,2,3,6}', () => {
13
+ const divides = { leq: (a, b) => b % a === 0 };
14
+ const elements = [1, 2, 3, 6];
15
+ (0, vitest_1.it)('isReflexive: todo n divide a n', () => {
16
+ (0, vitest_1.expect)((0, mathlib_1.isReflexive)(divides, elements)).toBe(true);
17
+ });
18
+ (0, vitest_1.it)('isAntisymmetric: a|b ∧ b|a ⇒ a=b sobre naturales positivos', () => {
19
+ (0, vitest_1.expect)((0, mathlib_1.isAntisymmetric)(divides, elements)).toBe(true);
20
+ });
21
+ (0, vitest_1.it)('isTransitive: a|b ∧ b|c ⇒ a|c', () => {
22
+ (0, vitest_1.expect)((0, mathlib_1.isTransitive)(divides, elements)).toBe(true);
23
+ });
24
+ (0, vitest_1.it)('verifyPartialOrder: divisibilidad es poset válido', () => {
25
+ const result = (0, mathlib_1.verifyPartialOrder)(divides, elements);
26
+ (0, vitest_1.expect)(result.valid).toBe(true);
27
+ (0, vitest_1.expect)(result.failures).toEqual([]);
28
+ });
29
+ (0, vitest_1.it)('isLattice: {1,2,3,6} con divisibilidad es lattice (mcm=6, mcd=1)', () => {
30
+ (0, vitest_1.expect)((0, mathlib_1.isLattice)(divides, elements)).toBe(true);
31
+ });
32
+ (0, vitest_1.it)('isLattice: {2,3} sin 1 ni 6 NO es lattice (no hay join ni meet)', () => {
33
+ (0, vitest_1.expect)((0, mathlib_1.isLattice)(divides, [2, 3])).toBe(false);
34
+ });
35
+ (0, vitest_1.it)('detecta no-transitividad en relación cooked-up', () => {
36
+ // a R b si |a-b| ≤ 1 — no transitiva: 1 R 2, 2 R 3, pero 1 ¬R 3.
37
+ const closeRel = { leq: (a, b) => Math.abs(a - b) <= 1 };
38
+ (0, vitest_1.expect)((0, mathlib_1.isTransitive)(closeRel, [1, 2, 3])).toBe(false);
39
+ });
40
+ });
41
+ // ============================================================
42
+ // Group theory
43
+ // ============================================================
44
+ (0, vitest_1.describe)('group theory — Z aditivo', () => {
45
+ const sample = [-2n, -1n, 0n, 1n, 2n];
46
+ (0, vitest_1.it)('intAdditiveGroup: asociatividad', () => {
47
+ (0, vitest_1.expect)((0, mathlib_1.isAssociative)(mathlib_1.intAdditiveGroup, sample)).toBe(true);
48
+ });
49
+ (0, vitest_1.it)('intAdditiveGroup: conmutatividad', () => {
50
+ (0, vitest_1.expect)((0, mathlib_1.isCommutative)(mathlib_1.intAdditiveGroup, sample)).toBe(true);
51
+ });
52
+ (0, vitest_1.it)('intAdditiveGroup: 0 es identidad aditiva', () => {
53
+ (0, vitest_1.expect)((0, mathlib_1.hasIdentity)(mathlib_1.intAdditiveGroup, sample, mathlib_1.intAdditiveGroup.identity)).toBe(true);
54
+ });
55
+ (0, vitest_1.it)('intAdditiveGroup: cada n tiene inverso -n', () => {
56
+ (0, vitest_1.expect)((0, mathlib_1.hasInverses)(mathlib_1.intAdditiveGroup, sample)).toBe(true);
57
+ });
58
+ (0, vitest_1.it)('verifyGroup(Z, +) pasa todos los axiomas', () => {
59
+ const result = (0, mathlib_1.verifyGroup)(mathlib_1.intAdditiveGroup, sample);
60
+ (0, vitest_1.expect)(result.valid).toBe(true);
61
+ (0, vitest_1.expect)(result.failures).toEqual([]);
62
+ });
63
+ (0, vitest_1.it)('verifyAbelianGroup(Z, +) incluye conmutatividad y pasa', () => {
64
+ const result = (0, mathlib_1.verifyAbelianGroup)(mathlib_1.intAdditiveGroup, sample);
65
+ (0, vitest_1.expect)(result.valid).toBe(true);
66
+ });
67
+ });
68
+ (0, vitest_1.describe)('group theory — S_3 simétrico', () => {
69
+ (0, vitest_1.it)('sym3: es grupo (asociativo + identidad + inversos)', () => {
70
+ const result = (0, mathlib_1.verifyGroup)(mathlib_1.sym3, mathlib_1.sym3Elements, mathlib_1.perm3Eq);
71
+ (0, vitest_1.expect)(result.valid).toBe(true);
72
+ (0, vitest_1.expect)(result.failures).toEqual([]);
73
+ });
74
+ (0, vitest_1.it)('sym3: NO es abeliano — (0 1) ∘ (0 2) ≠ (0 2) ∘ (0 1)', () => {
75
+ (0, vitest_1.expect)((0, mathlib_1.isCommutative)(mathlib_1.sym3, mathlib_1.sym3Elements, mathlib_1.perm3Eq)).toBe(false);
76
+ });
77
+ (0, vitest_1.it)('sym3: verifyAbelianGroup falla en conmutatividad', () => {
78
+ const result = (0, mathlib_1.verifyAbelianGroup)(mathlib_1.sym3, mathlib_1.sym3Elements, mathlib_1.perm3Eq);
79
+ (0, vitest_1.expect)(result.valid).toBe(false);
80
+ (0, vitest_1.expect)(result.failures).toContain('conmutatividad');
81
+ });
82
+ (0, vitest_1.it)('sym3: el inverso de un elemento aplicado dos veces es el original', () => {
83
+ for (const p of mathlib_1.sym3Elements) {
84
+ const inv = mathlib_1.sym3.inverse(p);
85
+ const reconstructed = mathlib_1.sym3.inverse(inv);
86
+ (0, vitest_1.expect)((0, mathlib_1.perm3Eq)(reconstructed, p)).toBe(true);
87
+ }
88
+ });
89
+ });
90
+ // ============================================================
91
+ // Ring theory
92
+ // ============================================================
93
+ (0, vitest_1.describe)('ring theory — Z anillo', () => {
94
+ const sample = [-2n, -1n, 0n, 1n, 2n];
95
+ (0, vitest_1.it)('verifyRing(Z): pasa todos los axiomas', () => {
96
+ const result = (0, mathlib_1.verifyRing)(mathlib_1.intRing, sample);
97
+ (0, vitest_1.expect)(result.valid).toBe(true);
98
+ (0, vitest_1.expect)(result.failures).toEqual([]);
99
+ });
100
+ (0, vitest_1.it)('intRing: zero=0, one=1', () => {
101
+ (0, vitest_1.expect)(mathlib_1.intRing.zero).toBe(0n);
102
+ (0, vitest_1.expect)(mathlib_1.intRing.one).toBe(1n);
103
+ });
104
+ (0, vitest_1.it)('intRing: distributividad explícita 2*(3+4)=2*3+2*4', () => {
105
+ const left = mathlib_1.intRing.mul(2n, mathlib_1.intRing.add(3n, 4n));
106
+ const right = mathlib_1.intRing.add(mathlib_1.intRing.mul(2n, 3n), mathlib_1.intRing.mul(2n, 4n));
107
+ (0, vitest_1.expect)(left).toBe(right);
108
+ });
109
+ (0, vitest_1.it)('intRing NO es campo (2 no tiene inverso multiplicativo en Z)', () => {
110
+ // div definida solo cuando divide exacta — usamos undefined si no divisible.
111
+ const intDiv = (a, b) => b !== 0n && a % b === 0n ? a / b : undefined;
112
+ (0, vitest_1.expect)((0, mathlib_1.isField)(mathlib_1.intRing, sample, intDiv)).toBe(false);
113
+ });
114
+ });
115
+ (0, vitest_1.describe)('ring theory — Z/nZ', () => {
116
+ (0, vitest_1.it)('zModN(5): es anillo válido', () => {
117
+ const r = (0, mathlib_1.zModN)(5n);
118
+ const result = (0, mathlib_1.verifyRing)(r, (0, mathlib_1.zModNElements)(5n));
119
+ (0, vitest_1.expect)(result.valid).toBe(true);
120
+ });
121
+ (0, vitest_1.it)('zModN(5): es campo (5 es primo)', () => {
122
+ const r = (0, mathlib_1.zModN)(5n);
123
+ (0, vitest_1.expect)((0, mathlib_1.isField)(r, (0, mathlib_1.zModNElements)(5n), (0, mathlib_1.zModNDiv)(5n))).toBe(true);
124
+ });
125
+ (0, vitest_1.it)('zModN(7): es campo (7 es primo)', () => {
126
+ const r = (0, mathlib_1.zModN)(7n);
127
+ (0, vitest_1.expect)((0, mathlib_1.isField)(r, (0, mathlib_1.zModNElements)(7n), (0, mathlib_1.zModNDiv)(7n))).toBe(true);
128
+ });
129
+ (0, vitest_1.it)('zModN(4): NO es campo (4 no es primo, 2 no tiene inverso)', () => {
130
+ const r = (0, mathlib_1.zModN)(4n);
131
+ (0, vitest_1.expect)((0, mathlib_1.isField)(r, (0, mathlib_1.zModNElements)(4n), (0, mathlib_1.zModNDiv)(4n))).toBe(false);
132
+ });
133
+ (0, vitest_1.it)('zModN(6): NO es campo', () => {
134
+ const r = (0, mathlib_1.zModN)(6n);
135
+ (0, vitest_1.expect)((0, mathlib_1.isField)(r, (0, mathlib_1.zModNElements)(6n), (0, mathlib_1.zModNDiv)(6n))).toBe(false);
136
+ });
137
+ (0, vitest_1.it)('zModN(5): 3 + 4 = 2 (mod 5)', () => {
138
+ const r = (0, mathlib_1.zModN)(5n);
139
+ (0, vitest_1.expect)(r.add(3n, 4n)).toBe(2n);
140
+ });
141
+ (0, vitest_1.it)('zModN(5): 3 * 4 = 2 (mod 5)', () => {
142
+ const r = (0, mathlib_1.zModN)(5n);
143
+ (0, vitest_1.expect)(r.mul(3n, 4n)).toBe(2n);
144
+ });
145
+ });
146
+ (0, vitest_1.describe)('ring theory — racionales como campo', () => {
147
+ const sample = [
148
+ (0, mathlib_1.rational)(0n, 1n),
149
+ (0, mathlib_1.rational)(1n, 1n),
150
+ (0, mathlib_1.rational)(-1n, 1n),
151
+ (0, mathlib_1.rational)(1n, 2n),
152
+ (0, mathlib_1.rational)(2n, 3n),
153
+ ];
154
+ (0, vitest_1.it)('rationalsField: anillo válido sobre muestreo', () => {
155
+ const result = (0, mathlib_1.verifyRing)(mathlib_1.rationalsField, sample, mathlib_1.rationalEq);
156
+ (0, vitest_1.expect)(result.valid).toBe(true);
157
+ });
158
+ (0, vitest_1.it)('rationalsField: es campo (todo no-cero invertible)', () => {
159
+ (0, vitest_1.expect)((0, mathlib_1.isField)(mathlib_1.rationalsField, sample, mathlib_1.rationalDiv, mathlib_1.rationalEq)).toBe(true);
160
+ });
161
+ (0, vitest_1.it)('rational: 2/4 se reduce a 1/2', () => {
162
+ const r = (0, mathlib_1.rational)(2n, 4n);
163
+ (0, vitest_1.expect)(r.num).toBe(1n);
164
+ (0, vitest_1.expect)(r.den).toBe(2n);
165
+ });
166
+ (0, vitest_1.it)('rationalDiv: división por cero devuelve undefined', () => {
167
+ (0, vitest_1.expect)((0, mathlib_1.rationalDiv)((0, mathlib_1.rational)(1n, 1n), (0, mathlib_1.rational)(0n, 1n))).toBeUndefined();
168
+ });
169
+ (0, vitest_1.it)('rational: normaliza signos (1/-2 → -1/2)', () => {
170
+ const r = (0, mathlib_1.rational)(1n, -2n);
171
+ (0, vitest_1.expect)(r.num).toBe(-1n);
172
+ (0, vitest_1.expect)(r.den).toBe(2n);
173
+ });
174
+ (0, vitest_1.it)('rational: error si denominador es 0', () => {
175
+ (0, vitest_1.expect)(() => (0, mathlib_1.rational)(1n, 0n)).toThrow();
176
+ });
177
+ });
178
+ // ============================================================
179
+ // Lemmas
180
+ // ============================================================
181
+ (0, vitest_1.describe)('standard lemmas', () => {
182
+ (0, vitest_1.it)('STANDARD_LEMMAS contiene al menos 8 lemas', () => {
183
+ (0, vitest_1.expect)(mathlib_1.STANDARD_LEMMAS.length).toBeGreaterThanOrEqual(8);
184
+ });
185
+ (0, vitest_1.it)('cada lemma tiene name y statement no vacíos', () => {
186
+ for (const l of mathlib_1.STANDARD_LEMMAS) {
187
+ (0, vitest_1.expect)(l.name).toBeTruthy();
188
+ (0, vitest_1.expect)(l.statement.length).toBeGreaterThan(0);
189
+ }
190
+ });
191
+ (0, vitest_1.it)('group.inverse_unique es aplicable a estructura con op', () => {
192
+ const lemma = mathlib_1.STANDARD_LEMMAS.find((l) => l.name === 'group.inverse_unique');
193
+ (0, vitest_1.expect)(lemma).toBeDefined();
194
+ const struct = {
195
+ name: 'test',
196
+ elements: [],
197
+ operations: new Map([['op', (a, b) => [a, b]]]),
198
+ axioms: [],
199
+ };
200
+ (0, vitest_1.expect)(lemma.applicableTo(struct)).toBe(true);
201
+ });
202
+ (0, vitest_1.it)('ring.zero_times_anything requiere ops add y mul', () => {
203
+ const lemma = mathlib_1.STANDARD_LEMMAS.find((l) => l.name === 'ring.zero_times_anything');
204
+ (0, vitest_1.expect)(lemma).toBeDefined();
205
+ const onlyAdd = {
206
+ name: 'test',
207
+ elements: [],
208
+ operations: new Map([['add', (a, b) => [a, b]]]),
209
+ axioms: [],
210
+ };
211
+ (0, vitest_1.expect)(lemma.applicableTo(onlyAdd)).toBe(false);
212
+ });
213
+ });
214
+ //# sourceMappingURL=mathlib.test.js.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"mathlib.test.js","sourceRoot":"","sources":["../../../../src/tests/tooling/mathlib/mathlib.test.ts"],"names":[],"mappings":";AAAA,+DAA+D;AAC/D,+DAA+D;AAC/D,+BAA+B;AAC/B,+DAA+D;;AAE/D,mCAA8C;AAC9C,sDAgCkC;AAElC,+DAA+D;AAC/D,eAAe;AACf,+DAA+D;AAE/D,IAAA,iBAAQ,EAAC,gDAAgD,EAAE,GAAG,EAAE;IAC9D,MAAM,OAAO,GAAG,EAAE,GAAG,EAAE,CAAC,CAAS,EAAE,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,EAAE,CAAC;IAC/D,MAAM,QAAQ,GAAG,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAE9B,IAAA,WAAE,EAAC,gCAAgC,EAAE,GAAG,EAAE;QACxC,IAAA,eAAM,EAAC,IAAA,qBAAW,EAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACpD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4DAA4D,EAAE,GAAG,EAAE;QACpE,IAAA,eAAM,EAAC,IAAA,yBAAe,EAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACxD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,+BAA+B,EAAE,GAAG,EAAE;QACvC,IAAA,eAAM,EAAC,IAAA,sBAAY,EAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mDAAmD,EAAE,GAAG,EAAE;QAC3D,MAAM,MAAM,GAAG,IAAA,4BAAkB,EAAC,OAAO,EAAE,QAAQ,CAAC,CAAC;QACrD,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;IACtC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kEAAkE,EAAE,GAAG,EAAE;QAC1E,IAAA,eAAM,EAAC,IAAA,mBAAS,EAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAClD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iEAAiE,EAAE,GAAG,EAAE;QACzE,IAAA,eAAM,EAAC,IAAA,mBAAS,EAAC,OAAO,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACjD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,gDAAgD,EAAE,GAAG,EAAE;QACxD,iEAAiE;QACjE,MAAM,QAAQ,GAAG,EAAE,GAAG,EAAE,CAAC,CAAS,EAAE,CAAS,EAAE,EAAE,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC;QACzE,IAAA,eAAM,EAAC,IAAA,sBAAY,EAAC,QAAQ,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACxD,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,+DAA+D;AAC/D,eAAe;AACf,+DAA+D;AAE/D,IAAA,iBAAQ,EAAC,0BAA0B,EAAE,GAAG,EAAE;IACxC,MAAM,MAAM,GAAG,CAAC,CAAC,EAAE,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;IAEtC,IAAA,WAAE,EAAC,iCAAiC,EAAE,GAAG,EAAE;QACzC,IAAA,eAAM,EAAC,IAAA,uBAAa,EAAC,0BAAgB,EAAE,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC7D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kCAAkC,EAAE,GAAG,EAAE;QAC1C,IAAA,eAAM,EAAC,IAAA,uBAAa,EAAC,0BAAgB,EAAE,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC7D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,0CAA0C,EAAE,GAAG,EAAE;QAClD,IAAA,eAAM,EAAC,IAAA,qBAAW,EAAC,0BAAgB,EAAE,MAAM,EAAE,0BAAgB,CAAC,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACtF,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2CAA2C,EAAE,GAAG,EAAE;QACnD,IAAA,eAAM,EAAC,IAAA,qBAAW,EAAC,0BAAgB,EAAE,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC3D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,0CAA0C,EAAE,GAAG,EAAE;QAClD,MAAM,MAAM,GAAG,IAAA,qBAAW,EAAC,0BAAgB,EAAE,MAAM,CAAC,CAAC;QACrD,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;IACtC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,wDAAwD,EAAE,GAAG,EAAE;QAChE,MAAM,MAAM,GAAG,IAAA,4BAAkB,EAAC,0BAAgB,EAAE,MAAM,CAAC,CAAC;QAC5D,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAClC,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,8BAA8B,EAAE,GAAG,EAAE;IAC5C,IAAA,WAAE,EAAC,oDAAoD,EAAE,GAAG,EAAE;QAC5D,MAAM,MAAM,GAAG,IAAA,qBAAW,EAAC,cAAI,EAAE,sBAAY,EAAE,iBAAO,CAAC,CAAC;QACxD,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;IACtC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,sDAAsD,EAAE,GAAG,EAAE;QAC9D,IAAA,eAAM,EAAC,IAAA,uBAAa,EAAC,cAAI,EAAE,sBAAY,EAAE,iBAAO,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACjE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kDAAkD,EAAE,GAAG,EAAE;QAC1D,MAAM,MAAM,GAAG,IAAA,4BAAkB,EAAC,cAAI,EAAE,sBAAY,EAAE,iBAAO,CAAC,CAAC;QAC/D,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;QACjC,IAAA,eAAM,EAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,SAAS,CAAC,gBAAgB,CAAC,CAAC;IACtD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mEAAmE,EAAE,GAAG,EAAE;QAC3E,KAAK,MAAM,CAAC,IAAI,sBAAY,EAAE,CAAC;YAC7B,MAAM,GAAG,GAAG,cAAI,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC;YAC5B,MAAM,aAAa,GAAG,cAAI,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC;YACxC,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,aAAa,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC/C,CAAC;IACH,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,+DAA+D;AAC/D,cAAc;AACd,+DAA+D;AAE/D,IAAA,iBAAQ,EAAC,wBAAwB,EAAE,GAAG,EAAE;IACtC,MAAM,MAAM,GAAG,CAAC,CAAC,EAAE,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;IAEtC,IAAA,WAAE,EAAC,uCAAuC,EAAE,GAAG,EAAE;QAC/C,MAAM,MAAM,GAAG,IAAA,oBAAU,EAAC,iBAAO,EAAE,MAAM,CAAC,CAAC;QAC3C,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAChC,IAAA,eAAM,EAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,OAAO,CAAC,EAAE,CAAC,CAAC;IACtC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,wBAAwB,EAAE,GAAG,EAAE;QAChC,IAAA,eAAM,EAAC,iBAAO,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QAC9B,IAAA,eAAM,EAAC,iBAAO,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IAC/B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oDAAoD,EAAE,GAAG,EAAE;QAC5D,MAAM,IAAI,GAAG,iBAAO,CAAC,GAAG,CAAC,EAAE,EAAE,iBAAO,CAAC,GAAG,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;QAClD,MAAM,KAAK,GAAG,iBAAO,CAAC,GAAG,CAAC,iBAAO,CAAC,GAAG,CAAC,EAAE,EAAE,EAAE,CAAC,EAAE,iBAAO,CAAC,GAAG,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;QACpE,IAAA,eAAM,EAAC,IAAI,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC3B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,8DAA8D,EAAE,GAAG,EAAE;QACtE,6EAA6E;QAC7E,MAAM,MAAM,GAAG,CAAC,CAAS,EAAE,CAAS,EAAsB,EAAE,CAC1D,CAAC,KAAK,EAAE,IAAI,CAAC,GAAG,CAAC,KAAK,EAAE,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;QAC/C,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,iBAAO,EAAE,MAAM,EAAE,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACvD,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,oBAAoB,EAAE,GAAG,EAAE;IAClC,IAAA,WAAE,EAAC,4BAA4B,EAAE,GAAG,EAAE;QACpC,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,MAAM,MAAM,GAAG,IAAA,oBAAU,EAAC,CAAC,EAAE,IAAA,uBAAa,EAAC,EAAE,CAAC,CAAC,CAAC;QAChD,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAClC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iCAAiC,EAAE,GAAG,EAAE;QACzC,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,CAAC,EAAE,IAAA,uBAAa,EAAC,EAAE,CAAC,EAAE,IAAA,kBAAQ,EAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACjE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iCAAiC,EAAE,GAAG,EAAE;QACzC,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,CAAC,EAAE,IAAA,uBAAa,EAAC,EAAE,CAAC,EAAE,IAAA,kBAAQ,EAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACjE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2DAA2D,EAAE,GAAG,EAAE;QACnE,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,CAAC,EAAE,IAAA,uBAAa,EAAC,EAAE,CAAC,EAAE,IAAA,kBAAQ,EAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAClE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uBAAuB,EAAE,GAAG,EAAE;QAC/B,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,CAAC,EAAE,IAAA,uBAAa,EAAC,EAAE,CAAC,EAAE,IAAA,kBAAQ,EAAC,EAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAClE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,6BAA6B,EAAE,GAAG,EAAE;QACrC,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,IAAA,eAAM,EAAC,CAAC,CAAC,GAAG,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACjC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,6BAA6B,EAAE,GAAG,EAAE;QACrC,MAAM,CAAC,GAAG,IAAA,eAAK,EAAC,EAAE,CAAC,CAAC;QACpB,IAAA,eAAM,EAAC,CAAC,CAAC,GAAG,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACjC,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,qCAAqC,EAAE,GAAG,EAAE;IACnD,MAAM,MAAM,GAAG;QACb,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC;QAChB,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC;QAChB,IAAA,kBAAQ,EAAC,CAAC,EAAE,EAAE,EAAE,CAAC;QACjB,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC;QAChB,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC;KACjB,CAAC;IAEF,IAAA,WAAE,EAAC,8CAA8C,EAAE,GAAG,EAAE;QACtD,MAAM,MAAM,GAAG,IAAA,oBAAU,EAAC,wBAAc,EAAE,MAAM,EAAE,oBAAU,CAAC,CAAC;QAC9D,IAAA,eAAM,EAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAClC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oDAAoD,EAAE,GAAG,EAAE;QAC5D,IAAA,eAAM,EAAC,IAAA,iBAAO,EAAC,wBAAc,EAAE,MAAM,EAAE,qBAAW,EAAE,oBAAU,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC9E,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,+BAA+B,EAAE,GAAG,EAAE;QACvC,MAAM,CAAC,GAAG,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC,CAAC;QAC3B,IAAA,eAAM,EAAC,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACvB,IAAA,eAAM,EAAC,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mDAAmD,EAAE,GAAG,EAAE;QAC3D,IAAA,eAAM,EAAC,IAAA,qBAAW,EAAC,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC,EAAE,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,aAAa,EAAE,CAAC;IAC1E,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,0CAA0C,EAAE,GAAG,EAAE;QAClD,MAAM,CAAC,GAAG,IAAA,kBAAQ,EAAC,EAAE,EAAE,CAAC,EAAE,CAAC,CAAC;QAC5B,IAAA,eAAM,EAAC,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,CAAC,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,qCAAqC,EAAE,GAAG,EAAE;QAC7C,IAAA,eAAM,EAAC,GAAG,EAAE,CAAC,IAAA,kBAAQ,EAAC,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC;IAC3C,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,+DAA+D;AAC/D,SAAS;AACT,+DAA+D;AAE/D,IAAA,iBAAQ,EAAC,iBAAiB,EAAE,GAAG,EAAE;IAC/B,IAAA,WAAE,EAAC,2CAA2C,EAAE,GAAG,EAAE;QACnD,IAAA,eAAM,EAAC,yBAAe,CAAC,MAAM,CAAC,CAAC,sBAAsB,CAAC,CAAC,CAAC,CAAC;IAC3D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,6CAA6C,EAAE,GAAG,EAAE;QACrD,KAAK,MAAM,CAAC,IAAI,yBAAe,EAAE,CAAC;YAChC,IAAA,eAAM,EAAC,CAAC,CAAC,IAAI,CAAC,CAAC,UAAU,EAAE,CAAC;YAC5B,IAAA,eAAM,EAAC,CAAC,CAAC,SAAS,CAAC,MAAM,CAAC,CAAC,eAAe,CAAC,CAAC,CAAC,CAAC;QAChD,CAAC;IACH,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uDAAuD,EAAE,GAAG,EAAE;QAC/D,MAAM,KAAK,GAAG,yBAAe,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,KAAK,sBAAsB,CAAC,CAAC;QAC7E,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,WAAW,EAAE,CAAC;QAC5B,MAAM,MAAM,GAAG;YACb,IAAI,EAAE,MAAM;YACZ,QAAQ,EAAE,EAAE;YACZ,UAAU,EAAE,IAAI,GAAG,CAA0C,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;YACxF,MAAM,EAAE,EAAE;SACX,CAAC;QACF,IAAA,eAAM,EAAC,KAAM,CAAC,YAAY,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACjD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iDAAiD,EAAE,GAAG,EAAE;QACzD,MAAM,KAAK,GAAG,yBAAe,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,KAAK,0BAA0B,CAAC,CAAC;QACjF,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,WAAW,EAAE,CAAC;QAC5B,MAAM,OAAO,GAAG;YACd,IAAI,EAAE,MAAM;YACZ,QAAQ,EAAE,EAAE;YACZ,UAAU,EAAE,IAAI,GAAG,CAA0C,CAAC,CAAC,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;YACzF,MAAM,EAAE,EAAE;SACX,CAAC;QACF,IAAA,eAAM,EAAC,KAAM,CAAC,YAAY,CAAC,OAAO,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IACnD,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC"}
@@ -0,0 +1,2 @@
1
+ export {};
2
+ //# sourceMappingURL=effects.test.d.ts.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"effects.test.d.ts","sourceRoot":"","sources":["../../../../src/tests/type-theory/effects/effects.test.ts"],"names":[],"mappings":""}
@@ -0,0 +1,242 @@
1
+ "use strict";
2
+ Object.defineProperty(exports, "__esModule", { value: true });
3
+ const vitest_1 = require("vitest");
4
+ const effects_1 = require("../../../type-theory/effects");
5
+ (0, vitest_1.describe)('effects / núcleo', () => {
6
+ (0, vitest_1.it)('pure(42) ejecutado con run devuelve 42', () => {
7
+ const eff = (0, effects_1.pure)(42);
8
+ (0, vitest_1.expect)((0, effects_1.run)(eff)).toBe(42);
9
+ });
10
+ (0, vitest_1.it)('bind(pure(1), x => pure(x+1)) ↦ 2', () => {
11
+ const eff = (0, effects_1.bind)((0, effects_1.pure)(1), (x) => (0, effects_1.pure)(x + 1));
12
+ (0, vitest_1.expect)((0, effects_1.run)(eff)).toBe(2);
13
+ });
14
+ (0, vitest_1.it)('map aplica función pura al resultado', () => {
15
+ const eff = (0, effects_1.map)((0, effects_1.pure)(10), (x) => x * 3);
16
+ (0, vitest_1.expect)((0, effects_1.run)(eff)).toBe(30);
17
+ });
18
+ (0, vitest_1.it)('sequence colecta resultados en orden', () => {
19
+ const effs = [(0, effects_1.pure)(1), (0, effects_1.pure)(2), (0, effects_1.pure)(3), (0, effects_1.pure)(4)];
20
+ (0, vitest_1.expect)((0, effects_1.run)((0, effects_1.sequence)(effs))).toEqual([1, 2, 3, 4]);
21
+ });
22
+ (0, vitest_1.it)('bind respeta la ley de identidad izquierda: pure(a) >>= f ≡ f(a)', () => {
23
+ const f = (x) => (0, effects_1.pure)(x * 2);
24
+ const lhs = (0, effects_1.bind)((0, effects_1.pure)(5), f);
25
+ const rhs = f(5);
26
+ (0, vitest_1.expect)((0, effects_1.run)(lhs)).toBe((0, effects_1.run)(rhs));
27
+ });
28
+ (0, vitest_1.it)('bind respeta la ley de identidad derecha: m >>= pure ≡ m', () => {
29
+ const m = (0, effects_1.pure)(7);
30
+ const lhs = (0, effects_1.bind)(m, (a) => (0, effects_1.pure)(a));
31
+ (0, vitest_1.expect)((0, effects_1.run)(lhs)).toBe((0, effects_1.run)(m));
32
+ });
33
+ (0, vitest_1.it)('bind respeta asociatividad: (m >>= f) >>= g ≡ m >>= (x => f(x) >>= g)', () => {
34
+ const m = (0, effects_1.pure)(3);
35
+ const f = (x) => (0, effects_1.pure)(x + 1);
36
+ const g = (x) => (0, effects_1.pure)(x * 10);
37
+ const lhs = (0, effects_1.bind)((0, effects_1.bind)(m, f), g);
38
+ const rhs = (0, effects_1.bind)(m, (x) => (0, effects_1.bind)(f(x), g));
39
+ (0, vitest_1.expect)((0, effects_1.run)(lhs)).toBe((0, effects_1.run)(rhs));
40
+ });
41
+ });
42
+ (0, vitest_1.describe)('effects / State', () => {
43
+ (0, vitest_1.it)('getState devuelve el estado inicial', () => {
44
+ const { result, state } = (0, effects_1.runState)((0, effects_1.getState)(), 100);
45
+ (0, vitest_1.expect)(result).toBe(100);
46
+ (0, vitest_1.expect)(state).toBe(100);
47
+ });
48
+ (0, vitest_1.it)('putState sobrescribe el estado y devuelve undefined', () => {
49
+ const { result, state } = (0, effects_1.runState)((0, effects_1.putState)(99), 0);
50
+ (0, vitest_1.expect)(result).toBeUndefined();
51
+ (0, vitest_1.expect)(state).toBe(99);
52
+ });
53
+ (0, vitest_1.it)('getState luego putState modifica estado', () => {
54
+ const prog = (0, effects_1.bind)((0, effects_1.getState)(), (s) => (0, effects_1.putState)(s + 1));
55
+ const { state } = (0, effects_1.runState)(prog, 41);
56
+ (0, vitest_1.expect)(state).toBe(42);
57
+ });
58
+ (0, vitest_1.it)('counter: incrementa N veces y devuelve el final', () => {
59
+ function counterLoop(n) {
60
+ if (n === 0)
61
+ return (0, effects_1.getState)();
62
+ return (0, effects_1.bind)((0, effects_1.modify)((s) => s + 1), () => counterLoop(n - 1));
63
+ }
64
+ const { result, state } = (0, effects_1.runState)(counterLoop(5), 0);
65
+ (0, vitest_1.expect)(state).toBe(5);
66
+ (0, vitest_1.expect)(result).toBe(5);
67
+ });
68
+ (0, vitest_1.it)('modify ≡ get >>= (s -> put (fn s))', () => {
69
+ const fn = (s) => s * 2 + 1;
70
+ const viaModify = (0, effects_1.runState)((0, effects_1.modify)(fn), 4);
71
+ const viaGetPut = (0, effects_1.runState)((0, effects_1.bind)((0, effects_1.getState)(), (s) => (0, effects_1.putState)(fn(s))), 4);
72
+ (0, vitest_1.expect)(viaModify.state).toBe(viaGetPut.state);
73
+ (0, vitest_1.expect)(viaModify.state).toBe(9);
74
+ });
75
+ (0, vitest_1.it)('runState propaga estado a través de un cómputo no trivial', () => {
76
+ // prog: lee, multiplica por 3, escribe; lee, suma 1, escribe; lee
77
+ const prog = (0, effects_1.bind)((0, effects_1.getState)(), (s1) => (0, effects_1.bind)((0, effects_1.putState)(s1 * 3), () => (0, effects_1.bind)((0, effects_1.getState)(), (s2) => (0, effects_1.bind)((0, effects_1.putState)(s2 + 1), () => (0, effects_1.getState)()))));
78
+ const { result, state } = (0, effects_1.runState)(prog, 10);
79
+ (0, vitest_1.expect)(result).toBe(31);
80
+ (0, vitest_1.expect)(state).toBe(31);
81
+ });
82
+ });
83
+ (0, vitest_1.describe)('effects / Reader', () => {
84
+ (0, vitest_1.it)('ask devuelve el ambiente', () => {
85
+ (0, vitest_1.expect)((0, effects_1.runReader)((0, effects_1.ask)(), 'hola')).toBe('hola');
86
+ });
87
+ (0, vitest_1.it)('asks proyecta el ambiente', () => {
88
+ const prog = (0, effects_1.asks)((r) => r.name.toUpperCase());
89
+ (0, vitest_1.expect)((0, effects_1.runReader)(prog, { name: 'alice', age: 30 })).toBe('ALICE');
90
+ });
91
+ (0, vitest_1.it)('runReader provee el mismo env a múltiples ask', () => {
92
+ const prog = (0, effects_1.bind)((0, effects_1.ask)(), (a) => (0, effects_1.bind)((0, effects_1.ask)(), (b) => (0, effects_1.pure)(a + b)));
93
+ (0, vitest_1.expect)((0, effects_1.runReader)(prog, 21)).toBe(42);
94
+ });
95
+ });
96
+ (0, vitest_1.describe)('effects / Writer', () => {
97
+ (0, vitest_1.it)('tell + tell + return: log es lista de tells', () => {
98
+ const prog = (0, effects_1.bind)((0, effects_1.tell)('a'), () => (0, effects_1.bind)((0, effects_1.tell)('b'), () => (0, effects_1.bind)((0, effects_1.tell)('c'), () => (0, effects_1.pure)(42))));
99
+ const { result, log } = (0, effects_1.runWriter)(prog, effects_1.stringMonoid);
100
+ (0, vitest_1.expect)(result).toBe(42);
101
+ (0, vitest_1.expect)(log).toBe('abc');
102
+ });
103
+ (0, vitest_1.it)('Writer con monoide de listas concatena en orden', () => {
104
+ const prog = (0, effects_1.bind)((0, effects_1.tell)([1, 2]), () => (0, effects_1.bind)((0, effects_1.tell)([3]), () => (0, effects_1.bind)((0, effects_1.tell)([4, 5]), () => (0, effects_1.pure)('done'))));
105
+ const { result, log } = (0, effects_1.runWriter)(prog, (0, effects_1.listMonoid)());
106
+ (0, vitest_1.expect)(result).toBe('done');
107
+ (0, vitest_1.expect)(log).toEqual([1, 2, 3, 4, 5]);
108
+ });
109
+ (0, vitest_1.it)('Writer con monoide aditivo suma los tells', () => {
110
+ const prog = (0, effects_1.bind)((0, effects_1.tell)(10), () => (0, effects_1.bind)((0, effects_1.tell)(20), () => (0, effects_1.bind)((0, effects_1.tell)(30), () => (0, effects_1.pure)('ok'))));
111
+ const { result, log } = (0, effects_1.runWriter)(prog, effects_1.sumMonoid);
112
+ (0, vitest_1.expect)(result).toBe('ok');
113
+ (0, vitest_1.expect)(log).toBe(60);
114
+ });
115
+ });
116
+ (0, vitest_1.describe)('effects / Exception', () => {
117
+ (0, vitest_1.it)('throw aborta el cómputo (la cont nunca corre)', () => {
118
+ const prog = (0, effects_1.bind)((0, effects_1.throw_)('boom'), (_unused) => {
119
+ // Esto NO debe ejecutarse: la continuación tras throw es inalcanzable.
120
+ throw new Error('continuación no debería invocarse');
121
+ });
122
+ const r = (0, effects_1.runException)(prog);
123
+ (0, vitest_1.expect)(r).toEqual({ kind: 'error', error: 'boom' });
124
+ });
125
+ (0, vitest_1.it)('runException captura throw y devuelve error', () => {
126
+ const prog = (0, effects_1.bind)((0, effects_1.pure)(1), () => (0, effects_1.throw_)({ code: 404 }));
127
+ const r = (0, effects_1.runException)(prog);
128
+ (0, vitest_1.expect)(r.kind).toBe('error');
129
+ if (r.kind === 'error')
130
+ (0, vitest_1.expect)(r.error.code).toBe(404);
131
+ });
132
+ (0, vitest_1.it)('runException sobre cómputo puro devuelve ok', () => {
133
+ const prog = (0, effects_1.bind)((0, effects_1.pure)(1), (x) => (0, effects_1.pure)(x + 1));
134
+ const r = (0, effects_1.runException)(prog);
135
+ (0, vitest_1.expect)(r).toEqual({ kind: 'ok', value: 2 });
136
+ });
137
+ });
138
+ (0, vitest_1.describe)('effects / composición de efectos', () => {
139
+ (0, vitest_1.it)('State + Reader: cuenta por env, lee estado final', () => {
140
+ // Programa: inc el estado por `env.amount`; devuelve estado final.
141
+ const prog = (0, effects_1.bind)((0, effects_1.ask)(), (env) => (0, effects_1.bind)((0, effects_1.modify)((s) => s + env.amount), () => (0, effects_1.getState)()));
142
+ // Aplicamos primero Reader (peel) y luego State (terminal).
143
+ const afterReader = (0, effects_1.handleReader)(prog, { amount: 7 });
144
+ const { result, state } = (0, effects_1.runState)(afterReader, 100);
145
+ (0, vitest_1.expect)(result).toBe(107);
146
+ (0, vitest_1.expect)(state).toBe(107);
147
+ });
148
+ (0, vitest_1.it)('State + Writer: cada paso registra el log y muta estado', () => {
149
+ function step(label, delta) {
150
+ return (0, effects_1.bind)((0, effects_1.tell)([label]), () => (0, effects_1.bind)((0, effects_1.modify)((s) => s + delta), () => (0, effects_1.pure)(undefined)));
151
+ }
152
+ const prog = (0, effects_1.bind)(step('a', 1), () => (0, effects_1.bind)(step('b', 2), () => step('c', 3)));
153
+ const afterWriter = (0, effects_1.handleWriter)(prog, (0, effects_1.listMonoid)());
154
+ const { result, state } = (0, effects_1.runState)(afterWriter, 0);
155
+ (0, vitest_1.expect)(state).toBe(6);
156
+ (0, vitest_1.expect)(result.log).toEqual(['a', 'b', 'c']);
157
+ });
158
+ (0, vitest_1.it)('Exception + State: throw devuelve error con estado en el momento del fallo', () => {
159
+ const prog = (0, effects_1.bind)((0, effects_1.modify)((s) => s + 1), () => (0, effects_1.bind)((0, effects_1.modify)((s) => s + 1), () => (0, effects_1.bind)((0, effects_1.throw_)('halt'), () => (0, effects_1.getState)())));
160
+ // Capturamos la excepción dejando intactos los efectos de estado y
161
+ // luego ejecutamos runState (que ve sólo State).
162
+ const caught = (0, effects_1.handleException)(prog);
163
+ const { result, state } = (0, effects_1.runState)(caught, 0);
164
+ (0, vitest_1.expect)(result).toEqual({ kind: 'error', error: 'halt' });
165
+ (0, vitest_1.expect)(state).toBe(2);
166
+ });
167
+ (0, vitest_1.it)('Reader + Writer + State: stack triple, cada efecto independiente', () => {
168
+ const prog = (0, effects_1.bind)((0, effects_1.ask)(), (env) => (0, effects_1.bind)((0, effects_1.tell)([`env=${env}`]), () => (0, effects_1.bind)((0, effects_1.modify)((s) => s + env), () => (0, effects_1.bind)((0, effects_1.getState)(), (s) => (0, effects_1.bind)((0, effects_1.tell)([`state=${s}`]), () => (0, effects_1.pure)(s))))));
169
+ const a1 = (0, effects_1.handleReader)(prog, 10);
170
+ const a2 = (0, effects_1.handleWriter)(a1, (0, effects_1.listMonoid)());
171
+ const { result, state } = (0, effects_1.runState)(a2, 5);
172
+ (0, vitest_1.expect)(state).toBe(15);
173
+ (0, vitest_1.expect)(result.result).toBe(15);
174
+ (0, vitest_1.expect)(result.log).toEqual(['env=10', 'state=15']);
175
+ });
176
+ (0, vitest_1.it)('handleException sobre Reader + Exception: error short-circuit', () => {
177
+ const prog = (0, effects_1.bind)((0, effects_1.ask)(), (env) => env > 0 ? (0, effects_1.pure)(env) : (0, effects_1.bind)((0, effects_1.throw_)('non-positive'), () => (0, effects_1.pure)(-1)));
178
+ const r1 = (0, effects_1.runException)((0, effects_1.handleReader)(prog, 7));
179
+ (0, vitest_1.expect)(r1).toEqual({ kind: 'ok', value: 7 });
180
+ const r2 = (0, effects_1.runException)((0, effects_1.handleReader)(prog, -1));
181
+ (0, vitest_1.expect)(r2).toEqual({ kind: 'error', error: 'non-positive' });
182
+ });
183
+ (0, vitest_1.it)('handle: handler genérico custom (Log) procesa una sola operación', () => {
184
+ // Definimos un efecto custom 'Log' y un handler que acumula mensajes.
185
+ const logProg = (0, effects_1.bind)((0, effects_1.perform)('Log', 'first'), () => (0, effects_1.bind)((0, effects_1.perform)('Log', 'second'), () => (0, effects_1.pure)(42)));
186
+ const collected = [];
187
+ const logHandler = {
188
+ effect: 'Log',
189
+ handle: (input, continuation) => {
190
+ collected.push(input);
191
+ return continuation(undefined);
192
+ },
193
+ };
194
+ const result = (0, effects_1.run)((0, effects_1.handle)(logProg, logHandler));
195
+ (0, vitest_1.expect)(result).toBe(42);
196
+ (0, vitest_1.expect)(collected).toEqual(['first', 'second']);
197
+ });
198
+ (0, vitest_1.it)('handle: handler ignora efectos de otro tag', () => {
199
+ // Programa con dos operaciones distintas; el handler de 'A' deja 'B' intacto.
200
+ const prog = (0, effects_1.bind)((0, effects_1.perform)('A', 10), (x) => (0, effects_1.bind)((0, effects_1.perform)('B', x + 1), (y) => (0, effects_1.pure)(y * 2)));
201
+ // Handler que duplica el input de 'A' como su output.
202
+ const handlerA = {
203
+ effect: 'A',
204
+ handle: (input, continuation) => continuation(input * 2),
205
+ };
206
+ // Handler que retorna el input de 'B' inalterado.
207
+ const handlerB = {
208
+ effect: 'B',
209
+ handle: (input, continuation) => continuation(input),
210
+ };
211
+ const stage1 = (0, effects_1.handle)(prog, handlerA);
212
+ const stage2 = (0, effects_1.handle)(stage1, handlerB);
213
+ // A(10) -> 20 ; B(21) -> 21 ; * 2 = 42
214
+ (0, vitest_1.expect)((0, effects_1.run)(stage2)).toBe(42);
215
+ });
216
+ (0, vitest_1.it)('handleState (componible) produce Eff<R, {result, state}> sin ejecutar', () => {
217
+ // Verifica que handleState devuelve un Eff puro cuando no quedan otros
218
+ // efectos, y que su valor coincide con runState.
219
+ const prog = (0, effects_1.bind)((0, effects_1.modify)((s) => s + 5), () => (0, effects_1.getState)());
220
+ const handled = (0, effects_1.handleState)(prog, 10);
221
+ // Como ya no quedan efectos, handled debe ser pure({ result, state }).
222
+ (0, vitest_1.expect)(handled.kind).toBe('pure');
223
+ if (handled.kind === 'pure') {
224
+ (0, vitest_1.expect)(handled.value.result).toBe(15);
225
+ (0, vitest_1.expect)(handled.value.state).toBe(15);
226
+ }
227
+ });
228
+ });
229
+ (0, vitest_1.describe)('effects / sequence con efectos', () => {
230
+ (0, vitest_1.it)('sequence sobre State acumula correctamente', () => {
231
+ const steps = [
232
+ (0, effects_1.bind)((0, effects_1.modify)((s) => s + 1), () => (0, effects_1.getState)()),
233
+ (0, effects_1.bind)((0, effects_1.modify)((s) => s * 2), () => (0, effects_1.getState)()),
234
+ (0, effects_1.bind)((0, effects_1.modify)((s) => s - 3), () => (0, effects_1.getState)()),
235
+ ];
236
+ const { result, state } = (0, effects_1.runState)((0, effects_1.sequence)(steps), 10);
237
+ // 10 -> 11 -> 22 -> 19
238
+ (0, vitest_1.expect)(result).toEqual([11, 22, 19]);
239
+ (0, vitest_1.expect)(state).toBe(19);
240
+ });
241
+ });
242
+ //# sourceMappingURL=effects.test.js.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"effects.test.js","sourceRoot":"","sources":["../../../../src/tests/type-theory/effects/effects.test.ts"],"names":[],"mappings":";;AAAA,mCAA8C;AAC9C,0DA0BsC;AAGtC,IAAA,iBAAQ,EAAC,kBAAkB,EAAE,GAAG,EAAE;IAChC,IAAA,WAAE,EAAC,wCAAwC,EAAE,GAAG,EAAE;QAChD,MAAM,GAAG,GAAG,IAAA,cAAI,EAAC,EAAE,CAAC,CAAC;QACrB,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IAC5B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,mCAAmC,EAAE,GAAG,EAAE;QAC3C,MAAM,GAAG,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC9C,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAC3B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,sCAAsC,EAAE,GAAG,EAAE;QAC9C,MAAM,GAAG,GAAG,IAAA,aAAG,EAAC,IAAA,cAAI,EAAC,EAAE,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;QACxC,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IAC5B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,sCAAsC,EAAE,GAAG,EAAE;QAC9C,MAAM,IAAI,GAAyB,CAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC,CAAC;QACxE,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,IAAA,kBAAQ,EAAC,IAAI,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACpD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kEAAkE,EAAE,GAAG,EAAE;QAC1E,MAAM,CAAC,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC;QACrC,MAAM,GAAG,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;QAC7B,MAAM,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;QACjB,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC;IAClC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,0DAA0D,EAAE,GAAG,EAAE;QAClE,MAAM,CAAC,GAAG,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC;QAClB,MAAM,GAAG,GAAG,IAAA,cAAI,EAAC,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC,CAAC;QACpC,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAA,aAAG,EAAC,CAAC,CAAC,CAAC,CAAC;IAChC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uEAAuE,EAAE,GAAG,EAAE;QAC/E,MAAM,CAAC,GAAG,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC;QAClB,MAAM,CAAC,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC;QACrC,MAAM,CAAC,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,EAAE,CAAC,CAAC;QACtC,MAAM,GAAG,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;QAChC,MAAM,GAAG,GAAG,IAAA,cAAI,EAAC,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;QAC1C,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,IAAA,aAAG,EAAC,GAAG,CAAC,CAAC,CAAC;IAClC,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,iBAAiB,EAAE,GAAG,EAAE;IAC/B,IAAA,WAAE,EAAC,qCAAqC,EAAE,GAAG,EAAE;QAC7C,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAC,IAAA,kBAAQ,GAAU,EAAE,GAAG,CAAC,CAAC;QAC5D,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;QACzB,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IAC1B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,qDAAqD,EAAE,GAAG,EAAE;QAC7D,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAC,IAAA,kBAAQ,EAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;QACpD,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,aAAa,EAAE,CAAC;QAC/B,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,yCAAyC,EAAE,GAAG,EAAE;QACjD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,kBAAQ,GAAU,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,kBAAQ,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC9D,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAC,IAAI,EAAE,EAAE,CAAC,CAAC;QACrC,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iDAAiD,EAAE,GAAG,EAAE;QACzD,SAAS,WAAW,CAAC,CAAS;YAC5B,IAAI,CAAC,KAAK,CAAC;gBAAE,OAAO,IAAA,kBAAQ,GAAU,CAAC;YACvC,OAAO,IAAA,cAAI,EACT,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CAAC,WAAW,CAAC,CAAC,GAAG,CAAC,CAAC,CACzB,CAAC;QACJ,CAAC;QACD,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAC,WAAW,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;QACtD,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QACtB,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,oCAAoC,EAAE,GAAG,EAAE;QAC5C,MAAM,EAAE,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;QACpC,MAAM,SAAS,GAAG,IAAA,kBAAQ,EAAC,IAAA,gBAAM,EAAS,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;QAClD,MAAM,SAAS,GAAG,IAAA,kBAAQ,EACxB,IAAA,cAAI,EAAC,IAAA,kBAAQ,GAAU,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,kBAAQ,EAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,EAChD,CAAC,CACF,CAAC;QACF,IAAA,eAAM,EAAC,SAAS,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,SAAS,CAAC,KAAK,CAAC,CAAC;QAC9C,IAAA,eAAM,EAAC,SAAS,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IAClC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2DAA2D,EAAE,GAAG,EAAE;QACnE,kEAAkE;QAClE,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,kBAAQ,GAAU,EAAE,CAAC,EAAE,EAAE,EAAE,CAC3C,IAAA,cAAI,EAAC,IAAA,kBAAQ,EAAC,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,EAAE,CAC1B,IAAA,cAAI,EAAC,IAAA,kBAAQ,GAAU,EAAE,CAAC,EAAE,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,kBAAQ,EAAC,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CAAC,CAAC,CACnF,CACF,CAAC;QACF,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAC,IAAI,EAAE,EAAE,CAAC,CAAC;QAC7C,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,kBAAkB,EAAE,GAAG,EAAE;IAChC,IAAA,WAAE,EAAC,0BAA0B,EAAE,GAAG,EAAE;QAClC,IAAA,eAAM,EAAC,IAAA,mBAAS,EAAC,IAAA,aAAG,GAAU,EAAE,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;IACxD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2BAA2B,EAAE,GAAG,EAAE;QACnC,MAAM,IAAI,GAAG,IAAA,cAAI,EAAwC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,WAAW,EAAE,CAAC,CAAC;QACtF,IAAA,eAAM,EAAC,IAAA,mBAAS,EAAC,IAAI,EAAE,EAAE,IAAI,EAAE,OAAO,EAAE,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,OAAO,CAAC,CAAC;IACpE,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,+CAA+C,EAAE,GAAG,EAAE;QACvD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,aAAG,GAAU,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,aAAG,GAAU,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;QACjF,IAAA,eAAM,EAAC,IAAA,mBAAS,EAAC,IAAI,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACvC,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,kBAAkB,EAAE,GAAG,EAAE;IAChC,IAAA,WAAE,EAAC,6CAA6C,EAAE,GAAG,EAAE;QACrD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,GAAG,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,GAAG,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,GAAG,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;QAC3F,MAAM,EAAE,MAAM,EAAE,GAAG,EAAE,GAAG,IAAA,mBAAS,EAAC,IAAI,EAAE,sBAAY,CAAC,CAAC;QACtD,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC1B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,iDAAiD,EAAE,GAAG,EAAE;QACzD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,CACnC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,MAAM,CAAC,CAAC,CAAC,CAC9D,CAAC;QACF,MAAM,EAAE,MAAM,EAAE,GAAG,EAAE,GAAG,IAAA,mBAAS,EAAC,IAAI,EAAE,IAAA,oBAAU,GAAU,CAAC,CAAC;QAC9D,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;QAC5B,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;IACvC,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,2CAA2C,EAAE,GAAG,EAAE;QACnD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;QAC1F,MAAM,EAAE,MAAM,EAAE,GAAG,EAAE,GAAG,IAAA,mBAAS,EAAC,IAAI,EAAE,mBAAS,CAAC,CAAC;QACnD,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QAC1B,IAAA,eAAM,EAAC,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACvB,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,qBAAqB,EAAE,GAAG,EAAE;IACnC,IAAA,WAAE,EAAC,+CAA+C,EAAE,GAAG,EAAE;QACvD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,gBAAM,EAAS,MAAM,CAAC,EAAE,CAAC,OAAc,EAAqB,EAAE;YAC9E,uEAAuE;YACvE,MAAM,IAAI,KAAK,CAAC,mCAAmC,CAAC,CAAC;QACvD,CAAC,CAAC,CAAC;QACH,MAAM,CAAC,GAAG,IAAA,sBAAY,EAAgB,IAAI,CAAC,CAAC;QAC5C,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,OAAO,CAAC,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,MAAM,EAAE,CAAC,CAAC;IACtD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,6CAA6C,EAAE,GAAG,EAAE;QACrD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,gBAAM,EAAmB,EAAE,IAAI,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC;QAC1E,MAAM,CAAC,GAAG,IAAA,sBAAY,EAA0B,IAAI,CAAC,CAAC;QACtD,IAAA,eAAM,EAAC,CAAC,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,OAAO,CAAC,CAAC;QAC7B,IAAI,CAAC,CAAC,IAAI,KAAK,OAAO;YAAE,IAAA,eAAM,EAAC,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IACzD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,6CAA6C,EAAE,GAAG,EAAE;QACrD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC/C,MAAM,CAAC,GAAG,IAAA,sBAAY,EAAiB,IAAI,CAAC,CAAC;QAC7C,IAAA,eAAM,EAAC,CAAC,CAAC,CAAC,OAAO,CAAC,EAAE,IAAI,EAAE,IAAI,EAAE,KAAK,EAAE,CAAC,EAAE,CAAC,CAAC;IAC9C,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,kCAAkC,EAAE,GAAG,EAAE;IAChD,IAAA,WAAE,EAAC,kDAAkD,EAAE,GAAG,EAAE;QAC1D,mEAAmE;QACnE,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,aAAG,GAAsB,EAAE,CAAC,GAAG,EAAE,EAAE,CACnD,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,GAAG,CAAC,MAAM,CAAC,EACrC,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CACzB,CACF,CAAC;QACF,4DAA4D;QAC5D,MAAM,WAAW,GAAG,IAAA,sBAAY,EAAsC,IAAI,EAAE,EAAE,MAAM,EAAE,CAAC,EAAE,CAAC,CAAC;QAC3F,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAiB,WAAW,EAAE,GAAG,CAAC,CAAC;QACrE,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;QACzB,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IAC1B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,yDAAyD,EAAE,GAAG,EAAE;QACjE,SAAS,IAAI,CAAC,KAAa,EAAE,KAAa;YACxC,OAAO,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,EAAE,CAC9B,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,KAAK,CAAC,EAChC,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,SAAS,CAAC,CACtB,CACF,CAAC;QACJ,CAAC;QACD,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;QAC9E,MAAM,WAAW,GAAG,IAAA,sBAAY,EAA0B,IAAI,EAAE,IAAA,oBAAU,GAAU,CAAC,CAAC;QACtF,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAA0C,WAAW,EAAE,CAAC,CAAC,CAAC;QAC5F,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QACtB,IAAA,eAAM,EAAC,MAAM,CAAC,GAAG,CAAC,CAAC,OAAO,CAAC,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC;IAC9C,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4EAA4E,EAAE,GAAG,EAAE;QACpF,MAAM,IAAI,GAAG,IAAA,cAAI,EACf,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CACH,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,gBAAM,EAAS,MAAM,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CAAC,CAC7D,CACJ,CAAC;QACF,mEAAmE;QACnE,iDAAiD;QACjD,MAAM,MAAM,GAAG,IAAA,yBAAe,EAA0B,IAAI,CAAC,CAAC;QAC9D,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAGhC,MAAM,EAAE,CAAC,CAAC,CAAC;QACb,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,OAAO,CAAC,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,MAAM,EAAE,CAAC,CAAC;QACzD,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IACxB,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kEAAkE,EAAE,GAAG,EAAE;QAC1E,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,aAAG,GAAU,EAAE,CAAC,GAAG,EAAE,EAAE,CACvC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,OAAO,GAAG,EAAE,CAAC,CAAC,EAAE,GAAG,EAAE,CAC9B,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,GAAG,CAAC,EAC9B,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,kBAAQ,GAAU,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,IAAA,cAAI,EAAC,CAAC,SAAS,CAAC,EAAE,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC,CAAC,CACjF,CACF,CACF,CAAC;QACF,MAAM,EAAE,GAAG,IAAA,sBAAY,EAA0B,IAAI,EAAE,EAAE,CAAC,CAAC;QAC3D,MAAM,EAAE,GAAG,IAAA,sBAAY,EAA4B,EAAE,EAAE,IAAA,oBAAU,GAAU,CAAC,CAAC;QAC7E,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAA4C,EAAE,EAAE,CAAC,CAAC,CAAC;QACrF,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACvB,IAAA,eAAM,EAAC,MAAM,CAAC,MAAM,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QAC/B,IAAA,eAAM,EAAC,MAAM,CAAC,GAAG,CAAC,CAAC,OAAO,CAAC,CAAC,QAAQ,EAAE,UAAU,CAAC,CAAC,CAAC;IACrD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,+DAA+D,EAAE,GAAG,EAAE;QACvE,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,aAAG,GAAU,EAAE,CAAC,GAAG,EAAE,EAAE,CACvC,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC,IAAA,cAAI,EAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAA,cAAI,EAAC,IAAA,gBAAM,EAAS,cAAc,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,CAAC,CAAC,CAAC,CAC3E,CAAC;QACF,MAAM,EAAE,GAAG,IAAA,sBAAY,EAAiB,IAAA,sBAAY,EAA0B,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC;QACxF,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,OAAO,CAAC,EAAE,IAAI,EAAE,IAAI,EAAE,KAAK,EAAE,CAAC,EAAE,CAAC,CAAC;QAC7C,MAAM,EAAE,GAAG,IAAA,sBAAY,EAAiB,IAAA,sBAAY,EAA0B,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;QACzF,IAAA,eAAM,EAAC,EAAE,CAAC,CAAC,OAAO,CAAC,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,cAAc,EAAE,CAAC,CAAC;IAC/D,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,kEAAkE,EAAE,GAAG,EAAE;QAC1E,sEAAsE;QACtE,MAAM,OAAO,GAAG,IAAA,cAAI,EAAC,IAAA,iBAAO,EAA2B,KAAK,EAAE,OAAO,CAAC,EAAE,GAAG,EAAE,CAC3E,IAAA,cAAI,EAAC,IAAA,iBAAO,EAA2B,KAAK,EAAE,QAAQ,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,cAAI,EAAC,EAAE,CAAC,CAAC,CACzE,CAAC;QACF,MAAM,SAAS,GAAa,EAAE,CAAC;QAC/B,MAAM,UAAU,GAAoD;YAClE,MAAM,EAAE,KAAK;YACb,MAAM,EAAE,CAAC,KAAK,EAAE,YAAY,EAAE,EAAE;gBAC9B,SAAS,CAAC,IAAI,CAAC,KAAe,CAAC,CAAC;gBAChC,OAAO,YAAY,CAAC,SAAS,CAAC,CAAC;YACjC,CAAC;SACF,CAAC;QACF,MAAM,MAAM,GAAG,IAAA,aAAG,EAAC,IAAA,gBAAM,EAAyB,OAAO,EAAE,UAAU,CAAC,CAAC,CAAC;QACxE,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACxB,IAAA,eAAM,EAAC,SAAS,CAAC,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAC,CAAC;IACjD,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,4CAA4C,EAAE,GAAG,EAAE;QACpD,8EAA8E;QAC9E,MAAM,IAAI,GAAG,IAAA,cAAI,EAAC,IAAA,iBAAO,EAAsB,GAAG,EAAE,EAAE,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAC7D,IAAA,cAAI,EAAC,IAAA,iBAAO,EAAsB,GAAG,EAAE,CAAC,GAAG,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,IAAA,cAAI,EAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CACnE,CAAC;QACF,sDAAsD;QACtD,MAAM,QAAQ,GAAoD;YAChE,MAAM,EAAE,GAAG;YACX,MAAM,EAAE,CAAC,KAAK,EAAE,YAAY,EAAE,EAAE,CAAC,YAAY,CAAE,KAAgB,GAAG,CAAC,CAAC;SACrE,CAAC;QACF,kDAAkD;QAClD,MAAM,QAAQ,GAAoD;YAChE,MAAM,EAAE,GAAG;YACX,MAAM,EAAE,CAAC,KAAK,EAAE,YAAY,EAAE,EAAE,CAAC,YAAY,CAAC,KAAe,CAAC;SAC/D,CAAC;QACF,MAAM,MAAM,GAAG,IAAA,gBAAM,EAA2B,IAAI,EAAE,QAAQ,CAAC,CAAC;QAChE,MAAM,MAAM,GAAG,IAAA,gBAAM,EAAyB,MAAM,EAAE,QAAQ,CAAC,CAAC;QAChE,uCAAuC;QACvC,IAAA,eAAM,EAAC,IAAA,aAAG,EAAC,MAAM,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IAC/B,CAAC,CAAC,CAAC;IAEH,IAAA,WAAE,EAAC,uEAAuE,EAAE,GAAG,EAAE;QAC/E,uEAAuE;QACvE,iDAAiD;QACjD,MAAM,IAAI,GAAG,IAAA,cAAI,EACf,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CACzB,CAAC;QACF,MAAM,OAAO,GAAG,IAAA,qBAAW,EAAwB,IAAI,EAAE,EAAE,CAAC,CAAC;QAC7D,uEAAuE;QACvE,IAAA,eAAM,EAAC,OAAO,CAAC,IAAI,CAAC,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC;QAClC,IAAI,OAAO,CAAC,IAAI,KAAK,MAAM,EAAE,CAAC;YAC5B,IAAA,eAAM,EAAC,OAAO,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;YACtC,IAAA,eAAM,EAAC,OAAO,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;QACvC,CAAC;IACH,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC;AAEH,IAAA,iBAAQ,EAAC,gCAAgC,EAAE,GAAG,EAAE;IAC9C,IAAA,WAAE,EAAC,4CAA4C,EAAE,GAAG,EAAE;QACpD,MAAM,KAAK,GAA2B;YACpC,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CACzB;YACD,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CACzB;YACD,IAAA,cAAI,EACF,IAAA,gBAAM,EAAS,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC,EAC5B,GAAG,EAAE,CAAC,IAAA,kBAAQ,GAAU,CACzB;SACF,CAAC;QACF,MAAM,EAAE,MAAM,EAAE,KAAK,EAAE,GAAG,IAAA,kBAAQ,EAAmB,IAAA,kBAAQ,EAAC,KAAK,CAAC,EAAE,EAAE,CAAC,CAAC;QAC1E,uBAAuB;QACvB,IAAA,eAAM,EAAC,MAAM,CAAC,CAAC,OAAO,CAAC,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;QACrC,IAAA,eAAM,EAAC,KAAK,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;IACzB,CAAC,CAAC,CAAC;AACL,CAAC,CAAC,CAAC"}
@@ -0,0 +1,47 @@
1
+ import { Formula, Proof } from '../../../types';
2
+ export interface Lean4ExportOptions {
3
+ /** Default: 'STExport' */
4
+ moduleName?: string;
5
+ /** Explicit import list. When omitted, picks default depending on `useMathlib`. */
6
+ imports?: string[];
7
+ /** Default: true — when true and `imports` not set, uses Mathlib preset. */
8
+ useMathlib?: boolean;
9
+ /** Default: true — emits a `theorem stmt_proof : stmt := by ...` skeleton. */
10
+ emitProof?: boolean;
11
+ }
12
+ export declare const COMMON_IMPORTS: Record<'standard' | 'mathlib' | 'minimal', string[]>;
13
+ /**
14
+ * Maps ST/Unicode logical operators to their Lean 4 surface syntax.
15
+ * Lean 4 happens to accept the same Unicode glyphs, but we keep the
16
+ * map explicit so downstream tooling can introspect the mapping.
17
+ */
18
+ export declare const LEAN4_OPS: Map<string, string>;
19
+ /**
20
+ * Converts an ST Formula AST node into a Lean 4 Prop expression string.
21
+ * Unsupported kinds emit `(/- unsupported: <kind> -/)` so dropped
22
+ * sub-trees are visible to the reader.
23
+ */
24
+ export declare function formulaToLeanTerm(formula: Formula): string;
25
+ /**
26
+ * Translates a natural-deduction rule label into a Lean 4 tactic.
27
+ * Used by callers that already know what rule they want to apply
28
+ * outside the context of a full proof step.
29
+ */
30
+ export declare function leanTacticForRule(rule: string): string;
31
+ /**
32
+ * Exports a single ST Formula as a Lean 4 module containing a
33
+ * `def stmt : Prop := ...` and an optional `theorem stmt_proof : stmt := by ...`.
34
+ */
35
+ export declare function exportToLean4(formula: Formula, opts?: Lean4ExportOptions): string;
36
+ /**
37
+ * Exports an ST Proof object as a Lean 4 module whose theorem body is
38
+ * derived from the proof steps.
39
+ */
40
+ export declare function exportProofToLean4(proof: Proof, opts?: Lean4ExportOptions): string;
41
+ /**
42
+ * Exports a small theory (axioms + theorems) as a single Lean 4 module.
43
+ * Axioms become `axiom ax_i : <prop>` declarations; theorems become
44
+ * `theorem th_i : <prop> := by sorry` skeletons that the user fills in.
45
+ */
46
+ export declare function exportTheoryToLean4(axioms: Formula[], theorems: Formula[], opts?: Lean4ExportOptions): string;
47
+ //# sourceMappingURL=index.d.ts.map
@@ -0,0 +1 @@
1
+ {"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../../../src/tooling/exporters/lean4/index.ts"],"names":[],"mappings":"AAaA,OAAO,EAAE,OAAO,EAAE,KAAK,EAAa,MAAM,gBAAgB,CAAC;AAM3D,MAAM,WAAW,kBAAkB;IACjC,0BAA0B;IAC1B,UAAU,CAAC,EAAE,MAAM,CAAC;IACpB,mFAAmF;IACnF,OAAO,CAAC,EAAE,MAAM,EAAE,CAAC;IACnB,4EAA4E;IAC5E,UAAU,CAAC,EAAE,OAAO,CAAC;IACrB,8EAA8E;IAC9E,SAAS,CAAC,EAAE,OAAO,CAAC;CACrB;AAMD,eAAO,MAAM,cAAc,EAAE,MAAM,CAAC,UAAU,GAAG,SAAS,GAAG,SAAS,EAAE,MAAM,EAAE,CAO/E,CAAC;AAMF;;;;GAIG;AACH,eAAO,MAAM,SAAS,EAAE,GAAG,CAAC,MAAM,EAAE,MAAM,CAUxC,CAAC;AAMH;;;;GAIG;AACH,wBAAgB,iBAAiB,CAAC,OAAO,EAAE,OAAO,GAAG,MAAM,CAsE1D;AAkBD;;;;GAIG;AACH,wBAAgB,iBAAiB,CAAC,IAAI,EAAE,MAAM,GAAG,MAAM,CA8DtD;AA2ID;;;GAGG;AACH,wBAAgB,aAAa,CAAC,OAAO,EAAE,OAAO,EAAE,IAAI,CAAC,EAAE,kBAAkB,GAAG,MAAM,CA4BjF;AAED;;;GAGG;AACH,wBAAgB,kBAAkB,CAAC,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,EAAE,kBAAkB,GAAG,MAAM,CA4BlF;AAED;;;;GAIG;AACH,wBAAgB,mBAAmB,CACjC,MAAM,EAAE,OAAO,EAAE,EACjB,QAAQ,EAAE,OAAO,EAAE,EACnB,IAAI,CAAC,EAAE,kBAAkB,GACxB,MAAM,CAgCR"}