|
@@ -0,0 +1,13 @@
|
|
|
+(* Below is a literal assignment, which is
|
|
|
+ * identical to cons := "p"| "t" | "k" | "w" | "h" | "n"; *)
|
|
|
+cons ::= p t k w h n;
|
|
|
+
|
|
|
+(* And this could also be done with two rules and a literal
|
|
|
+ * assignment *)
|
|
|
+vowel := ("a" | "e" | "i" | "o" | "u") (4: "" | "'");
|
|
|
+
|
|
|
+(* Here is a weighted disjunction *)
|
|
|
+syll := 4: cons vowel | vowel;
|
|
|
+
|
|
|
+(* And finally, here's an output statement *)
|
|
|
+puts syll rep.<1..6, syll>;
|