/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        T E S T   D E   L ' A C C E S   A U   C A C H E   ( O R D R E   { X , Y } )  :                                             */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Performances :                                                                                                             */
/*                                                                                                                                   */
/*                    La commande "time" donne les resultats                                                                         */
/*                  suivants :                                                                                                       */
/*                                                                                                                                   */
/*                                      $LACT12   (R4000) : 43.3u 0.4s 2:22 30%                                                      */
/*                                      $LACT27   (R4400) : 34.0u 0.3s 1:08 50%                                                      */
/*                                                (R8000) : 37.4u 0.2s 0:40 94% 0+0k 0+0io 0pf+0w                                    */
/*                                                                                                                                   */
/*                  Voir a ce propos '$xiii/begin_end$DEF' et                                                                        */
/*                  '$xiii/Images$DEF' qui montrent que c'est                                                                        */
/*                  l'ordre de '$xtc/t_cache.02$c' qui est                                                                           */
/*                  presentement utilise, ce qui est heureux                                                                         */
/*                  puisqu'il est le plus rapide...                                                                                  */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xtc/t_cache.01$c' :                                                                                            */
/*                                                                                                                                   */
/*                    Jean-Francois COLONNA (LACTAMME, AAAAMMJJhhmmss).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#define   ITER                                                                                                                          \
                    20

#define   X                                                                                                                             \
                    1024
#define   Y                                                                                                                             \
                    1024

main()
     {
     int       n;
     int       x,y;
     double    image[Y][X];

     for  (n=0 ; n<ITER ; n++)
          {
          for  (x=0 ; x<X ; x++)
               {
               for  (y=0 ; y<Y ; y++)
                    {
                                        /* L'ordre des boucles est donc 'x' puis 'y'...                                              */
                    image[y][x] = 0;
                    }
               }
          }
     }