#######################################################################################################################################
#                                                                                                                                     #
#         D U P L I C A T I O N   D E S   S E C T I O N S   :                                                                         #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirc/.MANF.DC.5.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20210427083451).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  if                  ($_____DoublerSections != 0) then
$Z                                      echo                "Preferer '"'$'"_____Epaissir=VRAI' plus universel et plus rapide."
$Z                                      # Message introduit le 20210501074354. En effet, '$_____Epaissir=VRAI' et plus universel      #
$Z                                      # puisqu'il est systematique ('v $xci/accumule.42$K epaissir_albums') et plus rapide puisque  #
$Z                                      # 'v $xci/ombrage.11$K' n'est pas concerne, tout se faisant dans 'v $xci/accumule.42$K'...    #
$Z                  else
$Z                  endif

$Z                  if                  ($_____DoublerSections == 1) then
$Z                                      @                   VaLiDe_PaRiTe_1 = $cDerniere - $cPremiere + 1
$Z                                      @                   VaLiDe_PaRiTe_2 = $_____DoublerSections + 1
$Z                                      @                   VaLiDe_PaRiTe_3 = $VaLiDe_PaRiTe_1 % $VaLiDe_PaRiTe_2

$Z                                      if                  ($VaLiDe_PaRiTe_3 != 0) then
$Z                                      # Validation introduite le 20210428091809...                                                  #
$Z                                                          EROR                "Le nombre d'images (=$VaLiDe_PaRiTe_1) est impair."
$Z                                      else
$Z                                      endif

$Z                                      unset               VaLiDe_PaRiTe_3
$Z                                      unset               VaLiDe_PaRiTe_2
$Z                                      unset               VaLiDe_PaRiTe_1

#20210429105328____:$c                       #include  <stdio.h>                                                                      #
#20210429105328____:$c                                                                                                                #
#20210429105328____:$c                       #define   N0        cPremiere                                                            #
#20210429105328____:$c                       #define   N         (cPremiere+((cDerniere-cPremiere+1)/(_____DoublerSections+1))-1)     #
#20210429105328____:$c                                                                                                                #
#20210429105328____:$c                       int       main()                                                                         #
#20210429105328____:$c                                 {                                                                              #
#20210429105328____:$c                                 int       n1;                                                                  #
#20210429105328____:$c                                 int       n2=cDerniere;                                                        #
#20210429105328____:$c                                                                                                                #
#20210429105328____:$c                                 for       (n1=N ; n1>=N0 ; n1--)                                               #
#20210429105328____:$c                                           {                                                                    #
#20210429105328____:$c                                           int       k;                                                         #
#20210429105328____:$c                                           for       (k=1 ; k<=(_____DoublerSections+1) ; k++)                  #
#20210429105328____:$c                                                     {                                                          #
#20210429105328____:$c                                                     printf("$xci/neutre$X                                      #
#20210429105328____:$c                                                                         A=$_____ImageT2.%04d                   #
#20210429105328____:$c                                                                         R=$_____ImageT2.%04d                   #
#20210429105328____:$c                                                                                             $formatI\n"        #
#20210429105328____:$c                                                           ,n1                                                  #
#20210429105328____:$c                                                           ,n2                                                  #
#20210429105328____:$c                                                            );                                                  #
#20210429105328____:$c                                                     n2--;                                                      #
#20210429105328____:$c                                                     }                                                          #
#20210429105328____:$c                                           }                                                                    #
#20210429105328____:$c                                 }                                                                              #

$Z                                      set       ZMiN_AR=`calcul $cPremiere-$cPremiere`
$Z                                      set       ZMaX_A=`calcul (($cDerniere-$cPremiere+1)/($_____DoublerSections+1))-1`
$Z                                      set       ZMaX_R=`calcul $cDerniere-$cPremiere`

$Z                                      $xci/epaississement_3D.11$X                                                                     \
$Z                                                A=$_____ImageT2.                                                                      \
$Z                                                premiere=$cPremiere                                                                   \
$Z                                                R=$_____ImageT2.                                                                      \
$Z                                                                                                  ZminA=$ZMiN_AR ZmaxA=$ZMaX_A        \
$Z                                                                                                  Zmin=$ZMiN_AR  Zmax=$ZMaX_R         \
$Z                                                                                                                      $formatI

$Z                  else
$Z                  endif



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