#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N   E T A T   I N I T I A L   A L E A T O I R E                                                 #
#         D U   J E U   D E   L A   V I E   T R I D I M E N S I O N N E L  :                                                          #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirk/.JWIE.11.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20120225080332).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        SETParam            _____SeuilAleatoire           0.25

$c                  #include  <stdio.h>
$c
$c                  #define   N0        cPremiere
$c                  #define   N         cDerniere
$c
$c                  #define   GRAINE    1111
$c                  #define   IGRAINE   17
$c                  #define   SEUIL     _____SeuilAleatoire
$c
$c                  int       main()
$c                            {
$c                            int       n;
$c                            int       graine=GRAINE;
$c
$c                            for       (n=N0 ; n<=N ; n++)
$c                                      {
$c                                      printf("$xci/random.02$X
$c                                                          graine=%d
$c                                                          seuil=%f
$c                                                          R=$_____ImageTW.%04d
$c                                                                    $formatI\n"
$c                                            ,graine
$c                                            ,SEUIL
$c                                            ,n
$c                                             );
$c
$c                                      graine = graine + IGRAINE;
$c                                      }
$c                            }



Copyright © Jean-François Colonna, 2019-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2019-2021.