#######################################################################################################################################
#                                                                                                                                     #
#         V I S U A L I S A T I O N   D E   C H I F F R E S   A L E A T O I R E S                                                     #
#         C O M M E   U N E   M A R C H E   A L E A T O I R E   E N   C O O R D O N N E E S   P O L A I R E S  :                      #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.RAPO.11.2.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20140106153537).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  setParam            _____Graine                   7
$Z                                      # Parametre introduit le 20131113123810...                                                    #

$Z                  set                 NChIfFrEs=`calcul 2*$_____NIterations`

$Z                  $xci/valeurs_BBS$X  premiere=1 derniere=$NChIfFrEs                                                                  \
$Z                                      X0=$_____Graine                                                                           |     \
$Z                  $GRE                "[$Alphabet_0_9]"                                                                         |     \
$Z                  $HEA                -$_____NIterations                                                                        |     \
$Z                  $SE                 -f $FiLeSeD                                                                               |     \
$Z                  $CuMuLoUPas         ne=0                                                                                            \
$Z                                      fichier==                                                                                       \
$Z                                                                                                  >> $FiLePhI