From 90e5e03531fcc44dca6f82f3f28f11ee614cdda3 Mon Sep 17 00:00:00 2001
From: Felix Roos <flix91@gmail.com>
Date: Sat, 6 Aug 2022 00:50:10 +0200
Subject: [PATCH] refactor value.test

---
 packages/core/vitest/value.test.mjs | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 packages/core/vitest/value.test.mjs

diff --git a/packages/core/vitest/value.test.mjs b/packages/core/vitest/value.test.mjs
new file mode 100644
index 00000000..ae227e17
--- /dev/null
+++ b/packages/core/vitest/value.test.mjs
@@ -0,0 +1,24 @@
+/*
+value.test.mjs - <short description TODO>
+Copyright (C) 2022 Strudel contributors - see <https://github.com/tidalcycles/strudel/blob/main/packages/core/test/value.test.mjs>
+This program is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Affero General Public License for more details. You should have received a copy of the GNU Affero General Public License along with this program.  If not, see <https://www.gnu.org/licenses/>.
+*/
+
+import { describe, it, expect } from 'vitest';
+import { map, valued, mul } from '../value.mjs';
+
+describe('Value', () => {
+  it('unionWith', () => {
+    const { value } = valued({ freq: 2000, distortion: 1.2 }).unionWith({ distortion: 2 }, mul);
+    expect(value).toStrictEqual({ freq: 2000, distortion: 2.4 });
+  });
+
+  it('experiments', () => {
+    expect(map(mul(5), valued(3)).value).toEqual(15);
+    expect(map(mul(null), valued(3)).value).toEqual(0);
+    expect(map(mul(3), valued(null)).value).toEqual(null);
+    expect(valued(3).map(mul).ap(3).value).toEqual(9);
+    expect(valued(mul).ap(3).ap(3).value).toEqual(9);
+    expect(valued(3).mul(3).value).toEqual(9);
+  });
+});