#######################################################################################################################################
#                                                                                                                                     #
#         G E N E R A T I O N   D ' U N   C H A M P   G A U S S I E N   T R I D I M E N S I O N N E L  :                              #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.GAUS.31.1.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20191124094750).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z        setenvParam         _____Gener_gauss              $xci/gauss

$Z        setenvParam         _____Param_gauss              "$K_VIDE"

$c                  #include  <stdio.h>
$c
$c                  #define   N0        cPremiere
$c                  #define   N         cDerniere
$c
$c                  int       main()
$c                            {
$c                            int       n;
$c
$c                            for       (n=N0 ; n<=N ; n++)
$c                                      {
$c                                      printf("$_____Gener_gauss$X
$c                                                     $_____Param_gauss
$c                                                     R=$_____ImageT2.%04d
$c                                                                              $formatI\n"
$c                                            ,n
$c                                            ,n
$c                                             );
$c                                      }
$c                            }