/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        T E S T   D E   L A   C O N J E C T U R E   D E   ' Gilbreath '   A V E C   U N E   S U I T E                              */
/*        D E   N O M B R E S   I M P A I R S   C R O I S S A N T S   A L A   P L A C E                                              */
/*        D E S   N O M B R E S   P R E M I E R S  :                                                                                 */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xtc/Gilbreath.01$c' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois COLONNA (LACTAMME, 20250814115148).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#include  "INCLUDES.01.I"

#define   PAS       1
#define   N0        0
#define   Nn        (((59/PAS)*PAS)-1)
#undef    Nn
#define   Nn        (((21/PAS)*PAS)-1)

#undef    Nn
#define   Nn        10

main()
          {
          int       tableau_nombres_premiers__________[]={2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79
                                                         ,83,89,97,101,103,107,109,113,127,131,137,139,149,151
                                                         ,157,163,167,173,179,181,191,193,197,199
                                                         ,211,223,227,229,233,239,241,251,257,263,269,271,277,281
                                                         };
          int       tableau_nombres_premiers_moins_5__[]={2,3,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79
                                                         ,83,89,97,101,103,107,109,113,127,131,137,139,149,151
                                                         ,157,163,167,173,179,181,191,193,197,199
                                                         ,211,223,227,229,233,239,241,251,257,263,269,271,277,281
                                                         };
                                        /* Introduit le 20251116082456 : en supprimant le 5, cela ne marche plus...                  */
          int       tableau_nombres_premiers_moins_7__[]={2,3,5,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79
                                                         ,83,89,97,101,103,107,109,113,127,131,137,139,149,151
                                                         ,157,163,167,173,179,181,191,193,197,199
                                                         ,211,223,227,229,233,239,241,251,257,263,269,271,277,281
                                                       };
                                        /* Introduit le 20251115105344 : en supprimant le 7, cela ne marche plus...                  */
          int       tableau_nombres_premiers_moins_11_[]={2,3,5,7,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79
                                                         ,83,89,97,101,103,107,109,113,127,131,137,139,149,151
                                                         ,157,163,167,173,179,181,191,193,197,199
                                                         ,211,223,227,229,233,239,241,251,257,263,269,271,277,281
                                                         };
                                        /* Introduit le 20251116082456 : en supprimant le 11, cela ne marche plus...                 */
          int       tableau_nombres_premiers_moins_13_[]={2,3,5,7,11,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79
                                                         ,83,89,97,101,103,107,109,113,127,131,137,139,149,151
                                                         ,157,163,167,173,179,181,191,193,197,199
                                                         ,211,223,227,229,233,239,241,251,257,263,269,271,277,281
                                                         };
                                        /* Introduit le 20251116082456...                                                            */
          int       tableau_nombres_premiers_moins_17_[]={2,3,5,7,11,13,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79
                                                         ,83,89,97,101,103,107,109,113,127,131,137,139,149,151
                                                         ,157,163,167,173,179,181,191,193,197,199
                                                         ,211,223,227,229,233,239,241,251,257,263,269,271,277,281
                                                         };
                                        /* Introduit le 20251116082456...                                                            */

          int       tableau_nombres_aleatoires_1______[]={2,3,5,7,11,23,25,29,31,33,35,37,43,45,47,49,51,59,63,65,69,71,73,75,79
                                                         ,81,87,93,95,105,109,111,119,121,123,129,131,133,137,139,145,149,151,155
                                                         ,157,163,165,167,171,173,177,183,185,187,189,195,197,199,201
                                                         };
          int       tableau_nombres_aleatoires_2______[]={2,3,5,7,11,15,19,23,31,33,35,37,43,45,47,49,51,59,63,65,69,71,73,75,79
                                                         ,81,87,93,95,105,109,111,119,121,123,129,131,133,137,139,145,149,151,155
                                                         ,157,163,165,167,171,173,177,183,185,187,189,195,197,199,201
                                                         };

          int       tableau_progression_arithmetique__[]={2,3,5,7,9,11,13,15,17,19,21,23,25,27,29,31,33,35,37,39,41,43,45,47,49
                                                         ,51,53,55,57,59,61,63,65,67,69,71,73,75,77,79,81,83,85,87,89,91,93,95,97,99
                                                         ,101,103,105,107,109,111,113,115,117
                                                         };
          int       n1,n2;

#define   tableau   tableau_nombres_premiers__________

          for       (n2=0 ; n2<Nn ; n2 = n2 + PAS)
                    {
                    for       (n1=N0 ; n1<(Nn-n2) ; n1 = n1 + PAS)
                              {
                              printf("%4d ",tableau[n1]);

                              if        ((n1+PAS) < Nn-n2)
                                        {
                                        tableau[n1] = ABSO(tableau[n1+PAS]-tableau[n1]);
                                        }
                              else
                                        {
                                        }
                              }

                    printf("\n");
                    }
          }



Copyright © Jean-François COLONNA, 2025-2026.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / École polytechnique, Institut Polytechnique de Paris, 2025-2026.