prog: child ';'^ child ; child: ID OP ID ID -> ^(OP ID ID ID); OP: 'are' | 'am'; ID: ('a' .. 'z' | 'A' .. 'Z')+; WS: (' '|'\r'|'\n') {$channel=HIDDEN;};
you are very good; I am fairly good