1 files changed, 23 insertions, 0 deletions
diff --git a/chibi/giblang.scm b/chibi/giblang.scm
new file mode 100644
index 0000000..d07e765
--- /dev/null
+++ b/chibi/giblang.scm
@@ -0,0 +1,23 @@
+; chibi stuff
+(import (scheme base)
+        (scheme write)
+        (srfi 101))
+
+(define consonants
+  (list 
+   "b" "c" "d" "f"
+   "g" "h" "j" "k"
+   "l" "m" "n" "p"
+   "r" "s" "t" "v"
+   "w" "z" "ch" "sh"
+   "zh" "th"))
+
+(define vowels
+  (list 
+    "a" "e" "i" "o" 
+    "u" "y" "ee" "ai" "ae"))
+
+(define (select-random-element list)
+  (list-ref list (random (length list))))
+
+(display (select-random-element vowels))
\ No newline at end of file