#######################################################################################################################################
#                                                                                                                                     #
#         P R O D U I T   D E   H O R N E R   D U   Q U A T R I E M E   D E G R E   D E   D E U X   I M A G E S  :                    #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiirv/.HORN.11.4.$U' :                                                                                          #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, 20181121115313).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                                      set                 PoNdErAtIoNs="$PoNdErAtIoNs"" $PoNdErAtIoN=$PImAgE"

$Z                                      @                   NuMeRo = $NuMeRo + 1
$Z                  end

$Z                  FilSTmpE            FImAgEs

$Z                  set                 PaRaMeTrEs="convertir=VRAI origine=0 extremite=1"

$Z                  $xci/acces$X                                                                                                        \
$Z                                      A=$_____ImageA1                                                                                 \
$Z                                      $PaRaMeTrEs                                                                                     \
$Z                                      R=$xTV/IMAGE.A1                                                                                 \
$Z                                                                                                  $formatI

$Z                  $xci/acces$X                                                                                                        \
$Z                                      A=$_____ImageA2                                                                                 \
$Z                                      $PaRaMeTrEs                                                                                     \
$Z                                      R=$xTV/IMAGE.A2                                                                                 \
$Z                                                                                                  $formatI

$Z                  unset               PaRaMeTrEs

$Z                  $xci/ProduitHorner_2_04.01$X                                                                                        \
$Z                                      A1=$xTV/IMAGE.A1                                                                                \
$Z                                      A2=$xTV/IMAGE.A2                                                                                \
$Z                                      $PoNdErAtIoNs                                                                                   \
$Z                                      R=$xTV/IMAGE.R                                                                                  \
$Z                                                                                                  $formatI

$Z                  unset               PoNdErAtIoNs

$Z                  $xci/acces$X                                                                                                        \
$Z                                      A=$xTV/IMAGE.R                                                                                  \
$Z                                      standard=FAUX zero=FAUX                                                                         \
$Z                                      R=$_____ImageR                                                                                  \
$Z                                                                                                  $formatI