/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        T E S T   D U   G E N E R A T E U R   A L E A T O I R E   ' BBS '   ( B L U M - B L U M - S H U B )  :                     */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xtc/random_BBS.0F$c' :                                                                                         */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20130605112116).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#include  <stdio.h>

#define   NOMBRE    100000

main()
          {
          int                 i;
          long      int       NombrePremierP=43991;
          long      int       NombrePremierQ=44027;
          long      int       Seed=3;
                                        /* On notera qu'il faut :                                                                    */
                                        /*                                                                                           */
                                        /*                  P = 3 modulo 4                                                           */
                                        /*                  Q = 3 modulo 4                                                           */
                                        /*                                                                                           */
                                        /*                  S E [2,(PxQ)-1)]                                                         */
                                        /*                                                                                           */
          long      int       Xi;

          Xi=Seed;

          for       (i=0 ; i<NOMBRE ; i++)
                    {
                    int       ChiffreHexadecimal;
                    Xi = ((Xi*Xi)%(NombrePremierP*NombrePremierQ));
                    ChiffreHexadecimal=(Xi&0xF);

                    printf("%x",ChiffreHexadecimal);
                    }

          printf("\n");
          }