diff --git a/build/ludus.jimage b/build/ludus.jimage
index 85c35fc..7bec23f 100644
Binary files a/build/ludus.jimage and b/build/ludus.jimage differ
diff --git a/build/out.mjs b/build/out.mjs
index c00f957..291715c 100644
--- a/build/out.mjs
+++ b/build/out.mjs
@@ -6489,7 +6489,7 @@ var __emscripten_stack_alloc = (a0) => (__emscripten_stack_alloc = wasmExports['
 var _emscripten_stack_get_current = () => (_emscripten_stack_get_current = wasmExports['emscripten_stack_get_current'])();
 var ___cxa_is_pointer_type = createExportWrapper('__cxa_is_pointer_type', 1);
 var dynCall_jiji = Module['dynCall_jiji'] = createExportWrapper('dynCall_jiji', 5);
-var ___emscripten_embedded_file_data = Module['___emscripten_embedded_file_data'] = 1819008;
+var ___emscripten_embedded_file_data = Module['___emscripten_embedded_file_data'] = 1819956;
 function invoke_i(index) {
   var sp = stackSave();
   try {
diff --git a/build/out.wasm b/build/out.wasm
index 436d5d6..f85d1f2 100755
Binary files a/build/out.wasm and b/build/out.wasm differ
diff --git a/prelude.ld b/prelude.ld
index fd4e1e2..e492cc4 100644
--- a/prelude.ld
+++ b/prelude.ld
@@ -992,6 +992,10 @@ fn random {
 		let i = do l > count > random > floor
 		at (l, i)
 	}
+	(t as :tuple) -> {
+		let i = do t > count > random > floor
+		at (t, i)
+	}
 	(d as :dict) -> {
 		let key = do d > keys > random 
 		get (key, d)