VAR

  a[2]
  b[2]

DEFINE
  
  b :=
    switch(a){
      0 : 1;
      1 : 2; 
      2 : 3;
      3 : 0;
    };
  
SPEC
  
  inc(a) = b
