15 action one { prints " one\n";}
16 action two { prints " two\n";}
17 action three { prints " three\n";}
19 action seti { if ( fc == '0' ) i = false; else i = true; }
20 action setj { if ( fc == '0' ) j = false; else j = true; }
21 action setk { if ( fc == '0' ) k = false; else k = true; }
23 action break {fbreak;}
25 one = 'a' 'b' when c1 'c' @one;
26 two = 'a'* 'b' when c2 'c' @two;
27 three = 'a'+ 'b' when c3 'c' @three;
33 ( one | two | three ) '\n' @break;