per cases ( a is zero or not a is zero ) ;
end;