with calendar;use calendar;procedure gnat.io.a is
begin
put(integer(seconds(clock)*6)mod 4);end;