#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N E   E P O N G E   D E   M E N G E R   3 x 3 x 3                                               #
#         L E   N O M B R E   D E   T R O U S   C U B I Q U E S   E G A L   A U X   N O M B R E S   P R E M I E R S  :                #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirf/.MENH.B1.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, 20240409133407).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  SETParam            _____RapportHomothetie        3

$Z                  setParam            _____NiveauEponge             $GRIS_1
$Z                  setParam            _____NiveauComplement         $GRIS_1

$Z                  set                 LChIfFrE_0="$K_VIDE"
$Z                  set                 LChIfFrE_0="$LChIfFrE_0"" TTT TFT TTT  TTT TTT TTT  TTT TTT TTT"

$Z                  set                 LChIfFrE_1="$K_VIDE"
$Z                  set                 LChIfFrE_1="$LChIfFrE_1"" TTT TFT TTT  TTT TFT TTT  TTT TTT TTT"

$Z                  set                 LChIfFrE_2="$K_VIDE"
$Z                  set                 LChIfFrE_2="$LChIfFrE_2"" TTT TFT TTT  TTT TFT TTT  TTT TTF TTT"

$Z                  set                 LChIfFrE_3="$K_VIDE"
$Z                  set                 LChIfFrE_3="$LChIfFrE_3"" TFT TFT TFT  TTT TFT TTT  TTT TTF TTT"

$Z                  set                 LChIfFrE_4="$K_VIDE"
$Z                  set                 LChIfFrE_4="$LChIfFrE_4"" TFT TFT TFT  TFT TFT TFT  TTT TTF TTT"

$Z                  set                 LChIfFrE_5="$K_VIDE"
$Z                  set                 LChIfFrE_5="$LChIfFrE_5"" TFT TFT TFT  FFF TFT FFF  TTT TTF TTT"

$Z                  set                 LChIfFrE_6="$K_VIDE"
$Z                  set                 LChIfFrE_6="$LChIfFrE_6"" TFT TFT TFT  FFF TFT FFF  FTF TTF TTT"

$Z                  set                 LChIfFrE_7="$K_VIDE"
$Z                  set                 LChIfFrE_7="$LChIfFrE_7"" FFF TFT FFF  FFF TFT FFF  FTF TTF TTT"

$Z                  set                 LChIfFrE_8="$K_VIDE"
$Z                  set                 LChIfFrE_8="$LChIfFrE_8"" FFF TFT FFF  FFF TFT FFF  FTF TTF FTF"

$Z                  set                 LChIfFrE_9="$K_VIDE"
$Z                  set                 LChIfFrE_9="$LChIfFrE_9"" FFF TFT FFF  FFF FFF FFF  FTF FFF FTF"