(* test reserved words *)

i: int;
j: Int;
x: Char;
k, m[2..9]: int;

forward foo(var int k, char x) : int;

main(): void {

 int a, b, x;
  
 {  
    a = 37;
    b = -12;
    m[3] = 1 + a / 7 * 3 - 15;
    k = b + (m[3] mod 5);
    if ((i > j) && (a <= b) || (!b))
      then
        x = -2
      else
        x = 2;
    for (i = 0 to 90)
        k = k + m[5];
    repeat
        k = k + m[9];
    until (k < b || k != 999)
 }
}