ait := array(0 .. 4,[(0)=4,(1)=0,(2)=2,(3)=1,(4)=3]);
