%
tinit;
for i=1:10
   for j=1:10
      F(1);
      R(108);
   end
   R(36);
end
ShowT