FUNCTION func:BOOL;
c:=c+1;
(c:=c+1);
c:=c-1;
(c:=c-1);
p := ( p:=p+1 )^;
p := ( (p:=p+1) )^;
p := ( p:=p-1 )^;
p := ( (p:=p-1) )^;
p := p:=p+1^;
p := (p:=p+1)^;
p := p:=p-1^;
p := (p:=p-1)^;