#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N   F R A C T A L   " C A R R E "   ( V E R S I O N   2 )  :                                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.FRC2.42.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20231111114509).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  set                 _____ListX=($_____ListX            +$B_ +$C_           +$F_ +$G_      )
$Z                  set                 _____ListY=($_____ListY            +$H_ +$H_           +$H_ +$H_      )
$Z                  set                 _____ListZ=($_____ListZ            +$Z_ +$Z_           +$Z_ +$Z_      )

$Z                  set                 _____ListX=($_____ListX       +$A_ +$B_ +$C_           +$F_ +$G_ +$H_ )
$Z                  set                 _____ListY=($_____ListY       +$G_ +$G_ +$G_           +$G_ +$G_ +$G_ )
$Z                  set                 _____ListZ=($_____ListZ       +$Z_ +$Z_ +$Z_           +$Z_ +$Z_ +$Z_ )

$Z                  set                 _____ListX=($_____ListX       +$A_ +$B_ +$C_ +$D_ +$E_ +$F_ +$G_ +$H_ )
$Z                  set                 _____ListY=($_____ListY       +$F_ +$F_ +$F_ +$F_ +$F_ +$F_ +$F_ +$F_ )
$Z                  set                 _____ListZ=($_____ListZ       +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ )

$Z                  set                 _____ListX=($_____ListX            +$B_ +$C_           +$F_ +$G_      )
$Z                  set                 _____ListY=($_____ListY            +$E_ +$E_           +$E_ +$E_      )
$Z                  set                 _____ListZ=($_____ListZ            +$Z_ +$Z_           +$Z_ +$Z_      )

$Z                  set                 _____ListX=($_____ListX            +$B_ +$C_           +$F_ +$G_      )
$Z                  set                 _____ListY=($_____ListY            +$D_ +$D_           +$D_ +$D_      )
$Z                  set                 _____ListZ=($_____ListZ            +$Z_ +$Z_           +$Z_ +$Z_      )

$Z                  set                 _____ListX=($_____ListX       +$A_ +$B_ +$C_ +$D_ +$E_ +$F_ +$G_ +$H_ )
$Z                  set                 _____ListY=($_____ListY       +$C_ +$C_ +$C_ +$C_ +$C_ +$C_ +$C_ +$C_ )
$Z                  set                 _____ListZ=($_____ListZ       +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ +$Z_ )

$Z                  set                 _____ListX=($_____ListX       +$A_ +$B_ +$C_           +$F_ +$G_ +$H_ )
$Z                  set                 _____ListY=($_____ListY       +$B_ +$B_ +$B_           +$B_ +$B_ +$B_ )
$Z                  set                 _____ListZ=($_____ListZ       +$Z_ +$Z_ +$Z_           +$Z_ +$Z_ +$Z_ )

$Z                  set                 _____ListX=($_____ListX            +$B_ +$C_           +$F_ +$G_      )
$Z                  set                 _____ListY=($_____ListY            +$A_ +$A_           +$A_ +$A_      )
$Z                  set                 _____ListZ=($_____ListZ            +$Z_ +$Z_           +$Z_ +$Z_      )

$Z                                      # Le 20231111132721, j'ai ete oblige d'epaissir (en doublant) car, en effet, sinon, le        #
$Z                                      # trace de 'v $xiirf/FRC2.42.2.3' etait trop fin et le timbre correspondant dans              #
$Z                                      # $xiMi/FRC2.42.2.3$D' etait vide...                                                          #

$Z                  set                 NoMbReX=$#_____ListX
$Z                  set                 NoMbReY=$#_____ListY
$Z                  set                 NoMbReZ=$#_____ListZ
$Z                  set                 NoMbRe=`$xcg/MAX3.01$X x=$NoMbReX y=$NoMbReY z=$NoMbReZ`

$Z                  set                 ArGs="lineaire=VRAI entiers=VRAI vD=$GRIS_1 vA=$GRIS_8"
$Z                  set                 _____LNiveaux=`$xci/valeurs_inte$X p=1 d=$NoMbRe $ArGs`

$Z                  set                 _____DimensionX=8
$Z                  set                 _____DimensionY=8
$Z                  set                 _____DimensionZ=1