← Back to branch summary

~helfrich/+junk/rmutt-package

« back to all changes in this revision

Viewing changes to examples/numbers.rm

  • Committer: Serge Helfrich
  • Date: 2015-08-22 09:57:38 UTC
  • Revision ID: serge.helfrich@gmail.com-20150822095738-4uov4m00j2dkuyos
Tags: upstream-0.1.3
Import upstream version 0.1.3

Show diffs side-by-side

added added

removed removed

Lines of Context:
examples/numbers.rm
 
1
package numbers;
 
2
 
 
3
top: (numbers-ordinal.two-digit "\n") {20};
 
4
 
 
5
digit: "zero" | nz-digit 9;
 
6
tens-digit: ("twen"|"thir"|"for"|"fif"|"six"|"seven"|"eigh"|"nine")"ty";
 
7
teen: ("thir"|"four"|"fif"|"six"|"seven"|"eigh"|"nine")"teen";
 
8
nz-digit: "one" | "two" | "three" | "four" | "five" | "six" | "seven" | "eight" | "nine";
 
9
two-digit: digit 9 | "ten" | "eleven" | "twelve" |
 
10
 teen 7 |
 
11
 tens-digit 8 |
 
12
 tens-digit "-" nz-digit 72;
 
13
 
 
14
street-number:
 
15
 (nz-digit 8 | teen 4 | two-digit) " "
 
16
 (digit: "oh " nz-digit) two-digit;
 
17
 
 
18
package numbers-ordinal;
 
19
 
 
20
digit: "zeroth" | nz-digit 9;
 
21
tens-digit: ("twen"|"thir"|"for"|"fif"|"six"|"seven"|"eigh"|"nine")"tieth";
 
22
teen: ("thir"|"four"|"fif"|"six"|"seven"|"eigh"|"nine")"teenth";
 
23
nz-digit: "first" | "second" | "third" | "fourth" | "fifth" | "sixth" | "seventh" | "eighth" | "ninth";
 
24
two-digit: digit 9 | "tenth" | "eleventh" | "twelfth" |
 
25
 teen 7 |
 
26
 tens-digit 8 |
 
27
 numbers.tens-digit "-" nz-digit 72;