#!/bin/csh

#######################################################################################################################################
#                                                                                                                                     #
#         N O T A  :                                                                                                                  #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xiac/$Fnota' :                                                                                                  #
#                                                                                                                                     #
#                     Jean-Francois COLONNA (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

#######################################################################################################################################
#                                                                                                                                     #
#         Q U E L Q U E S   E X P L I C A T I O N S  :                                                                                #
#                                                                                                                                     #
#######################################################################################################################################

v         $xiac/INTE.41$R16
v         $xiac/INTE.41.1$R16
v         $xiac/INTE.41.2$R16
v         $xiac/INTE.41.2.1$R16

v         $xiirc/INTE.41.2.0001
v         $xiirc/INTE.41.2.0002
v         $xiirc/INTE.41.2.0003
v         $xiirc/INTE.41.2.0004
v         $xiirc/INTE.41.2.0005
v         $xiirc/INTE.41.2.0006
v         $xiirc/INTE.41.2.0007
v         $xiirc/INTE.41.2.0008
v         $xiirc/INTE.41.2.0009
v         $xiirc/INTE.41.2.0010
v         $xiirc/INTE.41.2.0011
v         $xiirc/INTE.41.2.0012
v         $xiirc/INTE.41.2.0013
v         $xiirc/INTE.41.2.0014
v         $xiirc/INTE.41.2.0015
v         $xiirc/INTE.41.2.0016

Pal ;     anim3     A=$xiirc/INTE.41.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "robespierre"-) par :                                            #
                                        #                                                                                             #
                                        #    :Debut_listG_INTE_41:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=512                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MANE.61                                       #
                                        #    $Z             _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $Z             set       _____ImageTd1=$_____ImageTd                                     #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/param.61                                                   #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=0.80131489 vA=0.79628076                        \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/param.61                   #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.41$X                                                       \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=20                                      \  #
                                        #    $Z                                 COMPOSANTE_J=$xTV/param.61                         \  #
                                        #    $Z                                 K=0                                                \  #
                                        #    $Z                                 exposant=1                                         \  #
                                        #    $Z                                 fenetres_depart_arrivee_identiques=VRAI            \  #
                                        #    $Z                                 xbg=-0.04403889 xhd=-0.03475372                    \  #
                                        #    $Z                                 ybg=-0.36672577 yhd=-0.35744060                    \  #
                                        #    $Z                                 produit_non_theorique=VRAI                         \  #
                                        #    $Z                                 eRho=8                                             \  #
                                        #    $Z                                 pTheta=8  pPhi=8    pAlpha=1                       \  #
                                        #    $Z                                 tTheta=0  tPhi=0    tAlpha=0                       \  #
                                        #    $Z                                 visualiser_appartenance=VRAI                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/param.61                                         #
                                        #                                                                                             #
                                        #    $Z             _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.81                                       #
                                        #    $Z             _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $Z             set       _____ImageTd2=$_____ImageTd                                     #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set                 NTaux=32                                              #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_trig$X                                                    \  #
                                        #    $Z                                 p=1 d=$NTaux                                       \  #
                                        #    $Z                                 aD=0 aA=`calcul 8*$pi`                             \  #
                                        #    $Z                                 gamma=1                                            \  #
                                        #    $Z                                 entier=VRAI                                        \  #
                                        #    $Z                                 epsilon=0.2                                        \  #
                                        #    $Z                                                                         > $xTV/TAUX   #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.22$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 premiere=$cPremiere                                \  #
                                        #    $Z                                 iterations=$NTaux                                  \  #
                                        #    $Z                                 LISTE_TAUX=$xTV/TAUX                               \  #
                                        #    $Z                                 xbg=3.000 ybg=3.500                                \  #
                                        #    $Z                                 xhd=3.350 yhd=3.850                                \  #
                                        #    $Z                                 zD=4      zA=3                                     \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 editer_fenetre_courante=FAUX                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=50                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set                 _____ImageT1=$xTV/INTE.32                             #
                                        #    $Z             _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____Palette=$xiP/gris.D2                                       #
                                        #    $Z             set       _____Inverser=FAUX                                              #
                                        #    $Z             set       _____Complementaire="deux_interpolations=VRAI pADD2=0 pMAX2=1"  #
                                        #    $Z             set       _____Points=9                                                   #
                                        #    $Z             set       _____RotationX=+0.3                                             #
                                        #    $m4            _____include(_____xiirf/.FRA3.S2.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/acces$X                                                           \  #
                                        #    $Z                                 A=$_____ImageTd.%04d                               \  #
                                        #    $Z                                 standard=FAUX zero=FAUX                            \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=+1.20                                                    #
                                        #    $Z             set       AnGlEN=-1.05                                                    #
                                        #    $Z             set       PLAnGlEs="$K_VIDE"                                              #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" p=$Premiere d=$Derniere"                  #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" vD=$AnGlE0 vA=$AnGlEN"                    #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" lineaire=VRAI"                            #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" format=f decimales=4"                     #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X $PLAnGlEs`                         #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____DxDyDz=1                                         #
                                        #    $Z                       set       _____SuperEchelle=FAUX                                #
                                        #    $Z                       set       _____DRotation=VRAI                                   #
                                        #    $Z                       set       _____DRotationX=0                                     #
                                        #    $Z                       set       _____DRotationY=$LAnGlEs[$ImAgE]                      #
                                        #    $Z                       set       _____LineaireD=VRAI                                   #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=0                                      #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/INTE.41.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/INTE.41                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/INTE.41.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/INTE.41.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/INTE.41.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_INTE_41:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/INTE.32.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image.                                                #
                                        #                                                                                             #
                                        # On notera que 'v $xiirf/.FRA3.S2.2.$U .MANE.41.3._____U' reference 'v $xiirc/.MANE.41.3.$U' #
                                        # qui ne sert a rien mais que je ne peux rendre conditionnel par un 'if(...)' qui serait      #
                                        # de type '$Z' alors que l'include correspondant est de type '$m4' : le couple {else,endif}   #
                                        # qui suit ne serait alors pas reconnu et associe au 'if(...)'...                             #
                                        #                                                                                             #
                                        # En ce qui concerne le choix des angles de rotation dans [-1.05,+1.20], les commentaires     #
                                        # 'v $xiii/di_album$FON 20101209152519' le justifie...                         #

v         $xiac/ITER.22$R16
                                        # Generee (sur '$LACT1A') par : 'v $xiirc/$Fnota Debut_listG_ITER_22'...                      #

v         $xiac/ITGA.11$R16        p=$xiP/dentscie.01
v         $xiac/ITGA.11$R16        p=$xiP/dentscie.R4
v         $xiac/ITGA.11$R16        p=$xiP/fractal.91
v         $xiac/ITGA.11$R16        p=$xiP/dentscie.01       t=16 d=0            ralenti=32
v         $xiac/ITGA.11$R16        p=$xiP/dentscie.R4       t=16 d=0            ralenti=32
v         $xiac/ITGA.11$R16        p=$xiP/fractal.91        t=16 d=0            ralenti=32
v         $xiac/ITGA.11$R64        p=$xiP/dentscie.01
v         $xiac/ITGA.11$R64        p=$xiP/dentscie.R4
v         $xiac/ITGA.11$R64        p=$xiP/fractal.91
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 2 / 031135_031262                                                #
                                        #                   xivPdf 9 2 / 031263_031390                                                #
                                        #                   xivPdf 9 2 / 030879_031006                                                #
                                        #                                                                                             #

v         $xiac/ITZE.11$R16        p=$xiP/dentscie.01
v         $xiac/ITZE.11$R16        p=$xiP/dentscie.R4
v         $xiac/ITZE.11$R16        p=$xiP/fractal.91
v         $xiac/ITZE.11$R16        p=$xiP/dentscie.01       t=16 d=0            ralenti=32
v         $xiac/ITZE.11$R16        p=$xiP/dentscie.R4       t=16 d=0            ralenti=32
v         $xiac/ITZE.11$R16        p=$xiP/fractal.91        t=16 d=0            ralenti=32
v         $xiac/ITZE.11$R64        p=$xiP/dentscie.01
v         $xiac/ITZE.11$R64        p=$xiP/dentscie.R4
v         $xiac/ITZE.11$R64        p=$xiP/fractal.91
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 2 / 031391_031518                                                #
                                        #                   xivPdf 9 2 / 031519_031646                                                #
                                        #                   xivPdf 9 2 / 031007_031134                                                #
                                        #                                                                                             #

v         $xiac/JULI.41$R16             p=$xiP/cercle.22    t=16      d=4       ralenti=16
v         $xiac/JULI.41$R64             p=$xiP/cercle.22    t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 010936_010999                                                #
                                        #                                                                                             #
Gamma               $Gamma_mandel
v         $xiac/JULI.42.2.0$R16         p=$xiP/arc_ciel.01  t=16      d=4       ralenti=16
v         $xiac/JULI.42.2.0$R64         p=$xiP/arc_ciel.01  t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 011192_011255                                                #
                                        #                                                                                             #
                                        # avec de plus :                                                                              #
                                        #                                                                                             #
                                        #                   $xci/acces$X        A=$xiac/JULI.42.2.0$R16                            \  #
                                        #                                       renormaliser=VRAI R=$xiac/JULI.42.2.0$R16          \  #
                                        #                                       $formatI                                              #
                                        #                   $xci/acces$X        A=$xiac/JULI.42.2.0$R64                            \  #
                                        #                                       renormaliser=VRAI R=$xiac/JULI.42.2.0$R64          \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
Gamma               $Gamma_lorenz
v         $xiac/JULI.42.2.1$R16         p=$xiP/gris.01      t=16      d=4       ralenti=16
v         $xiac/JULI.42.2.1$R64         p=$xiP/gris.01      t=64      d=4       ralenti=32
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 011064_011127                                                #
                                        #                   xivPdf 2 1 / 011128_011191                                                #
                                        #                                                                                             #

v         $xiac/JULI.52$R16             p=$xiP/arc_ciel.12  t=16      d=4       ralenti=16
v         $xiac/JULI.52$R64             p=$xiP/arc_ciel.12  t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 011640_011765                                                #
                                        #                                                                                             #
                                        # avec un pas de 8 et de 2 respectivement...                                                  #
                                        #                                                                                             #
                                        # ATTENTION, la sequence qui a ete reellement calculee ne contenait que 126 images, car en    #
                                        # effet, de par le processus d'extraction de contour, on ne peut fixer a l'avance le nombre   #
                                        # des images calculees. Afin de simplifier l'utilisation des commandes '$xci/reduction_16$X'  #
                                        # et '$xci/reduction_64$X', deux images supplementaires ont ete ajoutees a l'aide de :        #
                                        #                                                                                             #
                                        #                   cp        $xw1/JULI.10126     $xw1/JULI.10127                             #
                                        #                   cp        $xw1/JULI.10001     $xw1/JULI.10128                             #
                                        #                                                                                             #
v         $xiac/JU.52.1$R16
v         $xiac/JU.52.1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 001801_001928                                                #
                                        #                                                                                             #
                                        # avec un pas de 8 et de 2 respectivement...                                                  #
v         $xiac/JU.52.2$R16
v         $xiac/JU.52.2$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 001955_002082                                                #
                                        #                                                                                             #
                                        # avec un pas de 8 et de 2 respectivement...                                                  #
v         $xiac/JULI.52.001$R16         p=$xiP/marron.05
v         $xiac/JULI.52.017$R16         p=$xiP/marron.05
v         $xiac/JULI.52.033$R16         p=$xiP/marron.05
v         $xiac/JULI.52.049$R16         p=$xiP/marron.05
v         $xiac/JULI.52.065$R16         p=$xiP/marron.05
v         $xiac/JULI.52.081$R16         p=$xiP/marron.05
v         $xiac/JULI.52.097$R16         p=$xiP/marron.05
v         $xiac/JULI.52.113$R16         p=$xiP/marron.05
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 011640_011765                                                #
                                        #                                                                                             #
                                        # en prenant d'abord les seize premieres images, puis les seize suivantes, en notant bien le  #
                                        # commentaire qui precede (voir '$xiac/JULI.52$R16' et '$xiac/JULI.52$R64') au sujet des 126  #
                                        # images...                                                                                   #
v         $xiac/JU.52$m$R04
v         $xiac/JU.53$m$R04
                                        # Correspondent aux images '0003', '0004, '0005' et '0006' de la sequence '$xiirc/JU.52$m',   #
                                        # la deuxieme image etant identique a la premiere a une rotation de +pi/2 pres (ainsi qu'a    #
                                        # un joli cadre pres...).                                                                     #
v         $xiac/JU.61$m$R16
v         $xiac/JU.62$m$R16
                                        # Correspondent aux operations suivantes :                                                    #
                                        #                                                                                             #
                                        #                   $xci/filtre.01$X    A=$xiac/JU.53$R16$DROITE                           \  #
                                        #                                       N=$xiio/GAUSS.8110                                 \  #
                                        #                                       R=$xT/JULIA.11                                     \  #
                                        #                                       $formatI                                              #
                                        #                   $xci/seuil$X        A=$xT/JULIA.11                                     \  #
                                        #                                       s=20                                               \  #
                                        #                                       R=$xT/JULIA.12                                     \  #
                                        #                                       $formatI                                              #
                                        #                   $xci/multi_02.01$X  A1=$xT/JULIA.11                                    \  #
                                        #                                       A2=$xT/JULIA.12                                    \  #
                                        #                                       R=$xT/JULIA.13                                     \  #
                                        #                                       $formatI                                              #
                                        #                   $xci/transpose$X    A=$xT/JULIA.13                                     \  #
                                        #                                       R=$xT/JULIA.21                                     \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        #                   $xci/vraies_C$X     A=$xT/JULIA.21                                     \  #
                                        #                                       p=$xiP/arc_ciel.12                                 \  #
                                        #                                       RR=$xT/JULIA.31$ROUGE                              \  #
                                        #                                       RV=$xT/JULIA.31$VERTE                              \  #
                                        #                                       RB=$xT/JULIA.31$BLEUE                              \  #
                                        #                                       $formatI                                              #
                                        #                   $xci/montagne.01$X  A=$xT/JULIA.21                                     \  #
                                        #                                       T=$xT/JULIA.31.?                                   \  #
                                        #                                       avion=VRAI                                         \  #
                                        #                                       R=$xiac/JU.61$m$R16.?                              \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        #                   $xci/vraies_C$X     A=$xT/JULIA.21                                     \  #
                                        #                                       p=$xiP/fractal.112                                 \  #
                                        #                                       RR=$xT/JULIA.32$ROUGE                              \  #
                                        #                                       RV=$xT/JULIA.32$VERTE                              \  #
                                        #                                       RB=$xT/JULIA.32$BLEUE                              \  #
                                        #                                       $formatI                                              #
                                        #                   $xci/montagne.01$X  A=$xT/JULIA.21                                     \  #
                                        #                                       T=$xT/JULIA.32.?                                   \  #
                                        #                                       avion=VRAI                                         \  #
                                        #                                       R=$xiac/JU.62$m$R16.?                              \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        # On notera l'utilisation de '$xci/transpose$X', et non pas de '$xci/rotate$X', a cause       #
                                        # d'artefacts de la rotation qui se manifestent alors par des barres verticales tres          #
                                        # visibles grace a '$xci/montagne.01$X'...                                                    #

v         $xiac/JU.53$R04$DROITE                  p=$xiP/arc_ciel.92
v         $xiac/JU.53$R04$GAUCHE                  p=$xiP/arc_ciel.92
                                        # Correspond aux quatre images '0004', '0005,' '0006, et '0007' des deux sequences            #
                                        # '$xiirc/JU.53$DROITE.' et '$xiirc/JU.53$GAUCHE.'.                                           #
v         $xiac/JU.53$R16$DROITE                  p=$xiP/arc_ciel.92  t=16      d=4  ralenti=16
v         $xiac/JU.53$R16$GAUCHE                  p=$xiP/arc_ciel.92  t=16      d=4  ralenti=16
v         $xiac/JU.53$R64$DROITE                  p=$xiP/arc_ciel.12  t=64      d=4  ralenti=32
v         $xiac/JU.53$R64$GAUCHE                  p=$xiP/arc_ciel.12  t=64      d=4  ralenti=32
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 012018_012143                                                #
                                        #                   xivPdf 2 1 / 012270_012395                                                #
                                        #                                                                                             #
                                        # avec un pas de 8 et de 2 respectivement...                                                  #
                                        #                                                                                             #
                                        # ATTENTION, la sequence qui a ete reellement calculee ne contenait que 126 images, car en    #
                                        # effet, de par le processus d'extraction de contour, on ne peut fixer a l'avance le nombre   #
                                        # des images calculees. Afin de simplifier l'utilisation des commandes '$xci/reduction_16$X'  #
                                        # et '$xci/reduction_64$X', deux images supplementaires ont ete ajoutees a l'aide de :        #
                                        #                                                                                             #
                                        #                   cp        $xw1/JULI$DROITE.20126        $xw1/JULI$DROITE.20127            #
                                        #                   cp        $xw1/JULI$DROITE.20001        $xw1/JULI$DROITE.20128            #
                                        #                                                                                             #
                                        #                   cp        $xw1/JULI$GAUCHE.20126        $xw1/JULI$GAUCHE.20127            #
                                        #                   cp        $xw1/JULI$GAUCHE.20001        $xw1/JULI$GAUCHE.20128            #
                                        #                                                                                             #
Std ;     $xci/display$X      A=$xiac/JU.53.001$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.001$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.017$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.017$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.033$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.033$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.049$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.049$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.065$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.065$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.081$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.081$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.097$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.097$R16$GAUCHE              p=$xiP/arc_ciel.12
Std ;     $xci/display$X      A=$xiac/JU.53.113$R16$DROITE            p=$xiP/arc_ciel.12            xc=1.0              $formatI  &
v         $xiac/JU.53.113$R16$GAUCHE              p=$xiP/arc_ciel.12
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 012018_012143                                                #
                                        #                   xivPdf 2 1 / 012270_012395                                                #
                                        #                                                                                             #
                                        # en prenant d'abord les seize premieres images, puis les seize suivantes, en notant bien le  #
                                        # commentaire qui precede au sujet des 126 images...                                          #
v         $xiac/JU.53$R16$STEREO
v         $xiac/JU.53$R64$STEREO
                                        # Correspond a la sequence anaglyphique d'images suivantes :                                  #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 012522_012647                                                #
                                        #                                                                                             #
                                        # avec un pas de 8 et 2 respectivement, en notant bien le commentaire qui precede au sujet    #
                                        # des 126 images...                                                                           #

v         $xiac/JULI.81$R16             p=$xiP/orange.11
v         $xiac/JULI.81$R16             p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   alias     julia     '$xrc/julia.21$X     images=1 iterations=\!*       \  #
                                        #                                        globale=FAUX positifs=FAUX negatifs=VRAI          \  #
                                        #                                        mode=1                                            \  #
                                        #                                        $formatI                                    |     \  #
                                        #                                        $xci/acces$X        R=$xw1/JULI.100\!*            \  #
                                        #                                        $formatI'                                            #
                                        #                                                                                             #
                                        # puis :                                                                                      #
                                        #                                                                                             #
                                        #                   julia     01                                                              #
                                        #                   julia     02                                                              #
                                        #                   julia     03                                                              #
                                        #                   julia     04                                                              #
                                        #                   julia     05                                                              #
                                        #                   julia     06                                                              #
                                        #                   julia     07                                                              #
                                        #                   julia     08                                                              #
                                        #                   julia     09                                                              #
                                        #                   julia     10                                                              #
                                        #                   julia     11                                                              #
                                        #                   julia     12                                                              #
                                        #                   julia     13                                                              #
                                        #                   julia     14                                                              #
                                        #                   julia     15                                                              #
                                        #                   julia     16                                                              #
                                        #                                                                                             #

v         $xiac/JULI.82$R16             p=$xiP/orange.11
v         $xiac/JULI.82$R16             p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   alias     julia     '$xrc/julia.21$X     images=1 iterations=\!*       \  #
                                        #                                        globale=FAUX positifs=VRAI negatifs=VRAI          \  #
                                        #                                        mode=1                                            \  #
                                        #                                        $formatI                                    |     \  #
                                        #                                        $xci/acces$X        R=$xw1/JULI.200\!*            \  #
                                        #                                        $formatI'                                            #
                                        #                                                                                             #
                                        # puis voir '$xiac/JULI.81$R16'...                                                            #
v         $xiac/JULI.91$R16             p=$xiP/fractal.11
v         $xiac/JULI.91$R16             p=$xiP/fractal.11   t=16      d=4       ralenti=32
v         $xiac/JULI.91$R64             p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 017764_017889                                                #
                                        #                                                                                             #
                                        # ATTENTION, la sequence n'ayant que 126 images, '$xiac/JULI.91$R64' ne possede que 63        #
                                        # images (et non pas les 64 reglementaires...).                                               #
v         $xiac/JULI.A1$R16             p=$xiP/fractal.11
v         $xiac/JULI.A1$R64             p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 004169_004294                                                #
                                        #                                                                                             #
                                        # ATTENTION, la sequence n'ayant que 126 images, '$xiac/JULI.A1$R64' ne possede que 63        #
                                        # images (et non pas les 64 reglementaires...).                                               #
v         $xiac/JULI.B1$R16             p=$xiP/cercle.34
v         $xiac/JULI.B1$R64             p=$xiP/cercle.34
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 004295_004422                                                #
                                        #                                                                                             #
v         $xiac/JULI.C1$R16             p=$xiP/gris.01
v         $xiac/JULI.C1$R16             p=$xiP/fractal.11
v         $xiac/JULI.C1$R64             p=$xiP/gris.01
v         $xiac/JULI.C1$R64             p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 004423_004678                                                #
                                        #                                                                                             #
v         $xiac/JULI.D1$R16
v         $xiac/JULI.D1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 004943_005198                                                #
                                        #                                                                                             #
v         $xiac/JULI.E1$R16             p=$xiP/enfer.05
v         $xiac/JULI.E1$R16             p=$xiP/gris.01
v         $xiac/JULI.E1$R16             p=$xiP/marron.05
v         $xiac/JULI.E1$R16             p=$xiP/random.06
v         $xiac/JULI.E1$R16             p=$xiP/trou_noir.14
v         $xiac/JULI.E1$R64             p=$xiP/enfer.05
v         $xiac/JULI.E1$R64             p=$xiP/gris.01
v         $xiac/JULI.E1$R64             p=$xiP/marron.05
v         $xiac/JULI.E1$R64             p=$xiP/random.06
v         $xiac/JULI.E1$R64             p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 005199_005324                                                #
                                        #                   xivPdf 7 1 / 005325_005450                                                #
                                        #                   xivPdf 7 1 / 005451_005576                                                #
                                        #                   xivPdf 7 1 / 005577_005702                                                #
                                        #                                                                                             #
v         $xiac/JULI.F1$R16             p=$xiP/enfer.05
v         $xiac/JULI.F1$R16             p=$xiP/gris.01
v         $xiac/JULI.F1$R16             p=$xiP/marron.05
v         $xiac/JULI.F1$R16             p=$xiP/random.06
v         $xiac/JULI.F1$R16             p=$xiP/trou_noir.14
v         $xiac/JULI.F1$R64             p=$xiP/enfer.05
v         $xiac/JULI.F1$R64             p=$xiP/gris.01
v         $xiac/JULI.F1$R64             p=$xiP/marron.05
v         $xiac/JULI.F1$R64             p=$xiP/random.06
v         $xiac/JULI.F1$R64             p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 005703_005828                                                #
                                        #                   xivPdf 7 1 / 005829_005954                                                #
                                        #                   xivPdf 7 1 / 005955_006080                                                #
                                        #                   xivPdf 7 1 / 006081_006206                                                #
                                        #                                                                                             #
v         $xiac/JULI.G1$R16             p=$xiP/gris.01
v         $xiac/JULI.G1$R16             p=$xiP/fractal.11
v         $xiac/JULI.G1$R64             p=$xiP/gris.01
v         $xiac/JULI.G1$R64             p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 006207_006332                                                #
                                        #                   xivPdf 7 1 / 006333_006458                                                #
                                        #                   xivPdf 7 1 / 006459_006584                                                #
                                        #                                                                                             #
v         $xiac/JU.H1$R16$DROITE                  p=$xiP/enfer.05
v         $xiac/JU.H1$R16$DROITE                  p=$xiP/fractal.11
v         $xiac/JU.H1$R16$DROITE                  p=$xiP/trou_noir.14
v         $xiac/JU.H1$R64$DROITE                  p=$xiP/enfer.05
v         $xiac/JU.H1$R64$DROITE                  p=$xiP/fractal.11
v         $xiac/JU.H1$R64$DROITE                  p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 006585_006710                                                #
                                        #                   xivPdf 7 1 / 006711_006836                                                #
                                        #                   xivPdf 7 1 / 006837_006962                                                #
                                        #                                                                                             #
v         $xiac/JU.H1$R16$GAUCHE                  p=$xiP/enfer.05
v         $xiac/JU.H1$R16$GAUCHE                  p=$xiP/fractal.11
v         $xiac/JU.H1$R16$GAUCHE                  p=$xiP/trou_noir.14
v         $xiac/JU.H1$R64$GAUCHE                  p=$xiP/enfer.05
v         $xiac/JU.H1$R64$GAUCHE                  p=$xiP/fractal.11
v         $xiac/JU.H1$R64$GAUCHE                  p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 007987_008112                                                #
                                        #                   xivPdf 7 1 / 008113_008238                                                #
                                        #                   xivPdf 7 1 / 008239_008364                                                #
                                        #                                                                                             #
v         $xiac/JULI.I1$R16
v         $xiac/JULI.I1$R64
v         $xiac/JULI.I1$R64$ROUGE            p=$xiP/gris.01 t=64 d=4            ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 006963_007218                                                #
                                        #                                                                                             #
v         $xiac/JU.J1$R16$DROITE                  p=$xiP/enfer.05
v         $xiac/JU.J1$R16$DROITE                  p=$xiP/fractal.11
v         $xiac/JU.J1$R16$DROITE                  p=$xiP/trou_noir.14
v         $xiac/JU.J1$R64$DROITE                  p=$xiP/enfer.05
v         $xiac/JU.J1$R64$DROITE                  p=$xiP/fractal.11
v         $xiac/JU.J1$R64$DROITE                  p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 007219_007474                                                #
                                        #                   xivPdf 7 1 / 007475_007730                                                #
                                        #                   xivPdf 7 1 / 007731_007986                                                #
                                        #                                                                                             #
v         $xiac/JU.J1$R16$GAUCHE                  p=$xiP/enfer.05
v         $xiac/JU.J1$R16$GAUCHE                  p=$xiP/fractal.11
v         $xiac/JU.J1$R16$GAUCHE                  p=$xiP/trou_noir.14
v         $xiac/JU.J1$R64$GAUCHE                  p=$xiP/enfer.05
v         $xiac/JU.J1$R64$GAUCHE                  p=$xiP/fractal.11
v         $xiac/JU.J1$R64$GAUCHE                  p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 008365_008620                                                #
                                        #                   xivPdf 7 1 / 008621_008876                                                #
                                        #                   xivPdf 7 1 / 008877_009132                                                #
                                        #                                                                                             #
v         $xiac/JU.K0$R16$DROITE        p=$xiP/enfer.05
v         $xiac/JU.K0$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.K0$R16$DROITE        p=$xiP/trou_noir.14
v         $xiac/JU.K0$R64$DROITE        p=$xiP/enfer.05
v         $xiac/JU.K0$R64$DROITE        p=$xiP/fractal.11
v         $xiac/JU.K0$R64$DROITE        p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 009133_009260                                                #
                                        #                   xivPdf 7 1 / 009261_009388                                                #
                                        #                   xivPdf 7 1 / 009389_009516                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.K0$R16$GAUCHE        p=$xiP/enfer.05
v         $xiac/JU.K0$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.K0$R16$GAUCHE        p=$xiP/trou_noir.14
v         $xiac/JU.K0$R64$GAUCHE        p=$xiP/enfer.05
v         $xiac/JU.K0$R64$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.K0$R64$GAUCHE        p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 010256_010383                                                #
                                        #                   xivPdf 7 1 / 010384_010511                                                #
                                        #                   xivPdf 7 1 / 010512_010639                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.K1$R16$DROITE        p=$xiP/enfer.05
v         $xiac/JU.K1$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.K1$R16$DROITE        p=$xiP/trou_noir.14
v         $xiac/JU.K1$R64$DROITE        p=$xiP/enfer.05
v         $xiac/JU.K1$R64$DROITE        p=$xiP/fractal.11
v         $xiac/JU.K1$R64$DROITE        p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 009517_009644                                                #
                                        #                   xivPdf 7 1 / 009645_009772                                                #
                                        #                   xivPdf 7 1 / 009773_009900                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.K1$R16$GAUCHE        p=$xiP/enfer.05
v         $xiac/JU.K1$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.K1$R16$GAUCHE        p=$xiP/trou_noir.14
v         $xiac/JU.K1$R64$GAUCHE        p=$xiP/enfer.05
v         $xiac/JU.K1$R64$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.K1$R64$GAUCHE        p=$xiP/trou_noir.14
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 010640_010767                                                #
                                        #                   xivPdf 7 1 / 010768_010895                                                #
                                        #                   xivPdf 7 1 / 010896_011023                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.L0$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.L0$R64$DROITE        p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 010000_010127                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.L0$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.L0$R64$GAUCHE        p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 011123_011250                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.L1$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.L1$R64$DROITE        p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 010128_010255                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.L1$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.L1$R64$GAUCHE        p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 011251_011378                                                #
                                        #                                                                                             #
                                        # ATTENTION, voir le commentaire relatif aux series '$DROITE' et '$GAUCHE' dans le '$Fnota'.  #
v         $xiac/JU.N1$R16$DROITE        p=$xiP/arc_ciel.01
v         $xiac/JU.N1$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.N1$R16$DROITE
v         $xiac/JU.N2$R16$DROITE
v         $xiac/JU.N1$R64$DROITE        p=$xiP/arc_ciel.01
v         $xiac/JU.N1$R64$DROITE        p=$xiP/fractal.11
v         $xiac/JU.N1$R64$DROITE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 011384_011517                                                #
                                        #                   xivPdf 7 1 / 011518_011651                                                #
                                        #                                                                                             #
                                        # ou '$xiac/JU.N2$R16$DROITE' correspond aux images '0087' a '0102' (avec un pas de 2), et    #
                                        # se raccorde donc a '$xiac/JU.O0$R16$DROITE'.                                                #
v         $xiac/JU.N1$MP4
                                        # Generee (sur '$CMAP28' -ex "porte-de-la-chapelle"-) par :                                   #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JU_N1:                                                                      #
                                        #                                                                                             #
                                        #    $Z             XYmaxNe   1079 719                                                        #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FCoMpOsAnTe_J                                         #
                                        #                                                                                             #
                                        #    $Z             set                 NCoUcHeS=128                                          #
                                        #    $Z             set                 NItErAtIoNs=32                                        #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=1 d=$NCoUcHeS vD=-1.0 vA=1.0 cubique=FAUX        \  #
                                        #    $Z                                                               >> $FCoMpOsAnTe_J       #
                                        #                                                                                             #
                                        #    $Z             SET                 _____ImageT=$xTV/JULI.NR.                             #
                                        #                                                                                             #
                                        #    $Z             $xrc/julia.42$X                                                        \  #
                                        #    $Z                                 Ccompatibilite_20120210=VRAI                       \  #
                                        #    $Z                                 Lcompatibilite_20120210=VRAI                       \  #
                                        #    $Z                                 couches=$NCoUcHeS                                  \  #
                                        #    $Z                                 iterations=$NItErAtIoNs                            \  #
                                        #    $Z                                 transparence=FAUX binariser=VRAI seuil=$GRIS_6     \  #
                                        #    $Z                                 J_COMPOSANTE_J=$FCoMpOsAnTe_J                      \  #
                                        #    $Z                                 JK=0.0                                             \  #
                                        #    $Z                                 translation_quelconque=FAUX stereo=0.0             \  #
                                        #    $Z                                 editer=VRAI                                        \  #
                                        #    $Z                                 R=$_____ImageT                                     \  #
                                        #    $Z                                 M=$xTV/JULI.NM.                                    \  #
                                        #    $Z                                 $formatI                                              #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FCoMpOsAnTe_J                                         #
                                        #                                                                                             #
                                        #    $Z             SET                 Premiere=1                                            #
                                        #    $Z             SET                 Derniere=`ls $_____ImageT* |& $WCl`                   #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____ImageT                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/fractal.11                                  \  #
                                        #    $Z                                 R=$_____ImageT                                     \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____Animation=$xiac/JU.N1                                      #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JU_N1:                                                                        #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Il s'agit d'une version '$MP4' de 'v $xiac/JU.N1$R16' regeneree pour le CNRS                #
                                        # ('v $Dcourrier_in/20150202102656 name=.colonna_anims.docx.').                               #
                                        #                                                                                             #
                                        # Voici le quaternion 'J' pour les differentes images :                                       #
                                        #                                                                                             #
                                        #                   image 0001 : j=(-1.38888888888888906,-0.0868055555555555802,+0,+0)        #
                                        #                   image 0002 : j=(-1.33680555555555558,-0.10069444444444442,+0,+0)          #
                                        #                   image 0003 : j=(-1.28472222222222232,-0.114583333333333259,+0,+0)         #
                                        #                   image 0004 : j=(-1.26388888888888884,-0.159722222222222321,+0,+0)         #
                                        #                   image 0005 : j=(-1.22916666666666652,-0.190972222222222321,+0,+0)         #
                                        #                   image 0006 : j=(-1.20486111111111116,-0.23263888888888884,+0,+0)          #
                                        #                   image 0007 : j=(-1.20486111111111116,-0.29861111111111116,+0,+0)          #
                                        #                   image 0008 : j=(-1.16319444444444442,-0.30902777777777779,+0,+0)          #
                                        #                   image 0009 : j=(-1.11458333333333326,-0.29166666666666663,+0,+0)          #
                                        #                   image 0010 : j=(-1.05555555555555558,-0.29861111111111116,+0,+0)          #
                                        #                   image 0011 : j=(-1.02430555555555558,-0.31944444444444442,+0,+0)          #
                                        #                   image 0012 : j=(-0.979166666666666741,-0.29861111111111116,+0,+0)         #
                                        #                   image 0013 : j=(-0.92361111111111116,-0.28819444444444442,+0,+0)          #
                                        #                   image 0014 : j=(-0.885416666666666519,-0.260416666666666741,+0,+0)        #
                                        #                   image 0015 : j=(-0.82986111111111116,-0.25,+0,+0)                         #
                                        #                   image 0016 : j=(-0.76736111111111116,-0.253472222222222099,+0,+0)         #
                                        #                   image 0017 : j=(-0.729166666666666741,-0.28125,+0,+0)                     #
                                        #                   image 0018 : j=(-0.715277777777777679,-0.33333333333333337,+0,+0)         #
                                        #                   image 0019 : j=(-0.684027777777777679,-0.368055555555555469,+0,+0)        #
                                        #                   image 0020 : j=(-0.677083333333333259,-0.42708333333333337,+0,+0)         #
                                        #                   image 0021 : j=(-0.652777777777777901,-0.46180555555555558,+0,+0)         #
                                        #                   image 0022 : j=(-0.60763888888888884,-0.48263888888888884,+0,+0)          #
                                        #                   image 0023 : j=(-0.57638888888888884,-0.517361111111111049,+0,+0)         #
                                        #                   image 0024 : j=(-0.572916666666666519,-0.57986111111111116,+0,+0)         #
                                        #                   image 0025 : j=(-0.586805555555555358,-0.63194444444444442,+0,+0)         #
                                        #                   image 0026 : j=(-0.54861111111111116,-0.65972222222222221,+0,+0)          #
                                        #                   image 0027 : j=(-0.506944444444444642,-0.635416666666666741,+0,+0)        #
                                        #                   image 0028 : j=(-0.45486111111111116,-0.62152777777777779,+0,+0)          #
                                        #                   image 0029 : j=(-0.395833333333333481,-0.62847222222222221,+0,+0)         #
                                        #                   image 0030 : j=(-0.364583333333333481,-0.66319444444444442,+0,+0)         #
                                        #                   image 0031 : j=(-0.302083333333333037,-0.65972222222222221,+0,+0)         #
                                        #                   image 0032 : j=(-0.260416666666666963,-0.68402777777777779,+0,+0)         #
                                        #                   image 0033 : j=(-0.256944444444444198,-0.74652777777777779,+0,+0)         #
                                        #                   image 0034 : j=(-0.246527777777777679,-0.802083333333333259,+0,+0)        #
                                        #                   image 0035 : j=(-0.23263888888888884,-0.84722222222222221,+0,+0)          #
                                        #                   image 0036 : j=(-0.177083333333333481,-0.85763888888888884,+0,+0)         #
                                        #                   image 0037 : j=(-0.145833333333333481,-0.89236111111111116,+0,+0)         #
                                        #                   image 0038 : j=(-0.121527777777777679,-0.93402777777777779,+0,+0)         #
                                        #                   image 0039 : j=(-0.0902777777777776791,-0.96180555555555558,+0,+0)        #
                                        #                   image 0040 : j=(-0.0833333333333330373,-0.90277777777777779,+0,+0)        #
                                        #                   image 0041 : j=(-0.0659722222222218768,-0.854166666666666741,+0,+0)       #
                                        #                   image 0042 : j=(-0.0173611111111107164,-0.83680555555555558,+0,+0)        #
                                        #                   image 0043 : j=(-0.00347222222222232091,-0.79861111111111116,+0,+0)       #
                                        #                   image 0044 : j=(-0.00347222222222232091,-0.732638888888888951,+0,+0)      #
                                        #                   image 0045 : j=(+0.00694444444444419773,-0.67708333333333337,+0,+0)       #
                                        #                   image 0046 : j=(+0.0486111111111107164,-0.65277777777777779,+0,+0)        #
                                        #                   image 0047 : j=(+0.11111111111111116,-0.64930555555555558,+0,+0)          #
                                        #                   image 0048 : j=(+0.152777777777777679,-0.625,+0,+0)                       #
                                        #                   image 0049 : j=(+0.177083333333333481,-0.58333333333333337,+0,+0)         #
                                        #                   image 0050 : j=(+0.239583333333333037,-0.57986111111111116,+0,+0)         #
                                        #                   image 0051 : j=(+0.28125,-0.59722222222222221,+0,+0)                      #
                                        #                   image 0052 : j=(+0.34375,-0.60069444444444442,+0,+0)                      #
                                        #                   image 0053 : j=(+0.364583333333333481,-0.576388888888888951,+0,+0)        #
                                        #                   image 0054 : j=(+0.34375,-0.53125,+0,+0)                                  #
                                        #                   image 0055 : j=(+0.322916666666666519,-0.486111111111111049,+0,+0)        #
                                        #                   image 0056 : j=(+0.333333333333333037,-0.43055555555555558,+0,+0)         #
                                        #                   image 0057 : j=(+0.354166666666666519,-0.385416666666666741,+0,+0)        #
                                        #                   image 0058 : j=(+0.399305555555555358,-0.364583333333333259,+0,+0)        #
                                        #                   image 0059 : j=(+0.42361111111111116,-0.34375,+0,+0)                      #
                                        #                   image 0060 : j=(+0.38888888888888884,-0.3125,+0,+0)                       #
                                        #                   image 0061 : j=(+0.385416666666666963,-0.25,+0,+0)                        #
                                        #                   image 0062 : j=(+0.413194444444444642,-0.21875,+0,+0)                     #
                                        #                   image 0063 : j=(+0.385416666666666963,-0.18055555555555558,+0,+0)         #
                                        #                   image 0064 : j=(+0.368055555555555802,-0.13194444444444442,+0,+0)         #
                                        #                   image 0065 : j=(+0.34375,-0.0902777777777776791,+0,+0)                    #
                                        #                   image 0066 : j=(+0.3125,-0.0555555555555555802,+0,+0)                     #
                                        #                   image 0067 : j=(+0.29513888888888884,-0.00694444444444441977,+0,+0)       #
                                        #                   image 0068 : j=(+0.305555555555555358,+0.0486111111111111605,+0,+0)       #
                                        #                   image 0069 : j=(+0.336805555555555802,+0.0833333333333332593,+0,+0)       #
                                        #                   image 0070 : j=(+0.364583333333333481,+0.121527777777777901,+0,+0)        #
                                        #                   image 0071 : j=(+0.385416666666666963,+0.166666666666666519,+0,+0)        #
                                        #                   image 0072 : j=(+0.402777777777778123,+0.215277777777777901,+0,+0)        #
                                        #                   image 0073 : j=(+0.38888888888888884,+0.239583333333333259,+0,+0)         #
                                        #                   image 0074 : j=(+0.385416666666666963,+0.302083333333333481,+0,+0)        #
                                        #                   image 0075 : j=(+0.416666666666666519,+0.336805555555555358,+0,+0)        #
                                        #                   image 0076 : j=(+0.413194444444444642,+0.364583333333333481,+0,+0)        #
                                        #                   image 0077 : j=(+0.36111111111111116,+0.378472222222222321,+0,+0)         #
                                        #                   image 0078 : j=(+0.340277777777777679,+0.423611111111110938,+0,+0)        #
                                        #                   image 0079 : j=(+0.322916666666666519,+0.472222222222222321,+0,+0)        #
                                        #                   image 0080 : j=(+0.340277777777777679,+0.520833333333333481,+0,+0)        #
                                        #                   image 0081 : j=(+0.354166666666666519,+0.572916666666666519,+0,+0)        #
                                        #                   image 0082 : j=(+0.354166666666666519,+0.604166666666666741,+0,+0)        #
                                        #                   image 0083 : j=(+0.29513888888888884,+0.597222222222222321,+0,+0)         #
                                        #                   image 0084 : j=(+0.25,+0.583333333333333259,+0,+0)                        #
                                        #                   image 0085 : j=(+0.1875,+0.579861111111110938,+0,+0)                      #
                                        #                   image 0086 : j=(+0.15625,+0.614583333333333481,+0,+0)                     #
                                        #                   image 0087 : j=(+0.125,+0.649305555555555358,+0,+0)                       #
                                        #                   image 0088 : j=(+0.0590277777777781232,+0.649305555555555358,+0,+0)       #
                                        #                   image 0089 : j=(+0.0138888888888888395,+0.670138888888889062,+0,+0)       #
                                        #                   image 0090 : j=(-0.00347222222222232091,+0.71875,+0,+0)                   #
                                        #                   image 0091 : j=(-0.00347222222222232091,+0.784722222222222321,+0,+0)      #
                                        #                   image 0092 : j=(-0.00347222222222232091,+0.836805555555555802,+0,+0)      #
                                        #                   image 0093 : j=(-0.0590277777777776791,+0.847222222222222321,+0,+0)       #
                                        #                   image 0094 : j=(-0.0763888888888892836,+0.895833333333333037,+0,+0)       #
                                        #                   image 0095 : j=(-0.0902777777777776791,+0.947916666666666519,+0,+0)       #
                                        #                   image 0096 : j=(-0.121527777777777679,+0.947916666666666519,+0,+0)        #
                                        #                   image 0097 : j=(-0.13888888888888884,+0.899305555555555802,+0,+0)         #
                                        #                   image 0098 : j=(-0.17013888888888884,+0.864583333333333481,+0,+0)         #
                                        #                   image 0099 : j=(-0.225694444444444198,+0.854166666666666519,+0,+0)        #
                                        #                   image 0100 : j=(-0.246527777777777679,+0.815972222222222321,+0,+0)        #
                                        #                   image 0101 : j=(-0.253472222222222321,+0.756944444444444642,+0,+0)        #
                                        #                   image 0102 : j=(-0.256944444444444198,+0.69444444444444442,+0,+0)         #
                                        #                   image 0103 : j=(-0.291666666666666519,+0.663194444444444198,+0,+0)        #
                                        #                   image 0104 : j=(-0.354166666666666963,+0.659722222222222099,+0,+0)        #
                                        #                   image 0105 : j=(-0.38888888888888884,+0.635416666666666519,+0,+0)         #
                                        #                   image 0106 : j=(-0.440972222222222321,+0.621527777777777679,+0,+0)        #
                                        #                   image 0107 : j=(-0.5,+0.628472222222222321,+0,+0)                         #
                                        #                   image 0108 : j=(-0.534722222222221877,+0.659722222222222099,+0,+0)        #
                                        #                   image 0109 : j=(-0.586805555555555358,+0.645833333333333259,+0,+0)        #
                                        #                   image 0110 : j=(-0.57638888888888884,+0.590277777777777901,+0,+0)         #
                                        #                   image 0111 : j=(-0.572916666666666519,+0.527777777777777901,+0,+0)        #
                                        #                   image 0112 : j=(-0.597222222222222321,+0.48611111111111116,+0,+0)         #
                                        #                   image 0113 : j=(-0.645833333333333259,+0.46875,+0,+0)                     #
                                        #                   image 0114 : j=(-0.677083333333333259,+0.440972222222222321,+0,+0)        #
                                        #                   image 0115 : j=(-0.68055555555555558,+0.378472222222222321,+0,+0)         #
                                        #                   image 0116 : j=(-0.71180555555555558,+0.34375,+0,+0)                      #
                                        #                   image 0117 : j=(-0.725694444444444198,+0.291666666666666741,+0,+0)        #
                                        #                   image 0118 : j=(-0.75694444444444442,+0.25694444444444442,+0,+0)          #
                                        #                   image 0119 : j=(-0.815972222222222321,+0.25,+0,+0)                        #
                                        #                   image 0120 : j=(-0.875,+0.25694444444444442,+0,+0)                        #
                                        #                   image 0121 : j=(-0.916666666666666741,+0.28125,+0,+0)                     #
                                        #                   image 0122 : j=(-0.96875,+0.29513888888888884,+0,+0)                      #
                                        #                   image 0123 : j=(-1.01388888888888884,+0.315972222222222321,+0,+0)         #
                                        #                   image 0124 : j=(-1.04513888888888884,+0.302083333333333481,+0,+0)         #
                                        #                   image 0125 : j=(-1.10069444444444442,+0.291666666666666741,+0,+0)         #
                                        #                   image 0126 : j=(-1.15277777777777768,+0.30555555555555558,+0,+0)          #
                                        #                   image 0127 : j=(-1.20833333333333348,+0.309027777777777679,+0,+0)         #
                                        #                   image 0128 : j=(-1.20486111111111116,+0.246527777777777679,+0,+0)         #
                                        #                   image 0129 : j=(-1.22222222222222232,+0.197916666666666741,+0,+0)         #
                                        #                   image 0130 : j=(-1.26388888888888884,+0.17361111111111116,+0,+0)          #
                                        #                   image 0131 : j=(-1.27777777777777768,+0.121527777777777901,+0,+0)         #
                                        #                   image 0132 : j=(-1.32291666666666674,+0.10069444444444442,+0,+0)          #
                                        #                   image 0133 : j=(-1.38888888888888906,+0.10069444444444442,+0,+0)          #
                                        #                   image 0134 : j=(-1.39930555555555558,+0.0451388888888890616,+0,+0)        #
                                        #                   image 0135 : j=(-1.4375,+0.0173611111111111605,+0,+0)                     #
                                        #                   image 0136 : j=(-1.48263888888888884,-0.00347222222222232091,+0,+0)       #
                                        #                   image 0137 : j=(-1.43402777777777768,-0.0208333333333334814,+0,+0)        #
                                        #                   image 0138 : j=(-1.40277777777777768,-0.0347222222222223209,+0,+0)        #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # On notera qu'initialementce calcul avait ete lance sur '$CMAP28' -ex "ternes"-, mais        #
                                        # malheureusement il saturait la memoire, parrement a cause du 'cache' des fichiers,          #
                                        # puisqu'effectivement beaucoup de fichiers sont crees. C'est ce probleme qui a provoque      #
                                        # l'ecriture des tests 'v OpenWrite.01$c' et 'v OpenWrite.02$c'.                              #
v         $xiac/JU.N1$R16$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/JU.N1$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.N1$R16$GAUCHE
v         $xiac/JU.N2$R16$GAUCHE
v         $xiac/JU.N1$R64$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/JU.N1$R64$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.N1$R64$GAUCHE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 011652_011785                                                #
                                        #                   xivPdf 7 1 / 011786_011919                                                #
                                        #                                                                                             #
                                        # ou '$xiac/JU.N2$R16$GAUCHE' correspond aux images '0087' a '0102' (avec un pas de 2), et    #
                                        # se raccorde donc a '$xiac/JU.O0$R16$GAUCHE'.                                                #
v         $xiac/JU.O0$R16$DROITE        p=$xiP/arc_ciel.01
v         $xiac/JU.O0$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.O0$R16$DROITE
v         $xiac/JU.O0$R64$DROITE        p=$xiP/arc_ciel.01
v         $xiac/JU.O0$R64$DROITE        p=$xiP/fractal.11
v         $xiac/JU.O0$R64$DROITE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 012022_012149                                                #
                                        #                                                                                             #
v         $xiac/JU.O0$R16$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/JU.O0$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.O0$R16$GAUCHE
v         $xiac/JU.O0$R64$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/JU.O0$R64$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.O0$R64$GAUCHE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 012252_012379                                                #
                                        #                                                                                             #
v         $xiac/JU.Q0$R16$DROITE        p=$xiP/arc_ciel.01
v         $xiac/JU.Q0$R16$DROITE        p=$xiP/fractal.11
v         $xiac/JU.Q0$R16$DROITE        p=$xiP/gris_oran.01
v         $xiac/JU.Q0$R16$DROITE
v         $xiac/JU.Q0$R64$DROITE        p=$xiP/arc_ciel.01
v         $xiac/JU.Q0$R64$DROITE        p=$xiP/fractal.11
v         $xiac/JU.Q0$R64$DROITE        p=$xiP/gris_oran.01
v         $xiac/JU.Q0$R64$DROITE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 012380_012443                                                #
                                        #                   xivPdf 7 1 / 012444_012507                                                #
                                        #                                                                                             #
v         $xiac/JU.Q0$R16$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/JU.Q0$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.Q0$R16$GAUCHE        p=$xiP/gris_oran.01
v         $xiac/JU.Q0$R16$GAUCHE
v         $xiac/JU.Q0$R64$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/JU.Q0$R64$GAUCHE        p=$xiP/fractal.11
v         $xiac/JU.Q0$R64$GAUCHE        p=$xiP/gris_oran.01
v         $xiac/JU.Q0$R64$GAUCHE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 012508_012571                                                #
                                        #                   xivPdf 7 1 / 012572_012635                                                #
                                        #                                                                                             #
v         $xiac/JU.R1$R16
v         $xiac/JU.R1$R64
v         $xiac/JU.R1$R64$ROUGE    p=$xiP/gris.01           t=64 d=0            ralenti=32
v         $xiac/JU.R2$R16
v         $xiac/JU.R2$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 017339_017466                                                #
                                        #                                                                                             #
                                        # avec les palettes '$xiP/fractal.11' et '$xiP/marron' respectivement...                      #
v         $xiac/JU.S1$R16          p=$xiP/enfer.05
v         $xiac/JU.S1$R16          p=$xiP/enfer.05          t=16 d=0            ralenti=32
v         $xiac/JU.S1$R64          p=$xiP/enfer.05
v         $xiac/JU.S1$R64          p=$xiP/enfer.05          t=64 d=0            ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 017979_018106                                                #
                                        #                                                                                             #
v         $xiac/JU.S1$m$R16        p=$xiP/montagnes.01
v         $xiac/JU.S1$m$R16        p=$xiP/montagnes.01      t=16 d=0            ralenti=32
v         $xiac/JU.S1$m$R64        p=$xiP/montagnes.01
v         $xiac/JU.S1$m$R64        p=$xiP/montagnes.01      t=64 d=0            ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018107_018234                                                #
                                        #                                                                                             #
v         $xiac/JU.S1$m$R16
v         $xiac/JU.S1$m$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018235_018362                                                #
                                        #                                                                                             #
v         $xiac/JU.T1$R16
v         $xiac/JU.T1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018363_018490                                                #
                                        #                                                                                             #
v         $xiac/JU.T1$m$R16
v         $xiac/JU.T1$m$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018524_018651                                                #
                                        #                                                                                             #
v         $xiac/JU.U1$R16
v         $xiac/JU.U1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018652_018779                                                #
                                        #                                                                                             #
v         $xiac/JU.U2$R16
v         $xiac/JU.U2$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018780_018907                                                #
                                        #                                                                                             #
v         $xiac/JU.V1$R16
v         $xiac/JU.V1$R64
v         $xiac/JU.V2$R16
v         $xiac/JU.V2$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 018908_019035                                                #
                                        #                                                                                             #
                                        # puis a un '$xci/substitue$X' de '$xiac/JU.V1$R16' et de '$xiac/JU.V1$R64' pour effectuer    #
                                        # un reajustement des niveaux avec '$xiP/gris.11'.                                            #
v         $xiac/JU.W1$R16
v         $xiac/JU.W1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 019036_019163                                                #
                                        #                                                                                             #
v         $xiac/JU.X1$R16
v         $xiac/JU.X1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 019804_019931                                                #
                                        #                                                                                             #
v         $xiac/JU.Y1$R16
v         $xiac/JU.Y1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 019932_020059                                                #
                                        #                                                                                             #
v         $xiac/JU.Z1$R16
v         $xiac/JU.Z1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 020060_020187                                                #
                                        #                                                                                             #
v         $xiac/JU.a1$R16$ROUGE    p=$xiP/gris.01
v         $xiac/JU.a1$R16$VERTE    p=$xiP/gris.01
v         $xiac/JU.a1$R16$BLEUE    p=$xiP/gris.01
v         $xiac/JU.a1$R16
v         $xiac/JU.a1$R64$ROUGE    p=$xiP/gris.01
v         $xiac/JU.a1$R64$VERTE    p=$xiP/gris.01
v         $xiac/JU.a1$R64$BLEUE    p=$xiP/gris.01
v         $xiac/JU.a1$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 020192_020319                                                #
                                        #                   xivPdf 7 1 / 020320_020447                                                #
                                        #                   xivPdf 7 1 / 020448_020575                                                #
                                        #                   xivPdf 7 1 / 020576_020703                                                #
                                        #                                                                                             #
v         $xiac/JU.a1$m$R16
v         $xiac/JU.a1$m$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 020704_020831                                                #
                                        #                                                                                             #
v         $xiac/JU.b1$R16
v         $xiac/JU.b1$R64
v         $xiac/JU.b1$R64$ROUGE    p=$xiP/dentscie.01       t=64 d=0            ralenti=32
v         $xiac/JU.b1$R64$ROUGE    p=$xiP/dentscie.02       t=64 d=0            ralenti=32
v         $xiac/JU.b1$R64$ROUGE    p=$xiP/fractal.11        t=64 d=0            ralenti=32
v         $xiac/JU.b1$R64$ROUGE    p=$xiP/gris.01           t=64 d=0            ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 020832_020959                                                #
                                        #                                                                                             #
v         $xiac/JU.c1$R16
v         $xiac/JU.c1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 020961_021088                                                #
                                        #                                                                                             #
v         $xiac/JU.d1$R16
v         $xiac/JU.d1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 021089_021216                                                #
                                        #                                                                                             #
v         $xiac/JU.e1$R16
v         $xiac/JU.e1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 021217_021344                                                #
                                        #                                                                                             #
v         $xiac/JU.f1$R16
v         $xiac/JU.f1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 021345_021472                                                #
                                        #                                                                                             #
v         $xiac/JU.g1.0$R16
v         $xiac/JU.g1.0$R64
v         $xiac/JU.g1.1$R16
v         $xiac/JU.g1.1$R64
v         $xiac/JU.g2.0$R16
v         $xiac/JU.g2.0$R64
v         $xiac/JU.g2.1$R16
v         $xiac/JU.g2.1$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 019219_019346                                                #
                                        #                   xivPdf 9 1 / 019347_019474                                                #
                                        #                   xivPdf 9 1 / 019603_019730                                                #
                                        #                   xivPdf 9 1 / 019475_019602                                                #
                                        #                                                                                             #
v         $xiac/JU.h1.0$R16
v         $xiac/JU.h1.0$R64
v         $xiac/JU.h1.1$R16
v         $xiac/JU.h1.1$R64
v         $xiac/JU.h2.0$R16
v         $xiac/JU.h2.0$R64
v         $xiac/JU.h2.1$R16
v         $xiac/JU.h2.1$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 024339_024466                                                #
                                        #                   xivPdf 9 1 / 024467_024594                                                #
                                        #                   xivPdf 9 1 / 024595_024722                                                #
                                        #                   xivPdf 9 1 / 024723_024850                                                #
                                        #                                                                                             #
v         $xiac/JU.i4.0$R16
v         $xiac/JU.i4.1$R16
v         $xiac/JU.i4.0$R64
v         $xiac/JU.i4.1$R64

v         $xiac/JU.i8.0$R16
v         $xiac/JU.i8.1$R16
v         $xiac/JU.i8.0$R64
v         $xiac/JU.i8.1$R64

v         $xiac/JU.iG.0$R16
v         $xiac/JU.iG.1$R16
v         $xiac/JU.iG.0$R64
v         $xiac/JU.iG.1$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 016001_016128                                               #
                                        #                   xivPdf 11 1 / 016129_016256                                               #
                                        #                   xivPdf 11 1 / 016257_016384                                               #
                                        #                   xivPdf 11 1 / 016385_016512                                               #
                                        #                   xivPdf 11 1 / 016513_016640                                               #
                                        #                   xivPdf 11 1 / 016641_016768                                               #
                                        #                                                                                             #
                                        # avec (par erreur) l'option implicite "inverser=FAUX".                                       #
v         $xiac/JU.j4.0$R16
v         $xiac/JU.j4.0$R64

v         $xiac/JU.j8.0$R16
v         $xiac/JU.j8.0$R64

v         $xiac/JU.jG.0$R16
v         $xiac/JU.jG.0$R64

v         $xiac/JU.jX.0$R16
v         $xiac/JU.jX.0$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 016769_016896                                               #
                                        #                   xivPdf 11 1 / 016897_017024                                               #
                                        #                   xivPdf 11 1 / 017025_017152                                               #
                                        #                   xivPdf 11 1 / 020251_020378                                               #
                                        #                                                                                             #
                                        # avec l'option "inverser=VRAI" (par rapport aux images '$xiac/JU.i*').                       #
v         $xiac/JU.jX.0$m$R16
v         $xiac/JU.jX.0$m$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 020379_020506                                               #
                                        #                                                                                             #
v         $xiac/JU.k1$R16
v         $xiac/JU.k1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 020763_020890                                               #
                                        #                                                                                             #
                                        # mais uniquement en ce qui concerne les 64 premieres images...                               #
v         $xiac/JU.k2$R16
v         $xiac/JU.k2$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 020891_021018                                               #
                                        #                                                                                             #
                                        # mais uniquement en ce qui concerne les 64 premieres images...                               #
v         $xiac/JU.l1$R16
v         $xiac/JU.l1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 021019_021146                                               #
                                        #                                                                                             #
v         $xiac/JU.m1$R16
v         $xiac/JU.m1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 021147_021274                                               #
                                        #                                                                                             #
v         $xiac/JU.m1.1$m$R16
v         $xiac/JU.m1.1$m$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 021275_021402                                               #
                                        #                                                                                             #
v         $xiac/JU.m1.2$m$R16
v         $xiac/JU.m1.2$m$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 021403_021530                                               #
                                        #                                                                                             #
v         $xiac/JULI.m2$R16
v         $xiac/JULI.m2$R16$ROUGE       p=$xiP/fractal.11
v         $xiac/JULI.m2$R16$VERTE       p=$xiP/fractal.11
v         $xiac/JULI.m2$R16$BLEUE       p=$xiP/fractal.11
v         $xiac/JULI.m2$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 021531_021658                                               #
                                        #                                                                                             #
v         $xiac/JULI.r1$R16
v         $xiac/JULI.r1$R64
v         $xiirc/JULI.r1.0056
v         $xiac/JULI.r4$R16
v         $xiac/JULI.r4$R64
v         $xiirc/JULI.r4.0056
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_r14:                                                                   #
                                        #                                                                                             #
                                        #    $Z             Pqu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=512                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT0=$xTV/JULIA                                         #
                                        #                                                                                             #
                                        #    $Z             set       PaLeTtE=$xiP/fractal.11                                         #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=-1.0 vA=+1.0                                    \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             $xrc/julia.41$X                                                        \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=32                                      \  #
                                        #    $Z                                 r=-0.5815147625160462                              \  #
                                        #    $Z                                 i=+0.6358885017421603                              \  #
                                        #    $Z                                 COMPOSANTE_J=$xTV/COMPOSANTE_J                     \  #
                                        #    $Z                                 K=0                                                \  #
                                        #    $Z                                 xbgD=-1.10 ybgD=-1.10 xhdD=+1.10 yhdD=+1.10        \  #
                                        #    $Z                                 xbgA=-1.10 ybgA=-1.10 xhdA=+1.10 yhdA=+1.10        \  #
                                        #    $Z                                 R=$_____ImageT0.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=64                                                     #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULIA.1                                       #
                                        #    $Z             set       _____ImageT4=$xTV/JULIA.4                                       #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   Seuil0    12                                                              #
                                        #    $c   #define   SeuilN    252                                                             #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    Seuil=((SeuilN*(n-N0))+(Seuil0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/accumule.02$X                       #
                                        #    $c                                      A=$_____ImageT0.                                 #
                                        #    $c                                      premiere=$cPremiere derniere=$cDerniere pas=1    #
                                        #    $c                                      binariser=VRAI seuil=%d                          #
                                        #    $c                                      translation_quelconque=FAUX                      #
                                        #    $c                                      stereo=0.0                                       #
                                        #    $c                                      trx=+0.0004892375 try=0                          #
                                        #    $c                                      R=$_____ImageT1.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,(int)Seuil                                               #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("$xci/vraies_C$X                          #
                                        #    $c                                      A=$_____ImageT1.%04d                             #
                                        #    $c                                      p=$PaLeTtE                                       #
                                        #    $c                                      RVB=VRAI                                         #
                                        #    $c                                      R=$_____ImageT1.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT1.%04d%%s                #
                                        #    $c                                                points=25                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                                           $xci/format.01$X             #
                                        #    $c                                                mode=2                                 #
                                        #    $c                                                R=$_____ImageT1.%04d%%s                #
                                        #    $c                                                                    $formatR_Pal%c\n"  #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/accumule.02$X                       #
                                        #    $c                                      A=$_____ImageT0.                                 #
                                        #    $c                                      premiere=$cPremiere derniere=$cDerniere pas=4    #
                                        #    $c                                      binariser=VRAI seuil=%d                          #
                                        #    $c                                      translation_quelconque=FAUX                      #
                                        #    $c                                      stereo=0.0                                       #
                                        #    $c                                      trx=+0.0004892375 try=0                          #
                                        #    $c                                      R=$_____ImageT4.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,(int)Seuil                                               #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("$xci/vraies_C$X                          #
                                        #    $c                                      A=$_____ImageT4.%04d                             #
                                        #    $c                                      p=$PaLeTtE                                       #
                                        #    $c                                      RVB=VRAI                                         #
                                        #    $c                                      R=$_____ImageT4.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT4.%04d%%s                #
                                        #    $c                                                points=25                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                                           $xci/format.01$X             #
                                        #    $c                                                mode=2                                 #
                                        #    $c                                                R=$_____ImageT4.%04d%%s                #
                                        #    $c                                                                    $formatR_Pal%c\n"  #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X  A=$_____ImageT1.0056%s   R=$xiirc/JULI.r1.0056%s  $formatI #
                                        #    $Z   execRVB   $xci/neutre$X  A=$_____ImageT4.0056%s   R=$xiirc/JULI.r4.0056%s  $formatI #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.r1                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT4                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.r4                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_r14:                                                                     #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette version est donc anti-aliasee puisque calculee en resolution quadruple, en notant     #
                                        # que les images '0056' correspondent a "seuil=221"...                                        #
v         $xiac/JULI.s1$R16
v         $xiac/JULI.s1$R64
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_s1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pqu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             @         cMilieu = $Nimages / 2                                          #
                                        #    $Z             @         cMilieu = $cPremiere + $cMilieu                                 #
                                        #    $Z             set       cMilieu = `$xci/nombres$X A="$K_VIDE" p=$cMilieu d=$cMilieu`    #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT0=$xTV/JULIA                                         #
                                        #                                                                                             #
                                        #    $Z             set       PaLeTtE=$xiP/fractal.11                                         #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=-1.0 vA=+1.0                                    \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=64                                                     #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULIA.1                                       #
                                        #                                                                                             #
                                        #    $Z             @         RaPpOrT = $tailleI / $taille_Pal                                #
                                        #    $Z             @         SeUiL_HIsTo = 430000                                            #
                                        #    $Z             @         SeUiL_HIsTo = $RaPpOrT * $SeUiL_HIsTo                           #
                                        #                                                                                             #
                                        #    $Z             set       PaRaM="$K_VIDE"                                                 #
                                        #    $Z             set       PaRaM="$PaRaM"" alpha_numerique=VRAI"                           #
                                        #    $Z             set       PaRaM="$PaRaM"" editer_uniquement_niveau_seuil=VRAI"            #
                                        #    $Z             set       PaRaM="$PaRaM"" seuil_histogramme_cumule_pourcentage=FAUX"      #
                                        #    $Z             set       PaRaM="$PaRaM"" seuil_histogramme_cumule=$SeUiL_HIsTo"          #
                                        #    $Z             set       PaRaM="$PaRaM"" Prme=VRAI"                                      #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    cos();                                                          #
                                        #    $c   extern    double    sin();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   RHO0      0                                                               #
                                        #    $c   #define   RHON      0.5                                                             #
                                        #    $c                                                                                       #
                                        #    $c   #define   THETA0    0                                                               #
                                        #    $c   #define   THETAN    12.56637061435917                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    rho=((RHON*(n-N0))+(RHO0*(N-n)))/(N-N0);              #
                                        #    $c                       double    theta=((THETAN*(n-N0))+(THETA0*(N-n)))/(N-N0);        #
                                        #    $c                       double    r;                                                    #
                                        #    $c                       double    i;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       r = -0.5815147625160462 + (rho*cos(theta));                     #
                                        #    $c                       i = +0.6358885017421603 + (rho*sin(theta));                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=32                                    #
                                        #    $c                                      r=%.16f                                          #
                                        #    $c                                      i=%.16f                                          #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      xbgD=-1.10 ybgD=-1.10 xhdD=+1.10 yhdD=+1.10      #
                                        #    $c                                      xbgA=-1.10 ybgA=-1.10 xhdA=+1.10 yhdA=+1.10      #
                                        #    $c                                      R=$_____ImageT0.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,r                                                        #
                                        #    $c                             ,i                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c        printf("set    SeUiL=`$xci/histogramme$X A=$_____ImageT0.$cMilieu $PaRaM`\n"); #
                                        #    $c        printf("set    SeUiL=`echo %c$SeUiL%c | $SE -e 's/^[^(]*(//'`\n"               #
                                        #    $c              ,'"','"'                                                                 #
                                        #    $c               );                                                                      #
                                        #    $c        printf("set    SeUiL=`echo %c$SeUiL%c | $SE -e 's/^\\([^)]*\\)).*$/\\1/'`\n"   #
                                        #    $c              ,'"','"'                                                                 #
                                        #    $c               );                                                                      #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/accumule.02$X                       #
                                        #    $c                                      A=$_____ImageT0.                                 #
                                        #    $c                                      premiere=$cPremiere derniere=$cDerniere pas=1    #
                                        #    $c                                      binariser=VRAI seuil=$SeUiL                      #
                                        #    $c                                      translation_quelconque=FAUX                      #
                                        #    $c                                      stereo=0.0                                       #
                                        #    $c                                      trx=+0.00195695 try=0                            #
                                        #    $c                                      R=$_____ImageT1.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("$xci/vraies_C$X                          #
                                        #    $c                                      A=$_____ImageT1.%04d                             #
                                        #    $c                                      p=$PaLeTtE                                       #
                                        #    $c                                      RVB=VRAI                                         #
                                        #    $c                                      R=$_____ImageT1.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT1.%04d%%s                #
                                        #    $c                                                points=25                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                                           $xci/format.01$X             #
                                        #    $c                                                mode=2                                 #
                                        #    $c                                                R=$_____ImageT1.%04d%%s                #
                                        #    $c                                                                    $formatR_Pal%c\n"  #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.s1                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_s1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose autour du point {-0.5815147625160462,+0.6358885017421603} une       #
                                        # promenade le long d'une spirale d'Archimede...                                              #
                                        #                                                                                             #
                                        # On notera que "seuil_histogramme_cumule_pourcentage=FAUX" a ete introduit le 20090602115313 #
                                        # c'est-a-dire apres la generation de ces animations ; cela fut rendu necessaire par la       #
                                        # valeur par defaut ('VRAI') de ce parametre...                                               #
v         $xiac/JULI.t1$R16
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_t1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       NPremiere=1                                                     #
                                        #    $Z             SET       NDerniere=64                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $NDerniere - $NPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____images_2       $xTV/JULI.1                                 #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/COMPOSANTE_J                                               #
                                        #    $Z             $xci/valeurs_inte$X p=$NPremiere d=$NDerniere                          \  #
                                        #    $Z                                 vD=0.0 vA=+1.0                                     \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             $xrc/julia.41$X                                                        \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=64                                      \  #
                                        #    $Z                                 r=0.0                                              \  #
                                        #    $Z                                 i=1.0                                              \  #
                                        #    $Z                                 COMPOSANTE_J=$xTV/COMPOSANTE_J                     \  #
                                        #    $Z                                 K=0                                                \  #
                                        #    $Z                                 arguments=FAUX                                     \  #
                                        #    $Z                                 R=$_____images_2.                                  \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       RPremiere=1                                                     #
                                        #    $Z             SET       RDerniere=16                                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    SeUiL               32                                          #
                                        #    $Z             setenv    PaLeTtE             $xiP/sepia.11                               #
                                        #                                                                                             #
                                        #    $Z             setenv    _____images_3       $xTV/JULI.2                                 #
                                        #                                                                                             #
                                        #    $Z   setenv    Tr_X   `$xci/coordonnees$X norm=VRAI X=1 eX=VRAI eY=FAUX eZ=FAUX eN=FAUX` #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FStErOgRaM                                            #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #                                                                                             #
                                        #    $c             #define   R0        RPremiere                                             #
                                        #    $c             #define   R         RDerniere                                             #
                                        #                                                                                             #
                                        #    $c             #define   N0        NPremiere                                             #
                                        #    $c             #define   N         NDerniere                                             #
                                        #                                                                                             #
                                        #    $c             #define   S0        -4.0                                                  #
                                        #    $c             #define   SN        +4.0                                                  #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=R0 ; n<=R ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    stereo = S0 + (((SN-S0)*(n-R0))/(R-R0));    #
                                        #                                                                                             #
                                        #    $c                                 printf("echo      %c$xci/accumule.02$X                #
                                        #    $c                                                               A=$_____images_2.       #
                                        #    $c                                                               premiere=%d derniere=%d #
                                        #    $c                                                               binariser=FAUX          #
                                        #    $c                                                               seuil=$SeUiL            #
                                        #    $c                                                               quelconque=FAUX         #
                                        #    $c                                                               quelconque=VRAI         #
                                        #    $c                                                               trx=$Tr_X try=0         #
                                        #    $c                                                               stereo=%f               #
                                        #    $c                                                               $formatI            |   #
                                        #    $c                                                   $xci/acces$X                        #
                                        #    $c                                                               renormaliser=VRAI       #
                                        #    $c                                                               $formatI            |   #
                                        #    $c                                                   $xci/vraies_C$X      #
                                        #    $c                                                               p=$PaLeTtE              #
                                        #    $c                                                               R=$_____images_3.%04d   #
                                        #    $c                                                               $formatI%c              #
                                        #    $c                                                                    >> $FStErOgRaM\n"  #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,N0,N                                           #
                                        #    $c                                       ,stereo                                         #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FStErOgRaM                                           #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FStErOgRaM" p14=FAUX   #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FStErOgRaM                                            #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=$RPremiere                                             #
                                        #    $Z             set       Derniere=$RDerniere                                             #
                                        #    $Z             set       _____images=$_____images_3                                      #
                                        #    $Z             set       _____animation=$xiac/JULI.t1                                    #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_t1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Donne 4x3 stereogrammes de 'v $xiirc/JULI.q2'...                                            #
v         $xiac/JULI.u1$R16
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_u1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       NPremiere=1                                                     #
                                        #    $Z             SET       NDerniere=64                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $NDerniere - $NPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____images_2       $xTV/JULI.1                                 #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/COMPOSANTE_J                                               #
                                        #    $Z             $xci/valeurs_inte$X p=$NPremiere d=$NDerniere                          \  #
                                        #    $Z                                 vD=-1.0 vA=+1.0                                    \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             $xrc/julia.41$X                                                        \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=32                                      \  #
                                        #    $Z                                 r=-0.5815147625160462                              \  #
                                        #    $Z                                 i=+0.6358885017421603                              \  #
                                        #    $Z                                 COMPOSANTE_J=$xTV/COMPOSANTE_J                     \  #
                                        #    $Z                                 K=0                                                \  #
                                        #    $Z                                 xbgD=-1.10 ybgD=-1.10 xhdD=+1.10 yhdD=+1.10        \  #
                                        #    $Z                                 xbgA=-1.10 ybgA=-1.10 xhdA=+1.10 yhdA=+1.10        \  #
                                        #    $Z                                 R=$_____images_2.                                  \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       RPremiere=1                                                     #
                                        #    $Z             SET       RDerniere=16                                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    SeUiL               192                                         #
                                        #    $Z             setenv    PaLeTtE             $xiP/fractal.11                             #
                                        #                                                                                             #
                                        #    $Z             setenv    _____images_3       $xTV/JULI.2                                 #
                                        #                                                                                             #
                                        #    $Z   setenv    Tr_X   `$xci/coordonnees$X norm=VRAI X=1 eX=VRAI eY=FAUX eZ=FAUX eN=FAUX` #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FStErOgRaM                                            #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #                                                                                             #
                                        #    $c             #define   R0        RPremiere                                             #
                                        #    $c             #define   R         RDerniere                                             #
                                        #                                                                                             #
                                        #    $c             #define   N0        NPremiere                                             #
                                        #    $c             #define   N         NDerniere                                             #
                                        #                                                                                             #
                                        #    $c             #define   S0        -4.0                                                  #
                                        #    $c             #define   SN        +4.0                                                  #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=R0 ; n<=R ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    stereo = S0 + (((SN-S0)*(n-R0))/(R-R0));    #
                                        #                                                                                             #
                                        #    $c                                 printf("echo      %c$xci/accumule.02$X                #
                                        #    $c                                                               A=$_____images_2.       #
                                        #    $c                                                               premiere=%d derniere=%d #
                                        #    $c                                                               binariser=VRAI          #
                                        #    $c                                                               seuil=$SeUiL            #
                                        #    $c                                                               quelconque=FAUX         #
                                        #    $c                                                               quelconque=VRAI         #
                                        #    $c                                                               trx=$Tr_X try=0         #
                                        #    $c                                                               stereo=%f               #
                                        #    $c                                                               $formatI            |   #
                                        #    $c                                                   $xci/acces$X                        #
                                        #    $c                                                               renormaliser=VRAI       #
                                        #    $c                                                               $formatI            |   #
                                        #    $c                                                   $xci/vraies_C$X      #
                                        #    $c                                                               p=$PaLeTtE              #
                                        #    $c                                                               R=$_____images_3.%04d   #
                                        #    $c                                                               $formatI%c              #
                                        #    $c                                                                    >> $FStErOgRaM\n"  #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,N0,N                                           #
                                        #    $c                                       ,stereo                                         #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FStErOgRaM                                           #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FStErOgRaM" p14=FAUX   #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FStErOgRaM                                            #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=$RPremiere                                             #
                                        #    $Z             set       Derniere=$RDerniere                                             #
                                        #    $Z             set       _____images=$_____images_3                                      #
                                        #    $Z             set       _____animation=$xiac/JULI.u1                                    #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_u1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Donne 4x3 stereogrammes de 'v $xiirc/JULI.k1' (et donc de 'v $xiirc/JULI.r4.0056')...       #
v         $xiac/JULI.v2.1$R16
v         $xiac/JULI.v2.2$R16

v         $xiirc/JULI.v2.1.0001
v         $xiirc/JULI.v2.1.0002
v         $xiirc/JULI.v2.1.0003
v         $xiirc/JULI.v2.1.0004
v         $xiirc/JULI.v2.1.0005
v         $xiirc/JULI.v2.1.0006
v         $xiirc/JULI.v2.1.0007
v         $xiirc/JULI.v2.1.0008
v         $xiirc/JULI.v2.1.0009
v         $xiirc/JULI.v2.1.0010
v         $xiirc/JULI.v2.1.0011
v         $xiirc/JULI.v2.1.0012
v         $xiirc/JULI.v2.1.0013
v         $xiirc/JULI.v2.1.0014
v         $xiirc/JULI.v2.1.0015
v         $xiirc/JULI.v2.1.0016

v         $xiirc/JULI.v2.2.0001
v         $xiirc/JULI.v2.2.0002
v         $xiirc/JULI.v2.2.0003
v         $xiirc/JULI.v2.2.0004
v         $xiirc/JULI.v2.2.0005
v         $xiirc/JULI.v2.2.0006
v         $xiirc/JULI.v2.2.0007
v         $xiirc/JULI.v2.2.0008
v         $xiirc/JULI.v2.2.0009
v         $xiirc/JULI.v2.2.0010
v         $xiirc/JULI.v2.2.0011
v         $xiirc/JULI.v2.2.0012
v         $xiirc/JULI.v2.2.0013
v         $xiirc/JULI.v2.2.0014
v         $xiirc/JULI.v2.2.0015
v         $xiirc/JULI.v2.2.0016

v         $xiirc/JULI.v2.1
v         $xiirc/JULI.v2.2    p=$xiP/enfer.03
v         $xiirc/JULI.v2.2    p=$xiP/trou_noir.13
v         $xiirc/JULI.v2.3
v         $xiirc/JULI.v2.4    p=$xiP/enfer.03
v         $xiirc/JULI.v2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "belleville"-) par :                                             #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_v2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULI.v1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/JULI.v2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/JULI.v3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      r=-0.5815147625160462                            #
                                        #    $c                                      i=+0.6358885017421603                            #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.10 ybg=-1.10 xhd=+1.10 yhd=+1.10          #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/JULI.v2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/JULI.v2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULI.v2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULI.v2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULI.v2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULI.v2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULI.v2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULI.v2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULI.v2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULI.v2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULI.v2.1                                 \  #
                                        #    $Z                                 R=$xiirc/JULI.v2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULI.v2.3                                 \  #
                                        #    $Z                                 R=$xiirc/JULI.v2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.v2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.v2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_v2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/JULI.s1.1' et        #
                                        # de 'v $xiirc/JULI.s2.2' (donc SANS transformation de {Theta,Phi}).                          #
v         $xiac/JULI.x2.1$R16
v         $xiac/JULI.x2.2$R16

v         $xiirc/JULI.x2.1.0001
v         $xiirc/JULI.x2.1.0002
v         $xiirc/JULI.x2.1.0003
v         $xiirc/JULI.x2.1.0004
v         $xiirc/JULI.x2.1.0005
v         $xiirc/JULI.x2.1.0006
v         $xiirc/JULI.x2.1.0007
v         $xiirc/JULI.x2.1.0008
v         $xiirc/JULI.x2.1.0009
v         $xiirc/JULI.x2.1.0010
v         $xiirc/JULI.x2.1.0011
v         $xiirc/JULI.x2.1.0012
v         $xiirc/JULI.x2.1.0013
v         $xiirc/JULI.x2.1.0014
v         $xiirc/JULI.x2.1.0015
v         $xiirc/JULI.x2.1.0016

v         $xiirc/JULI.x2.1
v         $xiirc/JULI.x2.2    p=$xiP/enfer.03
v         $xiirc/JULI.x2.2    p=$xiP/trou_noir.13
v         $xiirc/JULI.x2.3
v         $xiirc/JULI.x2.4    p=$xiP/enfer.03
v         $xiirc/JULI.x2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_x2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULI.x1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/JULI.x2                                       #
                                        #    $Z             set       _____ImageT3=$xTV/JULI.x3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.x2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=6                                     #
                                        #    $c                                      r=-0.5815147625160462                            #
                                        #    $c                                      i=+0.6358885017421603                            #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.40 ybg=-1.40 xhd=+1.40 yhd=+1.40          #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2  pPhi=2                                 #
                                        #    $c                                      tTheta=$pi tPhi=$pi                              #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/JULI.x2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/JULI.x2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULI.x2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULI.x2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULI.x2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULI.x2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULI.x2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULI.x2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULI.x2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULI.x2.1                                 \  #
                                        #    $Z                                 R=$xiirc/JULI.x2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULI.x2.3                                 \  #
                                        #    $Z                                 R=$xiirc/JULI.x2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.x2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.x2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_x2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/JULI.w1.1' et        #
                                        # de 'v $xiirc/JULI.w2.2' (donc AVEC transformation de {Theta,Phi}).                          #
v         $xiac/JULI.z2.1$R16
v         $xiac/JULI.z2.2$R16

v         $xiirc/JULI.z2.1.0001
v         $xiirc/JULI.z2.1.0002
v         $xiirc/JULI.z2.1.0003
v         $xiirc/JULI.z2.1.0004
v         $xiirc/JULI.z2.1.0005
v         $xiirc/JULI.z2.1.0006
v         $xiirc/JULI.z2.1.0007
v         $xiirc/JULI.z2.1.0008
v         $xiirc/JULI.z2.1.0009
v         $xiirc/JULI.z2.1.0010
v         $xiirc/JULI.z2.1.0011
v         $xiirc/JULI.z2.1.0012
v         $xiirc/JULI.z2.1.0013
v         $xiirc/JULI.z2.1.0014
v         $xiirc/JULI.z2.1.0015
v         $xiirc/JULI.z2.1.0016

v         $xiirc/JULI.z2.1
v         $xiirc/JULI.z2.2    p=$xiP/enfer.03
v         $xiirc/JULI.z2.2    p=$xiP/trou_noir.13
v         $xiirc/JULI.z2.3
v         $xiirc/JULI.z2.4    p=$xiP/enfer.03
v         $xiirc/JULI.z2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULI_z2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULI.z1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/JULI.z2                                       #
                                        #    $Z             set       _____ImageT3=$xTV/JULI.z3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.z2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      r=-0.5815147625160462                            #
                                        #    $c                                      i=+0.6358885017421603                            #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.40 ybg=-1.40 xhd=+1.40 yhd=+1.40          #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2  pPhi=2                                 #
                                        #    $c                                      tTheta=$pi tPhi=$pi                              #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/JULI.z2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/JULI.z2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULI.z2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULI.z2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULI.z2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULI.z2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULI.z2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULI.z2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULI.z2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULI.z2.1                                 \  #
                                        #    $Z                                 R=$xiirc/JULI.z2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULI.z2.3                                 \  #
                                        #    $Z                                 R=$xiirc/JULI.z2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.z2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/JULI.z2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULI_z2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/JULI.y1.1' et        #
                                        # de 'v $xiirc/JULI.y2.2' (donc AVEC transformation de {Theta,Phi}) et plus d'iterations (10) #
                                        # que 'v $xiac/JULI.x2.1$R16' (6).                                                            #
v         $xiac/JULJ.22.1$R16
v         $xiac/JULJ.22.2$R16

v         $xiirc/JULJ.22.1.0001
v         $xiirc/JULJ.22.1.0002
v         $xiirc/JULJ.22.1.0003
v         $xiirc/JULJ.22.1.0004
v         $xiirc/JULJ.22.1.0005
v         $xiirc/JULJ.22.1.0006
v         $xiirc/JULJ.22.1.0007
v         $xiirc/JULJ.22.1.0008
v         $xiirc/JULJ.22.1.0009
v         $xiirc/JULJ.22.1.0010
v         $xiirc/JULJ.22.1.0011
v         $xiirc/JULJ.22.1.0012
v         $xiirc/JULJ.22.1.0013
v         $xiirc/JULJ.22.1.0014
v         $xiirc/JULJ.22.1.0015
v         $xiirc/JULJ.22.1.0016

v         $xiirc/JULJ.22.1
v         $xiirc/JULJ.22.2    p=$xiP/enfer.03
v         $xiirc/JULJ.22.2    p=$xiP/trou_noir.13
v         $xiirc/JULJ.22.3
v         $xiirc/JULJ.22.4    p=$xiP/enfer.03
v         $xiirc/JULJ.22.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "villiers"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULJ_22:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULJ.21                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/JULJ.22                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/JULJ.23                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.22                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=-1.15 vA=+1.15                                  \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      r=-0.5815147625160462                            #
                                        #    $c                                      i=+0.6358885017421603                            #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.25 ybg=-1.25 xhd=+1.25 yhd=+1.25          #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      eRho=3                                           #
                                        #    $c                                      pTheta=3      pPhi=3                             #
                                        #    $c                                      tTheta=0      tPhi=0                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/JULJ.22%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/JULJ.22%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULJ.22.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULJ.22.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULJ.22.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULJ.22.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULJ.22.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULJ.22.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULJ.22.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULJ.22.1                                 \  #
                                        #    $Z                                 R=$xiirc/JULJ.22.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULJ.22.3                                 \  #
                                        #    $Z                                 R=$xiirc/JULJ.22.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/JULJ.22.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/JULJ.22.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULJ_22:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/JULJ.11.1' et        #
                                        # de 'v $xiirc/JULJ.11.2' Ravec un polynome de degre 1 et {(3.THETA)+(0),(3.PHI)+(0)}, ce     #
                                        # devrait etre semblable a {(1.THETA)+(0),(1.PHI)+(0)} avec un polynome de degre 3...         #
v         $xiac/JULJ.32.1$R16
v         $xiac/JULJ.32.2$R16

v         $xiirc/JULJ.32.1.0001
v         $xiirc/JULJ.32.1.0002
v         $xiirc/JULJ.32.1.0003
v         $xiirc/JULJ.32.1.0004
v         $xiirc/JULJ.32.1.0005
v         $xiirc/JULJ.32.1.0006
v         $xiirc/JULJ.32.1.0007
v         $xiirc/JULJ.32.1.0008
v         $xiirc/JULJ.32.1.0009
v         $xiirc/JULJ.32.1.0010
v         $xiirc/JULJ.32.1.0011
v         $xiirc/JULJ.32.1.0012
v         $xiirc/JULJ.32.1.0013
v         $xiirc/JULJ.32.1.0014
v         $xiirc/JULJ.32.1.0015
v         $xiirc/JULJ.32.1.0016

v         $xiirc/JULJ.32.2.0001
v         $xiirc/JULJ.32.2.0002
v         $xiirc/JULJ.32.2.0003
v         $xiirc/JULJ.32.2.0004
v         $xiirc/JULJ.32.2.0005
v         $xiirc/JULJ.32.2.0006
v         $xiirc/JULJ.32.2.0007
v         $xiirc/JULJ.32.2.0008
v         $xiirc/JULJ.32.2.0009
v         $xiirc/JULJ.32.2.0010
v         $xiirc/JULJ.32.2.0011
v         $xiirc/JULJ.32.2.0012
v         $xiirc/JULJ.32.2.0013
v         $xiirc/JULJ.32.2.0014
v         $xiirc/JULJ.32.2.0015
v         $xiirc/JULJ.32.2.0016

v         $xiirc/JULJ.32.1
v         $xiirc/JULJ.32.2    p=$xiP/enfer.03
v         $xiirc/JULJ.32.2    p=$xiP/trou_noir.13
v         $xiirc/JULJ.32.3
v         $xiirc/JULJ.32.4    p=$xiP/enfer.03
v         $xiirc/JULJ.32.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULJ_32:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULJ.31                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/JULJ.32                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/JULJ.33                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    cos();                                                          #
                                        #    $c   extern    double    sin();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   RHO0      0.4                                                             #
                                        #    $c   #define   RHON      0.7                                                             #
                                        #    $c                                                                                       #
                                        #    $c   #define   THETA0    1                                                               #
                                        #    $c   #define   THETAN    ((2*6.283185307179586)+THETA0)                                  #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    rho=((RHON*(n-N0))+(RHO0*(N-n)))/(N-N0);              #
                                        #    $c                       double    theta=((THETAN*(n-N0))+(THETA0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      r=%f                                             #
                                        #    $c                                      i=%f                                             #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.10 ybg=-1.10 xhd=+1.10 yhd=+1.10          #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=0                                    #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,rho*cos(theta)                                           #
                                        #    $c                             ,rho*sin(theta)                                           #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=0 pY=0 pZ=1                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=1 pY=0 pZ=0'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/JULJ.32%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/JULJ.32%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULJ.32.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULJ.32.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULJ.32.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULJ.32.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULJ.32.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/JULJ.32.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/JULJ.32.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/JULJ.32.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULJ.32.1                                 \  #
                                        #    $Z                                 R=$xiirc/JULJ.32.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/JULJ.32.3                                 \  #
                                        #    $Z                                 R=$xiirc/JULJ.32.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/JULJ.32.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/JULJ.32.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULJ_32:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une modification du nombre argument 'A' ({r,i,j,k}) en lui faisant  #
                                        # decrire une spirale d'Archimede dans le plan complexe (j=k=0).                              #
v         $xiac/JULJ.42.1$R16
v         $xiac/JULJ.42.2$R16

v         $xiirc/JULJ.42.1.0001
v         $xiirc/JULJ.42.1.0002
v         $xiirc/JULJ.42.1.0003
v         $xiirc/JULJ.42.1.0004
v         $xiirc/JULJ.42.1.0005
v         $xiirc/JULJ.42.1.0006
v         $xiirc/JULJ.42.1.0007
v         $xiirc/JULJ.42.1.0008
v         $xiirc/JULJ.42.1.0009
v         $xiirc/JULJ.42.1.0010
v         $xiirc/JULJ.42.1.0011
v         $xiirc/JULJ.42.1.0012
v         $xiirc/JULJ.42.1.0013
v         $xiirc/JULJ.42.1.0014
v         $xiirc/JULJ.42.1.0015
v         $xiirc/JULJ.42.1.0016

v         $xiirc/JULJ.42.2.0001
v         $xiirc/JULJ.42.2.0002
v         $xiirc/JULJ.42.2.0003
v         $xiirc/JULJ.42.2.0004
v         $xiirc/JULJ.42.2.0005
v         $xiirc/JULJ.42.2.0006
v         $xiirc/JULJ.42.2.0007
v         $xiirc/JULJ.42.2.0008
v         $xiirc/JULJ.42.2.0009
v         $xiirc/JULJ.42.2.0010
v         $xiirc/JULJ.42.2.0011
v         $xiirc/JULJ.42.2.0012
v         $xiirc/JULJ.42.2.0013
v         $xiirc/JULJ.42.2.0014
v         $xiirc/JULJ.42.2.0015
v         $xiirc/JULJ.42.2.0016
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULJ_42:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/JULJ.41                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/JULJ.42                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/JULJ.43                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ITER0     4                                                               #
                                        #    $c   #define   ITERP     2                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             int       iteration=ITER0;                                                #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("$xrc/julia.41$X                          #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=%d                                    #
                                        #    $c                                      r=-0.5815147625160462                            #
                                        #    $c                                      i=+0.6358885017421603                            #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.10 ybg=-1.10 xhd=+1.10 yhd=+1.10          #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=0                                    #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,iteration                                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=0 pY=0 pZ=1                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=1 pY=0 pZ=0'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/JULJ.42%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/JULJ.42%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       iteration = iteration+ITERP;                                    #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULJ.42.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/JULJ.42.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/JULJ.42.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/JULJ.42.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULJ_42:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose un "epluchage" de 'v $xiirc/JULI.s2.2'.                             #
v         $xiac/JULJ.61.1$R16
v         $xiac/JULJ.61.2$R16
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/JULJ.61.1' et        #
                                        # de 'v $xiirc/JULJ.62.2' (donc SANS transformation de {Theta,Phi}) avec les ombres portees.  #
v         $xiac/JULJ.F1$R16
v         $xiac/JULJ.F1$R64
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULJ_F1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=128                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT=$xTV/JULJ.F1                                        #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #    $c                                                                                       #
                                        #    $c             #define   COUCHE0   1                                                     #
                                        #    $c             #define   COUCHES   128                                                   #
                                        #    $c                                                                                       #
                                        #    $c             #define   X1D       -1.0                                                  #
                                        #    $c             #define   X1A       +0.5                                                  #
                                        #    $c             #define   X2D       +1.0                                                  #
                                        #    $c             #define   X2A       +0.5                                                  #
                                        #    $c                                                                                       #
                                        #    $c             #define   Y1D       -1.0                                                  #
                                        #    $c             #define   Y1A       +0.0                                                  #
                                        #    $c             #define   Y2D       +1.0                                                  #
                                        #    $c             #define   Y2A       +0.0                                                  #
                                        #    $c                                                                                       #
                                        #    $c             #define   Z1D       -1.0                                                  #
                                        #    $c             #define   Z1A       +0.0                                                  #
                                        #    $c             #define   Z2D       +1.0                                                  #
                                        #    $c             #define   Z2A       +0.0                                                  #
                                        #    $c                                                                                       #
                                        #    $c             #define   PRECISION 0.02                                                  #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                       double    x1D=X1D,x1C,x1A=X1A;                                  #
                                        #    $c                       double    x2D=X2D,x2C,x2A=X2A;                                  #
                                        #    $c                       double    y1D=Y1D,y1C,y1A=Y1A;                                  #
                                        #    $c                       double    y2D=Y2D,y2C,y2A=Y2A;                                  #
                                        #    $c                       double    z1D=Z1D,z1C,z1A=Z1A;                                  #
                                        #    $c                       double    z2D=Z2D,z2C,z2A=Z2A;                                  #
                                        #    $c                       double    precision=PRECISION;                                  #
                                        #    $c                                                                                       #
                                        #    $c                       x1C = x1D;                                                      #
                                        #    $c                       x2C = x2D;                                                      #
                                        #    $c                       y1C = y1D;                                                      #
                                        #    $c                       y2C = y2D;                                                      #
                                        #    $c                       z1C = z1D;                                                      #
                                        #    $c                       z2C = z2D;                                                      #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$DELETE   $xT/param11\n                       #
                                        #    $c                                         $xci/valeurs_inte$X            #
                                        #    $c                                                               p=1 d=%d                #
                                        #    $c                                                               vD=%f vA=%f             #
                                        #    $c                                                               cubique=FAUX            #
                                        #    $c                                                               > $xT/param11\n"        #
                                        #    $c                                       ,COUCHES                                        #
                                        #    $c                                       ,z1C,z2C                                        #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$xrc/julia.41$X                #
                                        #    $c                                                     images=%d                         #
                                        #    $c                                                     iterations=64                     #
                                        #    $c                                                     r=-0.708415000                    #
                                        #    $c                                                     i=+0.305773000                    #
                                        #    $c                                                     COMPOSANTE_J=$xT/param11          #
                                        #    $c                                                     K=0.0                             #
                                        #    $c                                                     xbgD=%f ybgD=%f                   #
                                        #    $c                                                     xhdD=%f yhdD=%f                   #
                                        #    $c                                                     xbgA=%f ybgA=%f                   #
                                        #    $c                                                     xhdA=%f yhdA=%f                   #
                                        #    $c                                                     R=$_____ImageT.                   #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,COUCHES                                        #
                                        #    $c                                       ,x1C,y1C,x2C,y2C                                #
                                        #    $c                                       ,x1C,y1C,x2C,y2C                                #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$xci/accumule.02$X             #
                                        #    $c                                                     A=$_____ImageT.                   #
                                        #    $c                                                     premiere=%d derniere=%d           #
                                        #    $c                                                     binariser=FAUX                    #
                                        #    $c                                                     translation_quelconque=FAUX       #
                                        #    $c                                                     stereo=0.0                        #
                                        #    $c                                                                         $formatI  |   #
                                        #    $c                                                     $xci/vraies_C$X    #
                                        #    $c                                                     p=$xiP/fractal.11                 #
                                        #    $c                                                     R=$_____ImageT.%04d               #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,COUCHE0,COUCHES                                #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                                                                       #
                                        #    $c                                 x1C = ((1-precision)*x1C) + (precision*x1A);          #
                                        #    $c                                 x2C = ((1-precision)*x2C) + (precision*x2A);          #
                                        #    $c                                 y1C = ((1-precision)*y1C) + (precision*y1A);          #
                                        #    $c                                 y2C = ((1-precision)*y2C) + (precision*y2A);          #
                                        #    $c                                 z1C = ((1-precision)*z1C) + (precision*z1A);          #
                                        #    $c                                 z2C = ((1-precision)*z2C) + (precision*z2A);          #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT                                        #
                                        #    $Z             set       _____animation=$xiac/JULJ.F1                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_JULJ_F1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation correspond a 'v xivPdf 7 1 / 010128_010255' et qui n'avait pas ete          #
                                        # memorisee sous cette forme en son temps. Or cette animation fut necessaire afin d'etre      #
                                        # utilisee dans 'v $xiMd/ArtEtMathematiques.01$m4 JULJ.F1'...                                 #
v         $xiac/JULJ.J1.1$R16
v         $xiac/JULJ.J1.2$R16
v         $xiac/JULJ.J1.21$R16
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/JULJ.J1.1',          #
                                        # de 'v $xiirc/JULJ.J2.2' et de 'v $xiirc/JULJ.J2.21'.                                        #
v         $xiirc/JULJ.S3.1.0001
v         $xiirc/JULJ.S3.1.0002
v         $xiirc/JULJ.S3.1.0003
v         $xiirc/JULJ.S3.1.0004
v         $xiirc/JULJ.S3.1.0005
v         $xiirc/JULJ.S3.1.0006
v         $xiirc/JULJ.S3.1.0007
v         $xiirc/JULJ.S3.1.0008
v         $xiirc/JULJ.S3.1.0009
v         $xiirc/JULJ.S3.1.0010
v         $xiirc/JULJ.S3.1.0011
v         $xiirc/JULJ.S3.1.0012
v         $xiirc/JULJ.S3.1.0013
v         $xiirc/JULJ.S3.1.0014
v         $xiirc/JULJ.S3.1.0015
v         $xiirc/JULJ.S3.1.0016
Pal ;     anim3     A=$xiirc/JULJ.S3.1. premiere=1 derniere=16

v         $xiirc/JULJ.S3.2.0001
v         $xiirc/JULJ.S3.2.0002
v         $xiirc/JULJ.S3.2.0003
v         $xiirc/JULJ.S3.2.0004
v         $xiirc/JULJ.S3.2.0005
v         $xiirc/JULJ.S3.2.0006
v         $xiirc/JULJ.S3.2.0007
v         $xiirc/JULJ.S3.2.0008
v         $xiirc/JULJ.S3.2.0009
v         $xiirc/JULJ.S3.2.0010
v         $xiirc/JULJ.S3.2.0011
v         $xiirc/JULJ.S3.2.0012
v         $xiirc/JULJ.S3.2.0013
v         $xiirc/JULJ.S3.2.0014
v         $xiirc/JULJ.S3.2.0015
v         $xiirc/JULJ.S3.2.0016
Pal ;     anim3     A=$xiirc/JULJ.S3.2. premiere=1 derniere=16

v         $xiirc/JULJ.S3.21.0001
v         $xiirc/JULJ.S3.21.0002
v         $xiirc/JULJ.S3.21.0003
v         $xiirc/JULJ.S3.21.0004
v         $xiirc/JULJ.S3.21.0005
v         $xiirc/JULJ.S3.21.0006
v         $xiirc/JULJ.S3.21.0007
v         $xiirc/JULJ.S3.21.0008
v         $xiirc/JULJ.S3.21.0009
v         $xiirc/JULJ.S3.21.0010
v         $xiirc/JULJ.S3.21.0011
v         $xiirc/JULJ.S3.21.0012
v         $xiirc/JULJ.S3.21.0013
v         $xiirc/JULJ.S3.21.0014
v         $xiirc/JULJ.S3.21.0015
v         $xiirc/JULJ.S3.21.0016
Pal ;     anim3     A=$xiirc/JULJ.S3.21. premiere=1 derniere=16

v         $xiac/JULJ.S3.1$R16
v         $xiac/JULJ.S3.2$R16
v         $xiac/JULJ.S3.21$MPEG
v         $xiac/JULJ.S3.21$R16
                                        # Generee (sur '$CMAP28' -ex "picpus"-, puis sur '$LACT1B') par :                             #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULJ_S3:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULJ.S3                                     #
                                        #    $Z             set       _____animation=$xiac/JULJ.S3                                    #
                                        #                                                                                             #
                                        #    $Z             SET       SPremiere=1                                                     #
                                        #    $Z             SET       HDerniere=4                                                     #
                                        #    $Z             SET       VDerniere=4                                                     #
                                        #    $Z             SET       SDerniere=`calculINS ($HDerniere*$VDerniere)+$SPremiere-1`      #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=256                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/JULJ.S3                                #
                                        #                                                                                             #
                                        #    $Z             SET       _____OJ=-1.200                                                  #
                                        #    $Z             SET       _____EJ=+1.200                                                  #
                                        #    $Z             SET       _____Puissance=4                                                #
                                        #                                                                                             #
                                        #    $Z             set       PRotationX="$K_VIDE"                                            #
                                        #    $Z             set       PRotationX="$PRotationX"" p=$SPremiere d=$SDerniere"            #
                                        #    $Z             set       PRotationX="$PRotationX"" vD=0 vA=$pis2"                        #
                                        #    $Z             set       PRotationX="$PRotationX"" lineaire=VRAI"                        #
                                        #    $Z             set       LRotationX=`$xci/valeurs_inte$X $PRotationX`                    #
                                        #    $Z             set       SNumero=$SPremiere                                              #
                                        #                                                                                             #
                                        #    $Z             foreach   Angle ($LRotationX)                                             #
                                        #    $Z                       setenv    _____ParaJulia      "ROTATION_OX=$Angle"              #
                                        #    $m4                      _____include(_____xiirc/.JULJ.N2.1._____U)       #
                                        #                                                                                             #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.1._____U)       #
                                        #    $m4                      _____include(_____xiirf/.MENG.22.2._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #    $Z                       set       _____imagesR=$xTV/JULJ.S3                             #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z                       $xci/permute_RVB.11$Z                                        \  #
                                        #    $Z                                           $_____imagesR.1                          \  #
                                        #    $Z                                           $_____imagesR.1                          \  #
                                        #    $Z                                           VBR                                         #
                                        #                                                                                             #
                                        #    $Z                       $xci/permute_RVB.11$Z                                        \  #
                                        #    $Z                                           $_____imagesR.2                          \  #
                                        #    $Z                                           $_____imagesR.2                          \  #
                                        #    $Z                                           VBR                                         #
                                        #                                                                                             #
                                        #    $Z                       $xci/permute_RVB.11$Z                                        \  #
                                        #    $Z                                           $_____imagesR.21                         \  #
                                        #    $Z                                           $_____imagesR.21                         \  #
                                        #    $Z                                           VBR                                         #
                                        #                                                                                             #
                                        #    $Z                       set       NuMeRo=`$xci/nombres$X p=$SNumero d=$SNumero`         #
                                        #                                                                                             #
                                        #    $Z                       execRVB   $xci/neutre$X                                      \  #
                                        #    $Z                                                     A=$_____imagesR.1%s            \  #
                                        #    $Z                                                     R=$_____ImagesR.1.$NuMeRo%s    \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       execRVB   $xci/neutre$X                                      \  #
                                        #    $Z                                                     A=$_____imagesR.2%s            \  #
                                        #    $Z                                                     R=$_____ImagesR.2.$NuMeRo%s    \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       execRVB   $xci/neutre$X                                      \  #
                                        #    $Z                                                     A=$_____imagesR.21%s           \  #
                                        #    $Z                                                     R=$_____ImagesR.21.$NuMeRo%s   \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         SNumero = $SNumero + 1                                #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/regroupe.02$Z                                                     \  #
                                        #    $Z                                 $_____ImagesR.1.                                   \  #
                                        #    $Z                                 $_____animation.1$R16%s                            \  #
                                        #    $Z                                 $SPremiere 1                                       \  #
                                        #    $Z                                 $HDerniere $VDerniere                              \  #
                                        #    $Z                                 "%s"                                               \  #
                                        #    $Z                                 '$K_QD$formatR_Pqu$K_QD'                           \  #
                                        #    $Z                                 4                                                  \  #
                                        #    $Z                                 FAUX                                                  #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/regroupe.02$Z                                                     \  #
                                        #    $Z                                 $_____ImagesR.2.                                   \  #
                                        #    $Z                                 $_____animation.2$R16%s                            \  #
                                        #    $Z                                 $SPremiere 1                                       \  #
                                        #    $Z                                 $HDerniere $VDerniere                              \  #
                                        #    $Z                                 "%s"                                               \  #
                                        #    $Z                                 '$K_QD$formatR_Pqu$K_QD'                           \  #
                                        #    $Z                                 4                                                  \  #
                                        #    $Z                                 FAUX                                                  #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/regroupe.02$Z                                                     \  #
                                        #    $Z                                 $_____ImagesR.21.                                  \  #
                                        #    $Z                                 $_____animation.21$R16%s                           \  #
                                        #    $Z                                 $SPremiere 1                                       \  #
                                        #    $Z                                 $HDerniere $VDerniere                              \  #
                                        #    $Z                                 "%s"                                               \  #
                                        #    $Z                                 '$K_QD$formatR_Pqu$K_QD'                           \  #
                                        #    $Z                                 4                                                  \  #
                                        #    $Z                                 FAUX                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=$SPremiere                                             #
                                        #    $Z             SET       Derniere=$SDerniere                                             #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____ImagesR.21.                                   #
                                        #    $Z             set       _____Animation=$_____animation.21                               #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULJ_S3:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation est une rotation de pi/2 par rapport a l'axe 'OX' autour de                 #
                                        # 'v $xiirc/JULJ.Q3.2'...                                                                     #
v         $xiac/JULK.51$R16$DROITE      p=$xiP/fractal.11
v         $xiac/JULK.51$R64$DROITE      p=$xiP/fractal.11

v         $xiirc/JULK.51.0089$DROITE    p=$xiP/fractal.11
v         $xiirc/JULK.51.0091$DROITE    p=$xiP/fractal.11
v         $xiirc/JULK.51.0100$DROITE    p=$xiP/fractal.11
                                        # Generee (sur '$CMAP28' -ex "porte-de-la-chapelle"-) par :                                   #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_51:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set                 NCoUcHeS=128                                          #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FPaRaMeTrEs                                           #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=1 d=$NCoUcHeS vD=-1.0 vA=1.0 cubique=FAUX        \  #
                                        #    $Z                                                               >> $FPaRaMeTrEs         #
                                        #                                                                                             #
                                        #    $Z             $xrc/julia.42$X                                                        \  #
                                        #    $Z                                 couches=$NCoUcHeS                                  \  #
                                        #    $Z                                 iterations=32                                      \  #
                                        #    $Z                                 transparence=FAUX binariser=VRAI seuil=$GRIS_6     \  #
                                        #    $Z                                 J_COMPOSANTE_J=$FPaRaMeTrEs                        \  #
                                        #    $Z                                 JK=0.0                                             \  #
                                        #    $Z                                 translation_quelconque=FAUX stereo=0.0             \  #
                                        #    $Z                                 translation_quelconque=FAUX stereo=0.0             \  #
                                        #    $Z                                 editer=VRAI                                        \  #
                                        #    $Z                                 R=$xTV/JULK.51.                                    \  #
                                        #    $Z                                 M=$xTV/COUCHES.                                    \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FPaRaMeTrEs                                           #
                                        #                                                                                             #
                                        #    $Z   set  PrEm=`ls $xTV/JULK.51.* | $HEA -1 | $SE -e 's/^.*\(....\)$/\1/' -e 's/^0*//'`  #
                                        #    $Z   set  DeRn=`ls $xTV/JULK.51.* | $TAI -1 | $SE -e 's/^.*\(....\)$/\1/' -e 's/^0*//'`  #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_16$X A=$xTV/JULK.51.                                    \  #
                                        #    $Z                                 premiere=$PrEm derniere=$DeRn                      \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/JULK.51$R16$DROITE                         \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_64$X A=$xTV/JULK.51.                                    \  #
                                        #    $Z                                 premiere=$PrEm derniere=$DeRn                      \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/JULK.51$R64$DROITE                         \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/neutre$X       A=$xTV/JULK.51.0089                                \  #
                                        #    $Z                                 R=$xiirc/JULK.51.0089$DROITE                       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/neutre$X       A=$xTV/JULK.51.0091                                \  #
                                        #    $Z                                 R=$xiirc/JULK.51.0091$DROITE                       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/neutre$X       A=$xTV/JULK.51.0100                                \  #
                                        #    $Z                                 R=$xiirc/JULK.51.0100$DROITE                       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_51:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation est identique a 'v $xiac/JU.N1$R16$DROITE'...                               #
                                        #                                                                                             #
                                        # Defintion des quaternions utilises pour parametrer chaque ensemble de Julia :               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #         image 0001 : quaternion=(-1.25869565217391322,   -0.136956521739130421, +0,+0)      #
                                        #         image 0002 : quaternion=(-1.23260869565217379,   -0.176086956521739113, +0,+0)      #
                                        #         image 0003 : quaternion=(-1.20217391304347831,   -0.210869565217391308, +0,+0)      #
                                        #         image 0004 : quaternion=(-1.1978260869565216,    -0.271739130434782594, +0,+0)      #
                                        #         image 0005 : quaternion=(-1.16739130434782612,   -0.306521739130434789, +0,+0)      #
                                        #         image 0006 : quaternion=(-1.12391304347826093,   -0.284782608695652195, +0,+0)      #
                                        #         image 0007 : quaternion=(-1.05869565217391304,   -0.284782608695652195, +0,+0)      #
                                        #         image 0008 : quaternion=(-1.01956521739130435,   -0.310869565217391397, +0,+0)      #
                                        #         image 0009 : quaternion=(-0.976086956521739157,  -0.289130434782608692, +0,+0)      #
                                        #         image 0010 : quaternion=(-0.923913043478260754,  -0.276086956521739202, +0,+0)      #
                                        #         image 0011 : quaternion=(-0.880434782608695565,  -0.254347826086956497, +0,+0)      #
                                        #         image 0012 : quaternion=(-0.823913043478260887,  -0.245652173913043503, +0,+0)      #
                                        #         image 0013 : quaternion=(-0.758695652173912993,  -0.245652173913043503, +0,+0)      #
                                        #         image 0014 : quaternion=(-0.72391304347826102,   -0.276086956521739202, +0,+0)      #
                                        #         image 0015 : quaternion=(-0.71086956521739153,   -0.328260869565217384, +0,+0)      #
                                        #         image 0016 : quaternion=(-0.68043478260869561,   -0.363043478260869579, +0,+0)      #
                                        #         image 0017 : quaternion=(-0.671739130434782616,  -0.419565217391304368, +0,+0)      #
                                        #         image 0018 : quaternion=(-0.645652173913043415,  -0.458695652173912949, +0,+0)      #
                                        #         image 0019 : quaternion=(-0.597826086956521952,  -0.476086956521739157, +0,+0)      #
                                        #         image 0020 : quaternion=(-0.571739130434782528,  -0.515217391304347849, +0,+0)      #
                                        #         image 0021 : quaternion=(-0.567391304347826031,  -0.576086956521739135, +0,+0)      #
                                        #         image 0022 : quaternion=(-0.580434782608695521,  -0.628260869565217428, +0,+0)      #
                                        #         image 0023 : quaternion=(-0.541304347826087051,  -0.654347826086956519, +0,+0)      #
                                        #         image 0024 : quaternion=(-0.506521739130434856,  -0.62391304347826082,  +0,+0)      #
                                        #         image 0025 : quaternion=(-0.449999999999999956,  -0.615217391304347827, +0,+0)      #
                                        #         image 0026 : quaternion=(-0.393478260869565499,  -0.62391304347826082,  +0,+0)      #
                                        #         image 0027 : quaternion=(-0.363043478260869357,  -0.658695652173913015, +0,+0)      #
                                        #         image 0028 : quaternion=(-0.302173913043478404,  -0.654347826086956519, +0,+0)      #
                                        #         image 0029 : quaternion=(-0.258695652173912993,  -0.676086956521739113, +0,+0)      #
                                        #         image 0030 : quaternion=(-0.254347826086956275,  -0.736956521739130399, +0,+0)      #
                                        #         image 0031 : quaternion=(-0.241304347826087007,  -0.789130434782608692, +0,+0)      #
                                        #         image 0032 : quaternion=(-0.228260869565217295,  -0.841304347826086985, +0,+0)      #
                                        #         image 0033 : quaternion=(-0.171739130434782616,  -0.849999999999999978, +0,+0)      #
                                        #         image 0034 : quaternion=(-0.141304347826086918,  -0.884782608695652173, +0,+0)      #
                                        #         image 0035 : quaternion=(-0.115217391304347938,  -0.923913043478260865, +0,+0)      #
                                        #         image 0036 : quaternion=(-0.0934782608695652328, -0.949999999999999956, +0,+0)      #
                                        #         image 0037 : quaternion=(-0.0847826086956522396, -0.893478260869565277, +0,+0)      #
                                        #         image 0038 : quaternion=(-0.067391304347826253,  -0.845652173913043481, +0,+0)      #
                                        #         image 0039 : quaternion=(-0.0152173913043478493, -0.83260869565217388,  +0,+0)      #
                                        #         image 0040 : quaternion=(-0.00652173913043485598,-0.784782608695652195, +0,+0)      #
                                        #         image 0041 : quaternion=(-0.00652173913043485598,-0.719565217391304301, +0,+0)      #
                                        #         image 0042 : quaternion=(+0.00652173913043485598,-0.66739130434782612,  +0,+0)      #
                                        #         image 0043 : quaternion=(+0.0500000000000002665, -0.645652173913043526, +0,+0)      #
                                        #         image 0044 : quaternion=(+0.115217391304347938,  -0.645652173913043526, +0,+0)      #
                                        #         image 0045 : quaternion=(+0.149999999999999911,  -0.615217391304347827, +0,+0)      #
                                        #         image 0046 : quaternion=(+0.176086956521739335,  -0.576086956521739135, +0,+0)      #
                                        #         image 0047 : quaternion=(+0.241304347826087007,  -0.576086956521739135, +0,+0)      #
                                        #         image 0048 : quaternion=(+0.29347826086956541,   -0.589130434782608736, +0,+0)      #
                                        #         image 0049 : quaternion=(+0.354347826086956363,  -0.593478260869565233, +0,+0)      #
                                        #         image 0050 : quaternion=(+0.341304347826086651,  -0.54130434782608694,  +0,+0)      #
                                        #         image 0051 : quaternion=(+0.31956521739130439,   -0.497826086956521863, +0,+0)      #
                                        #         image 0052 : quaternion=(+0.31956521739130439,   -0.432608695652173969, +0,+0)      #
                                        #         image 0053 : quaternion=(+0.341304347826086651,  -0.38913043478260867,  +0,+0)      #
                                        #         image 0054 : quaternion=(+0.380434782608695787,  -0.363043478260869579, +0,+0)      #
                                        #         image 0055 : quaternion=(+0.423913043478260754,  -0.350000000000000089, +0,+0)      #
                                        #         image 0056 : quaternion=(+0.384782608695652062,  -0.323913043478260887, +0,+0)      #
                                        #         image 0057 : quaternion=(+0.380434782608695787,  -0.26304347826086949,  +0,+0)      #
                                        #         image 0058 : quaternion=(+0.384782608695652062,  -0.210869565217391308, +0,+0)      #
                                        #         image 0059 : quaternion=(+0.376086956521739069,  -0.15434782608695663,  +0,+0)      #
                                        #         image 0060 : quaternion=(+0.349999999999999645,  -0.115217391304347716, +0,+0)      #
                                        #         image 0061 : quaternion=(+0.31956521739130439,   -0.0804347826086957429,+0,+0)      #
                                        #         image 0062 : quaternion=(+0.29347826086956541,   -0.0413043478260870511,+0,+0)      #
                                        #         image 0063 : quaternion=(+0.289130434782608692,  +0.0195652173913043459,+0,+0)      #
                                        #         image 0064 : quaternion=(+0.310869565217391397,  +0.0630434782608695343,+0,+0)      #
                                        #         image 0065 : quaternion=(+0.336956521739130377,  +0.102173913043478226, +0,+0)      #
                                        #         image 0066 : quaternion=(+0.363043478260869801,  +0.141304347826086918, +0,+0)      #
                                        #         image 0067 : quaternion=(+0.380434782608695787,  +0.189130434782608603, +0,+0)      #
                                        #         image 0068 : quaternion=(+0.380434782608695787,  +0.236956521739130288, +0,+0)      #
                                        #         image 0069 : quaternion=(+0.380434782608695787,  +0.302173913043478404, +0,+0)      #
                                        #         image 0070 : quaternion=(+0.406521739130434767,  +0.341304347826086873, +0,+0)      #
                                        #         image 0071 : quaternion=(+0.402173913043478493,  +0.35869565217391286,  +0,+0)      #
                                        #         image 0072 : quaternion=(+0.354347826086956363,  +0.376086956521739291, +0,+0)      #
                                        #         image 0073 : quaternion=(+0.332608695652173658,  +0.419565217391304479, +0,+0)      #
                                        #         image 0074 : quaternion=(+0.31956521739130439,   +0.471739130434782661, +0,+0)      #
                                        #         image 0075 : quaternion=(+0.332608695652173658,  +0.523913043478260843, +0,+0)      #
                                        #         image 0076 : quaternion=(+0.34565217391304337,   +0.576086956521739246, +0,+0)      #
                                        #         image 0077 : quaternion=(+0.31956521739130439,   +0.589130434782608736, +0,+0)      #
                                        #         image 0078 : quaternion=(+0.258695652173912993,  +0.58478260869565224,  +0,+0)      #
                                        #         image 0079 : quaternion=(+0.202173913043478315,  +0.576086956521739246, +0,+0)      #
                                        #         image 0080 : quaternion=(+0.15434782608695663,   +0.593478260869565233, +0,+0)      #
                                        #         image 0081 : quaternion=(+0.136956521739130199,  +0.641304347826086918, +0,+0)      #
                                        #         image 0082 : quaternion=(+0.0760869565217392463, +0.645652173913043637, +0,+0)      #
                                        #         image 0083 : quaternion=(+0.0239130434782608425, +0.658695652173913127, +0,+0)      #
                                        #         image 0084 : quaternion=(-0.00652173913043485598, +0.693478260869565322,+0,+0)      #
                                        #         image 0085 : quaternion=(-0.00652173913043485598, +0.758695652173912993,+0,+0)      #
                                        #         image 0086 : quaternion=(-0.00652173913043485598, +0.823913043478261109,+0,+0)      #
                                        #         image 0087 : quaternion=(-0.054347826086956541,  +0.832608695652173658, +0,+0)      #
                                        #         image 0088 : quaternion=(-0.0760869565217392463, +0.876086956521739069, +0,+0)      #
                                        #         image 0089 : quaternion=(-0.0934782608695652328, +0.923913043478260754, +0,+0)      #
                                        #         image 0090 : quaternion=(-0.115217391304347938,  +0.950000000000000178, +0,+0)      #
                                        #         image 0091 : quaternion=(-0.128260869565217206,  +0.897826086956521774, +0,+0)      #
                                        #         image 0092 : quaternion=(-0.163043478260869179,  +0.867391304347826075, +0,+0)      #
                                        #         image 0093 : quaternion=(-0.206521739130435034,  +0.84565217391304337,  +0,+0)      #
                                        #         image 0094 : quaternion=(-0.241304347826087007,  +0.815217391304347672, +0,+0)      #
                                        #         image 0095 : quaternion=(-0.245652173913043281,  +0.754347826086956719, +0,+0)      #
                                        #         image 0096 : quaternion=(-0.254347826086956275,  +0.697826086956521596, +0,+0)      #
                                        #         image 0097 : quaternion=(-0.280434782608695699,  +0.658695652173913127, +0,+0)      #
                                        #         image 0098 : quaternion=(-0.341304347826087096,  +0.654347826086956408, +0,+0)      #
                                        #         image 0099 : quaternion=(-0.380434782608695787,  +0.636956521739130421, +0,+0)      #
                                        #         image 0100 : quaternion=(-0.423913043478260754,  +0.615217391304347938, +0,+0)      #
                                        #         image 0101 : quaternion=(-0.489130434782608869,  +0.615217391304347938, +0,+0)      #
                                        #         image 0102 : quaternion=(-0.528260869565217339,  +0.641304347826086918, +0,+0)      #
                                        #         image 0103 : quaternion=(-0.571739130434782528,  +0.645652173913043637, +0,+0)      #
                                        #         image 0104 : quaternion=(-0.567391304347826031,  +0.602173913043478226, +0,+0)      #
                                        #         image 0105 : quaternion=(-0.567391304347826031,  +0.536956521739130332, +0,+0)      #
                                        #         image 0106 : quaternion=(-0.584782608695652018,  +0.489130434782608647, +0,+0)      #
                                        #         image 0107 : quaternion=(-0.632608695652173925,  +0.471739130434782661, +0,+0)      #
                                        #         image 0108 : quaternion=(-0.671739130434782616,  +0.445652173913043459, +0,+0)      #
                                        #         image 0109 : quaternion=(-0.671739130434782616,  +0.380434782608695787, +0,+0)      #
                                        #         image 0110 : quaternion=(-0.702173913043478537,  +0.345652173913043592, +0,+0)      #
                                        #         image 0111 : quaternion=(-0.715217391304348027,  +0.293478260869565188, +0,+0)      #
                                        #         image 0112 : quaternion=(-0.741304347826087007,  +0.254347826086956275, +0,+0)      #
                                        #         image 0113 : quaternion=(-0.797826086956521685,  +0.245652173913043503, +0,+0)      #
                                        #         image 0114 : quaternion=(-0.863043478260869579,  +0.245652173913043503, +0,+0)      #
                                        #         image 0115 : quaternion=(-0.906521739130434767,  +0.267391304347825987, +0,+0)      #
                                        #         image 0116 : quaternion=(-0.949999999999999956,  +0.289130434782608692, +0,+0)      #
                                        #         image 0117 : quaternion=(-1.00652173913043486,   +0.297826086956521685, +0,+0)      #
                                        #         image 0118 : quaternion=(-1.04130434782608683,   +0.293478260869565188, +0,+0)      #
                                        #         image 0119 : quaternion=(-1.09782608695652173,   +0.284782608695652417, +0,+0)      #
                                        #         image 0120 : quaternion=(-1.15434782608695663,   +0.293478260869565188, +0,+0)      #
                                        #         image 0121 : quaternion=(-1.1978260869565216,    +0.297826086956521685, +0,+0)      #
                                        #         image 0122 : quaternion=(-1.1978260869565216,    +0.232608695652174013, +0,+0)      #
                                        #         image 0123 : quaternion=(-1.2195652173913043,    +0.189130434782608603, +0,+0)      #
                                        #         image 0124 : quaternion=(-1.25869565217391322,   +0.163043478260869401, +0,+0)      #
                                        #         image 0125 : quaternion=(-1.2760869565217392,    +0.115217391304347716, +0,+0)      #
                                        #         image 0126 : quaternion=(-1.31956521739130439,   +0.0934782608695652328,+0,+0)      #
                                        #         image 0127 : quaternion=(-1.38043478260869557,   +0.0891304347826085142,+0,+0)      #
                                        #         image 0128 : quaternion=(-1.39347826086956528,   +0.0369565217391305545,+0,+0)      #
                                        #         image 0129 : quaternion=(-1.43260869565217397,   +0.0108695652173911306,+0,+0)      #
                                        #         image 0130 : quaternion=(-1.45869565217391295,   -0.0108695652173911306,+0,+0)      #
                                        #         image 0131 : quaternion=(-1.40652173913043477,   -0.0239130434782608425,+0,+0)      #
                                        #         image 0132 : quaternion=(-1.38043478260869557,   -0.0630434782608695343,+0,+0)      #
                                        #         image 0133 : quaternion=(-1.34565217391304337,   -0.0934782608695652328,+0,+0)      #
                                        #         image 0134 : quaternion=(-1.28913043478260869,   -0.102173913043478226, +0,+0)      #
                                        #                                                                                             #
v         $xiac/JULK.61$R16$DROITE      p=$xiP/fractal.11
v         $xiac/JULK.61$R64$DROITE      p=$xiP/fractal.11

v         $xiirc/JULK.61.0079$DROITE    p=$xiP/fractal.11
v         $xiirc/JULK.61.0080$DROITE    p=$xiP/fractal.11
v         $xiirc/JULK.61.0081$DROITE    p=$xiP/fractal.11
                                        # Generee (sur '$CMAP28' -ex "porte-de-la-chapelle"-) par :                                   #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_61:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set                 NCoUcHeS=128                                          #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FPaRaMeTrEs                                           #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=1 d=$NCoUcHeS vD=-1.0 vA=1.0 cubique=FAUX        \  #
                                        #    $Z                                                               >> $FPaRaMeTrEs         #
                                        #                                                                                             #
                                        #    $Z             $xrc/julia.42$X                                                        \  #
                                        #    $Z                                 couches=$NCoUcHeS                                  \  #
                                        #    $Z                                 iterations=32                                      \  #
                                        #    $Z                                 transparence=FAUX binariser=VRAI seuil=$GRIS_6     \  #
                                        #    $Z                                 J_COMPOSANTE_J=$FPaRaMeTrEs                        \  #
                                        #    $Z                                 JK=0.0                                             \  #
                                        #    $Z                                 arithmetique_folklorique_C=VRAI                    \  #
                                        #    $Z                                 somme_Reelle_folklorique_a0100=1                   \  #
                                        #    $Z                                 produit_Reelle_folklorique_a1011=1                 \  #
                                        #    $Z                                 produit_Imaginaire_folklorique_a0101=1             \  #
                                        #    $Z                                 produit_Imaginaire_folklorique_a0111=1             \  #
                                        #    $Z                                 translation_quelconque=FAUX stereo=0.0             \  #
                                        #    $Z                                 translation_quelconque=FAUX stereo=0.0             \  #
                                        #    $Z                                 editer=VRAI                                        \  #
                                        #    $Z                                 R=$xTV/JULK.61.                                    \  #
                                        #    $Z                                 M=$xTV/COUCHES.                                    \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FPaRaMeTrEs                                           #
                                        #                                                                                             #
                                        #    $Z   set  PrEm=`ls $xTV/JULK.61.* | $HEA -1 | $SE -e 's/^.*\(....\)$/\1/' -e 's/^0*//'`  #
                                        #    $Z   set  DeRn=`ls $xTV/JULK.61.* | $TAI -1 | $SE -e 's/^.*\(....\)$/\1/' -e 's/^0*//'`  #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_16$X A=$xTV/JULK.61.                                    \  #
                                        #    $Z                                 premiere=$PrEm derniere=$DeRn                      \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/JULK.61$R16$DROITE                         \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_64$X A=$xTV/JULK.61.                                    \  #
                                        #    $Z                                 premiere=$PrEm derniere=$DeRn                      \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/JULK.61$R64$DROITE                         \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/neutre$X       A=$xTV/JULK.61.0079                                \  #
                                        #    $Z                                 R=$xiirc/JULK.61.0079$DROITE                       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/neutre$X       A=$xTV/JULK.61.0080                                \  #
                                        #    $Z                                 R=$xiirc/JULK.61.0080$DROITE                       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/neutre$X       A=$xTV/JULK.61.0081                                \  #
                                        #    $Z                                 R=$xiirc/JULK.61.0081$DROITE                       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_61:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation est identique a 'v $xiac/JULK.51$R16$DROITE', mais avec une arithmetique    #
                                        # "folklorique" (et arbitraire...) dans C...                                                  #
v         $xiac/JULK.E4.21$R16
v         $xiac/JULK.E4.21$MPEG
                                        # Generee (sur '$LACT1A', puis sur '$LACT1B') par :                                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_E4:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULK.E4.21                                  #
                                        #                                                                                             #
                                        #    $Z             set       A09="$Alphabet_0_9"                                             #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`ls $_____ImagesR.????$ROUGE | $HEA -1`                     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             set  Derniere=`ls $_____ImagesR.????$ROUGE | $TAI -1`                     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             unset     A09                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/`GetLeaf $_____ImagesR`                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_E4:                                                                      #
                                        #                                                                                             #
v         $xiac/JULK.F4.1$R16
v         $xiac/JULK.F4.1$MPEG
                                        # Generee (sur '$LACT1A', puis sur '$LACT1B') par :                                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_F4:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULK.F4.1                                   #
                                        #                                                                                             #
                                        #    $Z             set       A09="$Alphabet_0_9"                                             #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`ls $_____ImagesR.????$ROUGE | $HEA -1`                     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             set  Derniere=`ls $_____ImagesR.????$ROUGE | $TAI -1`                     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             unset     A09                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/`GetLeaf $_____ImagesR`                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_F4:                                                                      #
                                        #                                                                                             #
v         $xiac/JULK.G4.1$R16
v         $xiac/JULK.G4.1$MPEG
                                        # Generee (sur '$LACT1A', puis sur '$LACT1B') par :                                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_G4:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULK.G4.1                                   #
                                        #                                                                                             #
                                        #    $Z             set       A09="$Alphabet_0_9"                                             #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`ls $_____ImagesR.????$ROUGE | $HEA -1`                     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             set  Derniere=`ls $_____ImagesR.????$ROUGE | $TAI -1`                     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             unset     A09                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/`GetLeaf $_____ImagesR`                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_G4:                                                                      #
                                        #                                                                                             #
v         $xiac/JULK.G5.21$R16
v         $xiac/JULK.G5.21$MPEG
                                        # Generee (sur '$LACT1A', puis sur '$LACT1B') par :                                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_G5:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULK.G5.21                                  #
                                        #                                                                                             #
                                        #    $Z             set       A09="$Alphabet_0_9"                                             #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`ls $_____ImagesR.????$ROUGE | $HEA -1`                     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             set  Derniere=`ls $_____ImagesR.????$ROUGE | $TAI -1`                     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             unset     A09                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/`GetLeaf $_____ImagesR`                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_G5:                                                                      #
                                        #                                                                                             #
v         $xiac/JULK.G6.21$R16
v         $xiac/JULK.G6.21$MPEG
                                        # Generee (sur '$LACT1A', puis sur '$LACT1B') par :                                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_G6:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULK.G6.21                                  #
                                        #                                                                                             #
                                        #    $Z             set       A09="$Alphabet_0_9"                                             #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`ls $_____ImagesR.????$ROUGE | $HEA -1`                     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             set  Derniere=`ls $_____ImagesR.????$ROUGE | $TAI -1`                     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             unset     A09                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/`GetLeaf $_____ImagesR`                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_G6:                                                                      #
                                        #                                                                                             #
v         $xiac/JULK.H5.21$R16
v         $xiac/JULK.H5.21$MPEG
                                        # Generee (sur '$LACT1A', puis sur '$LACT1B') par :                                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_JULK_H5:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/JULK.H5.21                                  #
                                        #                                                                                             #
                                        #    $Z             set       A09="$Alphabet_0_9"                                             #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`ls $_____ImagesR.????$ROUGE | $HEA -1`                     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Premiere=`echo "$Premiere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             set  Derniere=`ls $_____ImagesR.????$ROUGE | $TAI -1`                     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s+$_____ImagesR++"`             #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/\""$ROUGE"'$//'`              #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^.*\.\([$A09]*\)"'$/\1/'`     #
                                        #    $Z             set  Derniere=`echo "$Derniere" | $SE -e "s/^0*//"`                       #
                                        #                                                                                             #
                                        #    $Z             unset     A09                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/`GetLeaf $_____ImagesR`                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____LRepetitions="$K_VIDE"                                     #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_JULK_H5:                                                                      #
                                        #                                                                                             #

v         $xiac/LYAP.71$R16
v         $xiac/LYAP.71.1$R16
v         $xiac/LYAP.71.2$R16
v         $xiac/LYAP.71.2.1$R16

v         $xiirc/LYAP.71.2.0001
v         $xiirc/LYAP.71.2.0002
v         $xiirc/LYAP.71.2.0003
v         $xiirc/LYAP.71.2.0004
v         $xiirc/LYAP.71.2.0005
v         $xiirc/LYAP.71.2.0006
v         $xiirc/LYAP.71.2.0007
v         $xiirc/LYAP.71.2.0008
v         $xiirc/LYAP.71.2.0009
v         $xiirc/LYAP.71.2.0010
v         $xiirc/LYAP.71.2.0011
v         $xiirc/LYAP.71.2.0012
v         $xiirc/LYAP.71.2.0013
v         $xiirc/LYAP.71.2.0014
v         $xiirc/LYAP.71.2.0015
v         $xiirc/LYAP.71.2.0016

Pal ;     anim3     A=$xiirc/LYAP.71.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_LYAP_71:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=0                                                     #
                                        #    $Z             SET       cDerniere=127                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.71                                       #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.12$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=100                                     \  #
                                        #    $Z                                 zD=2.6 zA=3.6                                      \  #
                                        #    $Z                                 suite="111111222222333333"                         \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=50                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.3._____U)                 #
                                        #    $Z             set       _____ImageTT=$_____ImageTo                                      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/LYAP.71.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/LYAP.71                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.71.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.71.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/LYAP.71.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_LYAP_71:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/LYAP.61.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image.                                                #
                                        #                                                                                             #
                                        # ATTENTION : l'ombrage par 'v $xiirc/.MANE.41.3.$U .xci.ombrage.11.X' n'est pas fait a       #
                                        # l'interieur de la boucle 'while(...)', mais une seule fois au prealable et a l'exterieur,   #
                                        # ce qui est en fait incorrect car, en effet pour que les ombres semblent fixes sur l'objet,  #
                                        # alors que ce dernier tourne, il faut que la source lumineuse tourne aussi...                #
v         $xiac/LYAP.72$R16
v         $xiac/LYAP.72.1$R16
v         $xiac/LYAP.72.2$R16
v         $xiac/LYAP.72.2.1$R16

v         $xiirc/LYAP.72.2.0001
v         $xiirc/LYAP.72.2.0002
v         $xiirc/LYAP.72.2.0003
v         $xiirc/LYAP.72.2.0004
v         $xiirc/LYAP.72.2.0005
v         $xiirc/LYAP.72.2.0006
v         $xiirc/LYAP.72.2.0007
v         $xiirc/LYAP.72.2.0008
v         $xiirc/LYAP.72.2.0009
v         $xiirc/LYAP.72.2.0010
v         $xiirc/LYAP.72.2.0011
v         $xiirc/LYAP.72.2.0012
v         $xiirc/LYAP.72.2.0013
v         $xiirc/LYAP.72.2.0014
v         $xiirc/LYAP.72.2.0015
v         $xiirc/LYAP.72.2.0016

Pal ;     anim3     A=$xiirc/LYAP.72.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_LYAP_72:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=0                                                     #
                                        #    $Z             SET       cDerniere=127                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.72                                       #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.12$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=100                                     \  #
                                        #    $Z                                 xbg=3.40 ybg=3.45 xhd=3.6 yhd=3.65                 \  #
                                        #    $Z                                 zD=2.6 zA=3.6                                      \  #
                                        #    $Z                                 suite="111111222222333333"                         \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=50                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.3._____U)                 #
                                        #    $Z             set       _____ImageTT=$_____ImageTo                                      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/LYAP.72.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/LYAP.72                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.72.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.72.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/LYAP.72.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_LYAP_72:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/LYAP.62.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image.                                                #
                                        #                                                                                             #
                                        # ATTENTION : l'ombrage par 'v $xiirc/.MANE.41.3.$U .xci.ombrage.11.X' n'est pas fait a       #
                                        # l'interieur de la boucle 'while(...)', mais une seule fois au prealable et a l'exterieur,   #
                                        # ce qui est en fait incorrect car, en effet pour que les ombres semblent fixes sur l'objet,  #
                                        # alors que ce dernier tourne, il faut que la source lumineuse tourne aussi...                #
v         $xiac/LYAP.91$R16
v         $xiac/LYAP.91.1$R16
v         $xiac/LYAP.91.2$R16
v         $xiac/LYAP.91.2.1$R16

v         $xiirc/LYAP.91.2.0001
v         $xiirc/LYAP.91.2.0002
v         $xiirc/LYAP.91.2.0003
v         $xiirc/LYAP.91.2.0004
v         $xiirc/LYAP.91.2.0005
v         $xiirc/LYAP.91.2.0006
v         $xiirc/LYAP.91.2.0007
v         $xiirc/LYAP.91.2.0008
v         $xiirc/LYAP.91.2.0009
v         $xiirc/LYAP.91.2.0010
v         $xiirc/LYAP.91.2.0011
v         $xiirc/LYAP.91.2.0012
v         $xiirc/LYAP.91.2.0013
v         $xiirc/LYAP.91.2.0014
v         $xiirc/LYAP.91.2.0015
v         $xiirc/LYAP.91.2.0016

Pal ;     anim3     A=$xiirc/LYAP.91.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "belleville"-) par :                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_LYAP_91:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=0                                                     #
                                        #    $Z             SET       cDerniere=511                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       NTaux=32                                                        #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_trig$X                                                    \  #
                                        #    $Z                                 p=1 d=$NTaux                                       \  #
                                        #    $Z                                 aD=0 aA=`calcul 8*$pi`                             \  #
                                        #    $Z                                 gamma=1                                            \  #
                                        #    $Z                                 entier=VRAI                                        \  #
                                        #    $Z                                 epsilon=0.2                                        \  #
                                        #    $Z                                                                         > $xTV/TAUX   #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.81                                       #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.22$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=$NTaux                                  \  #
                                        #    $Z                                 LISTE_TAUX=$xTV/TAUX                               \  #
                                        #    $Z                                 xbg=3.000 ybg=3.500                                \  #
                                        #    $Z                                 xhd=3.350 yhd=3.850                                \  #
                                        #    $Z                                 zD=4 zA=3                                          \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 editer_fenetre_courante=FAUX                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=50                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=+1.20                                                    #
                                        #    $Z             set       AnGlEN=-1.05                                                    #
                                        #    $Z             set       PLAnGlEs="$K_VIDE"                                              #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" p=$Premiere d=$Derniere"                  #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" vD=$AnGlE0 vA=$AnGlEN"                    #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" lineaire=VRAI"                            #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" format=f decimales=4"                     #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X $PLAnGlEs`                         #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____DxDyDz=1                                         #
                                        #    $Z                       set       _____SuperEchelle=FAUX                                #
                                        #    $Z                       set       _____DRotation=VRAI                                   #
                                        #    $Z                       set       _____DRotationX=0                                     #
                                        #    $Z                       set       _____DRotationY=$LAnGlEs[$ImAgE]                      #
                                        #    $Z                       set       _____LineaireD=VRAI                                   #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=0                                      #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/LYAP.91.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/LYAP.91                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.91.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.91.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/LYAP.91.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_LYAP_91:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/LYAP.81.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image.                                                #
                                        #                                                                                             #
                                        # En ce qui concerne le choix des angles de rotation dans [-1.05,+1.20], les commentaires     #
                                        # 'v $xiii/di_album$FON 20101209152519' le justifie...                         #
v         $xiac/LYAP.B1$R16
v         $xiac/LYAP.B1.1$R16
v         $xiac/LYAP.B1.2$R16
v         $xiac/LYAP.B1.2.1$R16

v         $xiirc/LYAP.B1.2.0001
v         $xiirc/LYAP.B1.2.0002
v         $xiirc/LYAP.B1.2.0003
v         $xiirc/LYAP.B1.2.0004
v         $xiirc/LYAP.B1.2.0005
v         $xiirc/LYAP.B1.2.0006
v         $xiirc/LYAP.B1.2.0007
v         $xiirc/LYAP.B1.2.0008
v         $xiirc/LYAP.B1.2.0009
v         $xiirc/LYAP.B1.2.0010
v         $xiirc/LYAP.B1.2.0011
v         $xiirc/LYAP.B1.2.0012
v         $xiirc/LYAP.B1.2.0013
v         $xiirc/LYAP.B1.2.0014
v         $xiirc/LYAP.B1.2.0015
v         $xiirc/LYAP.B1.2.0016

Pal ;     anim3     A=$xiirc/LYAP.B1.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #    :Debut_listG_LYAP_B1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=0                                                     #
                                        #    $Z             SET       cDerniere=511                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       NTaux=32                                                        #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_trig$X                                                    \  #
                                        #    $Z                                 p=1 d=$NTaux                                       \  #
                                        #    $Z                                 aD=0 aA=`calcul 8*$pi`                             \  #
                                        #    $Z                                 gamma=1                                            \  #
                                        #    $Z                                 entier=VRAI                                        \  #
                                        #    $Z                                 epsilon=0.2                                        \  #
                                        #    $Z                                                                         > $xTV/TAUX   #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.81                                       #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.22$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=$NTaux                                  \  #
                                        #    $Z                                 LISTE_TAUX=$xTV/TAUX                               \  #
                                        #    $Z                                 xbg=3.100 ybg=3.400                                \  #
                                        #    $Z                                 xhd=3.300 yhd=3.750                                \  #
                                        #    $Z                                 zD=4.0000 zA=3.750                                 \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 editer_fenetre_courante=FAUX                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=50                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=+1.20                                                    #
                                        #    $Z             set       AnGlEN=-1.05                                                    #
                                        #    $Z             set       PLAnGlEs="$K_VIDE"                                              #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" p=$Premiere d=$Derniere"                  #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" vD=$AnGlE0 vA=$AnGlEN"                    #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" lineaire=VRAI"                            #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" format=f decimales=4"                     #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X $PLAnGlEs`                         #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____DxDyDz=1                                         #
                                        #    $Z                       set       _____SuperEchelle=FAUX                                #
                                        #    $Z                       set       _____DRotation=VRAI                                   #
                                        #    $Z                       set       _____DRotationX=0                                     #
                                        #    $Z                       set       _____DRotationY=$LAnGlEs[$ImAgE]                      #
                                        #    $Z                       set       _____LineaireD=VRAI                                   #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=0                                      #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/LYAP.B1.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/LYAP.B1                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.B1.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.B1.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/LYAP.B1.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_LYAP_B1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/LYAP.A1.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image.                                                #
                                        #                                                                                             #
                                        # En ce qui concerne le choix des angles de rotation dans [-1.05,+1.20], les commentaires     #
                                        # 'v $xiii/di_album$FON 20101209152519' le justifie...                         #
v         $xiac/LYAP.E5$R16
v         $xiac/LYAP.E5.1$R16
v         $xiac/LYAP.E5.2$R16
v         $xiac/LYAP.E5.2.1$R16

v         $xiirc/LYAP.E5.2.0001
v         $xiirc/LYAP.E5.2.0002
v         $xiirc/LYAP.E5.2.0003
v         $xiirc/LYAP.E5.2.0004
v         $xiirc/LYAP.E5.2.0005
v         $xiirc/LYAP.E5.2.0006
v         $xiirc/LYAP.E5.2.0007
v         $xiirc/LYAP.E5.2.0008
v         $xiirc/LYAP.E5.2.0009
v         $xiirc/LYAP.E5.2.0010
v         $xiirc/LYAP.E5.2.0011
v         $xiirc/LYAP.E5.2.0012
v         $xiirc/LYAP.E5.2.0013
v         $xiirc/LYAP.E5.2.0014
v         $xiirc/LYAP.E5.2.0015
v         $xiirc/LYAP.E5.2.0016

Pal ;     anim3     A=$xiirc/LYAP.E5.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_LYAP_E5:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=0                                                     #
                                        #    $Z             SET       cDerniere=511                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       NTaux=32                                                        #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_trig$X                                                    \  #
                                        #    $Z                                 p=1 d=$NTaux                                       \  #
                                        #    $Z                                 aD=0 aA=`calcul 5*$pi`                             \  #
                                        #    $Z                                 gamma=1                                            \  #
                                        #    $Z                                 entier=VRAI                                        \  #
                                        #    $Z                                 epsilon=0.2                                        \  #
                                        #    $Z                                                                         > $xTV/TAUX   #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.E5                                       #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.22$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=$NTaux                                  \  #
                                        #    $Z                                 LISTE_TAUX=$xTV/TAUX                               \  #
                                        #    $Z                                 xbg=3.000 ybg=3.500                                \  #
                                        #    $Z                                 xhd=3.350 yhd=3.850                                \  #
                                        #    $Z                                 zD=4      zA=3                                     \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 editer_fenetre_courante=FAUX                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=35                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=+1.20                                                    #
                                        #    $Z             set       AnGlEN=-1.05                                                    #
                                        #    $Z             set       PLAnGlEs="$K_VIDE"                                              #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" p=$Premiere d=$Derniere"                  #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" vD=$AnGlE0 vA=$AnGlEN"                    #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" lineaire=VRAI"                            #
                                        #    $Z             set       PLAnGlEs="$PLAnGlEs"" format=f decimales=4"                     #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X $PLAnGlEs`                         #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____DxDyDz=1                                         #
                                        #    $Z                       set       _____SuperEchelle=FAUX                                #
                                        #    $Z                       set       _____DRotation=VRAI                                   #
                                        #    $Z                       set       _____DRotationX=0                                     #
                                        #    $Z                       set       _____DRotationY=$LAnGlEs[$ImAgE]                      #
                                        #    $Z                       set       _____LineaireD=VRAI                                   #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=0                                      #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/LYAP.E5.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/LYAP.E5                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.E5.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.E5.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/LYAP.E5.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_LYAP_E5:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/LYAP.C5.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image.                                                #
                                        #                                                                                             #
                                        # En ce qui concerne le choix des angles de rotation dans [-1.05,+1.20], les commentaires     #
                                        # 'v $xiii/di_album$FON 20101209152519' le justifie...                         #
v         $xiac/LYAP.E6$R16
v         $xiac/LYAP.E6.1$R16
v         $xiac/LYAP.E6.2$R16
v         $xiac/LYAP.E6.2.1$R16

v         $xiirc/LYAP.E6.2.0001
v         $xiirc/LYAP.E6.2.0002
v         $xiirc/LYAP.E6.2.0003
v         $xiirc/LYAP.E6.2.0004
v         $xiirc/LYAP.E6.2.0005
v         $xiirc/LYAP.E6.2.0006
v         $xiirc/LYAP.E6.2.0007
v         $xiirc/LYAP.E6.2.0008
v         $xiirc/LYAP.E6.2.0009
v         $xiirc/LYAP.E6.2.0010
v         $xiirc/LYAP.E6.2.0011
v         $xiirc/LYAP.E6.2.0012
v         $xiirc/LYAP.E6.2.0013
v         $xiirc/LYAP.E6.2.0014
v         $xiirc/LYAP.E6.2.0015
v         $xiirc/LYAP.E6.2.0016

Std ;     anim3     A=$xiirc/LYAP.E6.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_LYAP_E6:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Std                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=0                                                     #
                                        #    $Z             SET       cDerniere=511                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       NTaux=32                                                        #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_trig$X                                                    \  #
                                        #    $Z                                 p=1 d=$NTaux                                       \  #
                                        #    $Z                                 aD=0 aA=`calcul 5*$pi`                             \  #
                                        #    $Z                                 gamma=1                                            \  #
                                        #    $Z                                 entier=VRAI                                        \  #
                                        #    $Z                                 epsilon=0.2                                        \  #
                                        #    $Z                                                                         > $xTV/TAUX   #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/LYAP.E6                                       #
                                        #                                                                                             #
                                        #    $Z             $xrk/lyapunov.22$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=$NTaux                                  \  #
                                        #    $Z                                 LISTE_TAUX=$xTV/TAUX                               \  #
                                        #    $Z                                 xbg=3.000 ybg=3.500                                \  #
                                        #    $Z                                 xhd=3.350 yhd=3.850                                \  #
                                        #    $Z                                 zD=4      zA=3                                     \  #
                                        #    $Z                                 negatifs=VRAI                                      \  #
                                        #    $Z                                 positifs=FAUX                                      \  #
                                        #    $Z                                 editer_fenetre_courante=FAUX                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xTV/TAUX                                                       #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             $xci/seuil$X                                                           \  #
                                        #    $Z                                 A=$_____ImageT1.%04d                               \  #
                                        #    $Z                                 seuil=15                                           \  #
                                        #    $Z                                 R=$_____ImageT1.%04d                               \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul +$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul -$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____SuperEchelle=FAUX                                #
                                        #    $Z                       set       _____DRotation=VRAI                                   #
                                        #    $Z                       set       _____DRotationX=0                                     #
                                        #    $Z                       set       _____DRotationY=$LAnGlEs[$ImAgE]                      #
                                        #    $Z                       set       _____LineaireD=VRAI                                   #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=0                                      #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/LYAP.E6.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/LYAP.E6                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.E6.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/LYAP.E6.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/LYAP.E6.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_LYAP_E6:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/LYAP.C5.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image. On notera qu'etant donne le principe           #
                                        # de la methode ici utilisee (faire tourner la densite avant chaque accumulation), c'est      #
                                        # rotation inverse [+$dpi/16,-$dpi/16] qui doit etre utilisee. D'autre part, l'espace de      #
                                        # calcul est parfaitement cubique (de taille 512^3) de facon a eliminer au maximum les        #
                                        # artefacts rencontres dans un espace distordu (par exemple 'Pal' pour 'OX' et 'OY', et       #
                                        # [0,127] pour 'Oz').                                                                         #
v         $xiac/LYAP.M3$HauteDef$R16
                                        # Voir 'v $xiirc/$Fnota _listG_LYAP_M3_HauteDef'...                                           #

v         $xiac/MANB.42.1$R16
v         $xiac/MANB.42.2$R16

v         $xiirc/MANB.42.1.0001
v         $xiirc/MANB.42.1.0002
v         $xiirc/MANB.42.1.0003
v         $xiirc/MANB.42.1.0004
v         $xiirc/MANB.42.1.0005
v         $xiirc/MANB.42.1.0006
v         $xiirc/MANB.42.1.0007
v         $xiirc/MANB.42.1.0008
v         $xiirc/MANB.42.1.0009
v         $xiirc/MANB.42.1.0010
v         $xiirc/MANB.42.1.0011
v         $xiirc/MANB.42.1.0012
v         $xiirc/MANB.42.1.0013
v         $xiirc/MANB.42.1.0014
v         $xiirc/MANB.42.1.0015
v         $xiirc/MANB.42.1.0016

v         $xiirc/MANB.42.2.0001
v         $xiirc/MANB.42.2.0002
v         $xiirc/MANB.42.2.0003
v         $xiirc/MANB.42.2.0004
v         $xiirc/MANB.42.2.0005
v         $xiirc/MANB.42.2.0006
v         $xiirc/MANB.42.2.0007
v         $xiirc/MANB.42.2.0008
v         $xiirc/MANB.42.2.0009
v         $xiirc/MANB.42.2.0010
v         $xiirc/MANB.42.2.0011
v         $xiirc/MANB.42.2.0012
v         $xiirc/MANB.42.2.0013
v         $xiirc/MANB.42.2.0014
v         $xiirc/MANB.42.2.0015
v         $xiirc/MANB.42.2.0016
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANB_42:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MANB.41                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/MANB.42                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/MANB.43                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=0 vA=+1                                         \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ITER0     15                                                              #
                                        #    $c   #define   ITERP     4                                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   SEUIL0    50                                                              #
                                        #    $c   #define   SEUILN    10                                                              #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             int       iteration=ITER0;                                                #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    seuil=((SEUILN*(n-N0))+(SEUIL0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=%d                                    #
                                        #    $c                                      seuil=%f                                         #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-6    ybg=-6    xhd=+6    yhd=+6             #
                                        #    $c                                      produit_non_theorique=FAUX                       #
                                        #    $c                                      transformer_suite_point=VRAI                     #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=0                                    #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,iteration                                                #
                                        #    $c                             ,seuil                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=0 pY=0 pZ=1                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=1 pY=0 pZ=0'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                ROTATION_OY=+0.3                       #
                                        #    $c                                                R=$xTV/MANB.42%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/MANB.42%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       iteration = iteration+ITERP;                                    #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/MANB.42.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/MANB.42.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MANB.42.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MANB.42.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MANB_42:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose un "epluchage" de 'v $xiirc/MANB.32.2'.                             #

v         $xiac/MAND.11$R64        p=$xiP/cercle.11
v         $xiac/MAND.11$R64        p=$xiP/fractal.91
v         $xiac/MAND.11$R64        p=$xiP/arc_ciel.01       t=64 d=4            ralenti=32
v         $xiac/MAND.12$R64        p=$xiP/cercle.11
v         $xiac/MAND.12$R64        p=$xiP/fractal.91
v         $xiac/MAND.12$R64        p=$xiP/arc_ciel.01       t=64 d=4            ralenti=32
v         $xiac/MAND$M.2$R16       p=$xiP/enfer.03
v         $xiac/MAND$M.2$R16       p=$xiP/montagnes.01
v         $xiac/MAND$M.2$R64       p=$xiP/enfer.03          t=64 d=4            ralenti=32
v         $xiac/MAND$M.2$R64       p=$xiP/montagnes.01      t=64 d=4            ralenti=32
v         $xiac/MAND.12$R64        p=$xiP/cercle.02         t=64 d=4            ralenti=32

Gamma               $Gamma_mandel
v         $xiac/MAND.43.2.0$R16         p=$xiP/arc_ciel.01  t=16      d=4       ralenti=16
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 011624_011639                                                #
                                        #                                                                                             #
                                        # avec de plus :                                                                              #
                                        #                                                                                             #
                                        #                   $xci/acces$X        A=$xiac/MAND.43.2.0$R16                            \  #
                                        #                                       renormaliser=VRAI R=$xiac/MAND.43.2.0$R16          \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
Gamma               $Gamma_lorenz
v         $xiac/MAND.43.2.1$R16         p=$xiP/gris.01      t=16      d=4       ralenti=16
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 011608_011623                                                #
                                        #                                                                                             #

v         $xiac/MAND.61.008$R16         p=$xiP/orange.11
v         $xiac/MAND.61.008$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=16 iterations=8                   \  #
                                        #                                       globale=FAUX positifs=VRAI negatifs=VRAI           \  #
                                        #                                       mode=1                                             \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
v         $xiac/MAND.61.016$R16         p=$xiP/orange.11
v         $xiac/MAND.61.016$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=16 iterations=16                  \  #
                                        #                                       globale=FAUX positifs=VRAI negatifs=VRAI           \  #
                                        #                                       mode=1                                             \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
v         $xiac/MAND.61.064$R16         p=$xiP/orange.11
v         $xiac/MAND.61.064$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=16 iterations=64                  \  #
                                        #                                       globale=FAUX positifs=VRAI negatifs=VRAI           \  #
                                        #                                       mode=1                                             \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #

v         $xiac/MAND.62.700$R16         p=$xiP/orange.11
v         $xiac/MAND.62.700$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=32 iterations=700                 \  #
                                        #                                       globale=VRAI positifs=VRAI negatifs=VRAI           \  #
                                        #                                       mode=1                                             \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #

v         $xiac/MAND.63.016$R16         p=$xiP/orange.11
v         $xiac/MAND.63.016$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=16 iterations=16                  \  #
                                        #                                       globale=FAUX positifs=FAUX negatifs=VRAI           \  #
                                        #                                       mode=1                                             \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #

v         $xiac/MAND.71.016$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=16 iterations=16                  \  #
                                        #                                                 globale=FAUX                             \  #
                                        #                                                 positifs=VRAI negatifs=VRAI              \  #
                                        #                                                 mode=2                                   \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        # L'apparence etrange de la premiere image vient de ce que la partie Imaginaire est nulle     #
                                        # sur l'axe Reel, et que l'on force alors une valeur infinie negative pour 'log(...)'. Il     #
                                        # y a donc une distance enorme entre les niveaux minimal et maximal...                        #

v         $xiac/MAND.73.016$R16         p=$xiP/orange.11
v         $xiac/MAND.73.016$R16         p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.21$X    R=...     images=16 iterations=16                  \  #
                                        #                                                 globale=FAUX                             \  #
                                        #                                                 positifs=FAUX negatifs=VRAI              \  #
                                        #                                                 mode=2                                   \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        # L'apparence etrange de la premiere image vient de ce que la partie Imaginaire est nulle     #
                                        # sur l'axe Reel, et que l'on force alors une valeur infinie negative pour 'log(...)'. Il     #
                                        # y a donc une distance enorme entre les niveaux minimal et maximal...                        #
v         $xiac/MAND.91$R16             p=$xiP/cercle.32    t=16      d=4       ralenti=32

v         $xiac/MAND.81$R16             p=$xiP/orange.11
v         $xiac/MAND.81$R16             p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   alias     mandel    '$xrc/mandel.21$X    images=1 iterations=\!*       \  #
                                        #                                        globale=FAUX positifs=FAUX negatifs=VRAI          \  #
                                        #                                        mode=1                                            \  #
                                        #                                        $formatI                                    |     \  #
                                        #                                        $xci/acces$X        R=$xw1/MAND.100\!*            \  #
                                        #                                        $formatI'                                            #
                                        #                                                                                             #
                                        # puis :                                                                                      #
                                        #                                                                                             #
                                        # mandel    01                                                                                #
                                        # mandel    02                                                                                #
                                        # mandel    03                                                                                #
                                        # mandel    04                                                                                #
                                        # mandel    05                                                                                #
                                        # mandel    06                                                                                #
                                        # mandel    07                                                                                #
                                        # mandel    08                                                                                #
                                        # mandel    09                                                                                #
                                        # mandel    10                                                                                #
                                        # mandel    11                                                                                #
                                        # mandel    12                                                                                #
                                        # mandel    13                                                                                #
                                        # mandel    14                                                                                #
                                        # mandel    15                                                                                #
                                        # mandel    16                                                                                #
                                        #                                                                                             #
                                        # puis voir '$xiac/MAND.81$R16'...                                                            #
v         $xiac/MAND.82$R16             p=$xiP/orange.11
v         $xiac/MAND.82$R16             p=$xiP/orange.11    t=16      d=4       ralenti=32
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   alias     mandel    '$xrc/mandel.21$X    images=1 iterations=\!*       \  #
                                        #                                        globale=FAUX positifs=VRAI negatifs=VRAI          \  #
                                        #                                        mode=1                                            \  #
                                        #                                        $formatI                                    |     \  #
                                        #                                        $xci/acces$X        R=$xw1/MAND.200\!*            \  #
                                        #                                        $formatI'                                            #
                                        #                                                                                             #

v         $xiac/MAND.71.016$R16         p=$xiP/orange.11
v         $xiac/MAND.91$R16             p=$xiP/arc_ciel.01  t=16      d=4       ralenti=32
v         $xiac/MAND.91$R64             p=$xiP/cercle.32    t=64      d=4       ralenti=32
v         $xiac/MAND.91$R64             p=$xiP/arc_ciel.01  t=64      d=4       ralenti=32
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 018018_018145                                                #
                                        #                   xivPdf 2 1 / 018146_018273                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 2 et 8.                                                     #
v         $xiac/MAND.93$R16             p=$xiP/dentscie.01
v         $xiac/MAND.92$R16             p=$xiP/cercle.32    t=16      d=4       ralenti=32
v         $xiac/MAND.92$R16             p=$xiP/arc_ciel.01  t=16      d=4       ralenti=32
v         $xiac/MAND.92$R64             p=$xiP/cercle.32    t=64      d=4       ralenti=32
v         $xiac/MAND.92$R64             p=$xiP/arc_ciel.01  t=64      d=4       ralenti=32
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 018274_018401                                                #
                                        #                   xivPdf 2 1 / 018402_018529                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 2 et 8.                                                     #
v         $xiac/MAND.93$R16             p=$xiP/cercle.32    t=16      d=4       ralenti=32
v         $xiac/MAND.93$R16             p=$xiP/fractal.03   t=16      d=4       ralenti=32
v         $xiac/MAND.93$R16             p=$xiP/fractal.21
v         $xiac/MAND.93$R16             p=$xiP/random.14
v         $xiac/MAND.93$R64             p=$xiP/cercle.32    t=64      d=4       ralenti=32
v         $xiac/MAND.93$R64             p=$xiP/fractal.03   t=64      d=4       ralenti=32
v         $xiac/MAND.93$R64             p=$xiP/fractal.21
v         $xiac/MAND.93$R64             p=$xiP/random.14
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 018658_018785                                                #
                                        #                   xivPdf 2 1 / 018786_018913                                                #
                                        #                   xivPdf 2 1 / 018914_019041                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 2 et 8.                                                     #
v         $xiac/MAND.94$R16             p=$xiP/arc_ciel.01  t=16      d=4       ralenti=32
v         $xiac/MAND.94$R64             p=$xiP/arc_ciel.01  t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 019042_019169                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 2 et 8, et "moyenne=FAUX maximum=VRAI".                     #
v         $xiac/MAND.A1$R16             p=$xiP/arc_ciel.01
v         $xiac/MAND.A1$R16             p=$xiP/cercle.11
v         $xiac/MAND.A1$R16             p=$xiP/fractal.91
v         $xiac/MAND.A1$R16             p=$xiP/orange.11
v         $xiac/MAND.A1$R16             p=$xiP/random.86
v         $xiac/MAND.A1$R64             p=$xiP/arc_ciel.01
v         $xiac/MAND.A1$R64             p=$xiP/cercle.11
v         $xiac/MAND.A1$R64             p=$xiP/fractal.91
v         $xiac/MAND.A1$R64             p=$xiP/orange.11
v         $xiac/MAND.A1$R64             p=$xiP/random.86
v         $xiac/MAND.A1$R64             p=$xiP/fractal.91   t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 002889_003144                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 16 et 4, et "moyenne=VRAI".                                 #
v         $xiac/MAND.A2$R16             p=$xiP/fractal.91
v         $xiac/MAND.A2$R16             p=$xiP/roug2_jaun2
v         $xiac/MAND.A2$R64             p=$xiP/fractal.91
v         $xiac/MAND.A2$R64             p=$xiP/fractal.91   t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 002889_003144                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 16 et 4, et "moyenne=FAUX maximum=VRAI".                    #
                                        #                                                                                             #
                                        # On notera que la palette '$xiP/roug2_jaun2' est celle qui correspond aux couleurs de        #
                                        # l'Ecole Polytechnique et qui est donc utilisee sur Internet pour montrer la fresque de      #
                                        # 1986...                                                                                     #
v         $xiac/MAND.A2$MP4
                                        # Generee (sur '$LACT19') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_A2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             XYmaxNe   1079 719                                                        #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET                 Premiere=1                                            #
                                        #    $Z             SET                 Derniere=512                                          #
                                        #                                                                                             #
                                        #    $Z             @                   NImAgEs = $Derniere - $Premiere + 1                   #
                                        #    $Z             set                 NItErAtIoNs=256                                       #
                                        #                                                                                             #
                                        #    $Z             SET                 _____ImageT=$xTV/MAND.A2.                             #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.01$X                                                       \  #
                                        #    $Z                                 N=$NImAgEs                                         \  #
                                        #    $Z                                 premiere=$Premiere                                 \  #
                                        #    $Z                                 iterations=$NItErAtIoNs                            \  #
                                        #    $Z                                 xbgD=-2 ybgD=-1.25                                 \  #
                                        #    $Z                                 xhdD=0.5 yhdD=1.25                                 \  #
                                        #    $Z                                 xbgA=-1.79606999534 ybgA=-0.00000000001            \  #
                                        #    $Z                                 xhdA=-1.79606999532 yhdA=+0.00000000001            \  #
                                        #    $Z                                 arguments=VRAI                                     \  #
                                        #    $Z                                 R=$_____ImageT                                     \  #
                                        #    $Z                                 $formatI                                              #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____ImageT                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/roug2_jaun2                                 \  #
                                        #    $Z                                 R=$_____ImageT                                     \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____Animation=$xiac/MAND.A2                                    #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_A2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Il s'agit d'une version '$MP4' de 'v $xiac/MAND.A2$R16' regeneree pour le CNRS              #
                                        # ('v $Dcourrier_in/20150202102656 name=.colonna_anims.docx.').                               #
v         $xiac/MAND.B1$M$R16           p=$xiP/enfer.02
v         $xiac/MAND.B1$M$R16           p=$xiP/montagnes.01
v         $xiac/MAND.B1$M$R16           p=$xiP/trou_noir.A4
v         $xiac/MAND.B1$M$R64           p=$xiP/enfer.02
v         $xiac/MAND.B1$M$R64           p=$xiP/montagnes.01
v         $xiac/MAND.B1$M$R64           p=$xiP/enfer.02     t=64      d=4       ralenti=32
v         $xiac/MAND.B1$M$R64           p=$xiP/montagnes.01 t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 005756_006011                                                #
                                        #                   xivPdf 9 1 / 006012_006267                                                #
                                        #                                                                                             #
                                        # Ces animations ont ete recalculees aux alentours du 20060414175215 sur '$LACT17' afin de    #
                                        # les ameliorer pour ce qui est des "falaises avant" ('v $xrc/mandel.02$K 20060414173128').   #
                                        # Afin de ne pas perturber le "this picture was created on MM/JJ/AAAA" des images '$xiMi'     #
                                        # du site Internet, ces images devront faire l'objet d'un :                                   #
                                        #                                                                                             #
                                        #                   retouche  $xiac/MAND.B1$M$R16           19951215000000                    #
                                        #                   retouche  $xiac/MAND.B1$M$R64           19951215000000                    #
                                        #                                                                                             #
                                        # apres qu'elles aient ete mises a jour sur toutes les MACHINEs...                            #
v         $xiac/MAND.B1$M$MP4
                                        # Generee (sur '$LACT19') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_B1_M:                                                                  #
                                        #                                                                                             #
                                        #    $Z             XYmaxNe   1079 719                                                        #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET                 Premiere=0                                            #
                                        #    $Z             SET                 Derniere=511                                          #
                                        #                                                                                             #
                                        #    $Z             @                   NImAgEs = $Derniere - $Premiere + 1                   #
                                        #    $Z             set                 NItErAtIoNs=256                                       #
                                        #                                                                                             #
                                        #    $Z             SET                 _____ImageT=$xTV/MAND.B1$M.                           #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.02$X                                                       \  #
                                        #    $Z                                 N=$NImAgEs                                         \  #
                                        #    $Z                                 R=$_____ImageT                                     \  #
                                        #    $Z                                 $formatI                                              #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____ImageT                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/trou_noir.A4                                \  #
                                        #    $Z                                 R=$_____ImageT                                     \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____Animation=$xiac/MAND.B1$M                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_B1_M:                                                                    #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Il s'agit d'une version '$MP4' de 'v $xiac/MAND.B1$M$R16' regeneree pour le CNRS            #
                                        # ('v $Dcourrier_in/20150202102656 name=.colonna_anims.docx.').                               #
v         $xiac/MAND.C1$R16
                                        # Correspond a la reduction '$R16' de la sequence '$xifc/MAND.3.' en vraies couleurs avec     #
                                        # la palette '$xiP/fractal.91'. Cette sequence a ete generee par '$xrc/mandel.01$X' avec      #
                                        # les parametres suivants :                                                                   #
                                        #                                                                                             #
                                        #                   iterations=1024                                                           #
                                        #                   xbgD=-2.0 ybgD=-1.25                                                      #
                                        #                   xhdD=+0.5 yhdD=+1.25                                                      #
                                        #                   xbgA=-0.74542955 ybgA=+0.11300805                                         #
                                        #                   xhdA=-0.74542955 yhdA=+0.11300805                                         #
                                        #                   arguments=VRAI                                                            #
                                        #                                                                                             #
v         $xiac/MAND.D1$R16             p=$xiP/cercle.11
v         $xiac/MAND.D1$R16             p=$xiP/fractal.91
v         $xiac/MAND.D1$R16             p=$xiP/orange.11
v         $xiac/MAND.D1$R16             p=$xiP/random.06
v         $xiac/MAND.D1$R64             p=$xiP/orange.11
v         $xiac/MAND.D1$R64             p=$xiP/orange.11    t=64      d=4       ralenti=32

v         $xiac/MAND.D1.1$R16           p=$xiP/orange.11
v         $xiac/MAND.D1.1$R64           p=$xiP/orange.11
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 031838_031965                                               #
                                        #                                                                                             #
                                        # les images '$xiac/MAND.D1.1.*' donnant respectivement les 16 et 64 premieres (pas=1).       #
v         $xiac/MAND.D1.2$R16           p=$xiP/orange.11
v         $xiac/MAND.D1.2$R64           p=$xiP/orange.11
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 031838_031965                                               #
                                        #                                                                                             #
                                        # les images '$xiac/MAND.D1.2.*' donnant respectivement 16 et 64 images (pas=1) non pas a     #
                                        # partir de la premiere comme pour 'v $xiac/MAND.D1.2$R16' et 'v $xiac/MAND.D1.2$R64' mais    #
                                        # a partir de la seconde. Ceci a ete recalcule le 19981007114250 suite a l'introduction       #
                                        # de l'image 'v $xiio/KADREN$R16' pour permettre une meilleure presentation sur le serveur    #
                                        # 'WWW' au niveau de l'image '$xiMi/MAND.D1.1$R16$D' remplacee par '$xiMi/MAND.D1.2$R16$D'    #
                                        # a cette date...                                                                             #
v         $xiac/MAND.D2.2$R04           p=$xiP/orange.11
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_D2_2_R04:                                                                #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=4                                                      #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             #define   ITER      1                                                     #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/mandel.01$X               #
                                        #    $c                                                     iterations=%d                     #
                                        #    $c                                                     arguments=VRAI                    #
                                        #    $c                                                     images=1                          #
                                        #    $c                                                     R=$xTV/MAND.1.                    #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,(n-N0)+ITER                                    #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$CP                                           #
                                        #    $c                                                     $xTV/MAND.1.%04d                  #
                                        #    $c                                                     $xTV/MAND.1.%04d\n"               #
                                        #    $c                                       ,N0-N0,n                                        #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_04$X A=$xTV/MAND.1.                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/MAND.D2.2$R04                              \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_D2_2_R04:                                                                  #
                                        #                                                                                             #
v         $xiac/MAND.D2.2$R16           p=$xiP/orange.11
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_D2_2_R16:                                                                #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             #define   ITER      1                                                     #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/mandel.01$X               #
                                        #    $c                                                     iterations=%d                     #
                                        #    $c                                                     arguments=VRAI                    #
                                        #    $c                                                     images=1                          #
                                        #    $c                                                     R=$xTV/MAND.1.                    #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,(n-N0)+ITER                                    #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$CP                                           #
                                        #    $c                                                     $xTV/MAND.1.%04d                  #
                                        #    $c                                                     $xTV/MAND.1.%04d\n"               #
                                        #    $c                                       ,N0-N0,n                                        #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_16$X A=$xTV/MAND.1.                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/MAND.D2.2$R16                              \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_D2_2_R16:                                                                  #
                                        #                                                                                             #
v         $xiac/MA.E1$R16               p=$xiP/cercle.66
v         $xiac/MA.E1$R64               p=$xiP/cercle.66
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 12 1 / 016348_016475                                               #
                                        #                                                                                             #
v         $xiac/MA.E1$M$R16
v         $xiac/MA.E1$M$R64
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 12 1 / 016604_016731                                               #
                                        #                                                                                             #
                                        # ATTENTION : dans cette sequence les champs a mettre en '$M' ont ete renormalises            #
                                        # independemment les uns des autres contrairement a 'v $xiac/MA.E2$R16' et a                  #
                                        # 'v $xiac/MA.E2$R64'.                                                                        #
v         $xiac/MA.E2$R16               p=$xiP/cercle.66
v         $xiac/MA.E2$R64               p=$xiP/cercle.66
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 12 1 / 016732_016859                                               #
                                        #                                                                                             #
v         $xiac/MA.E2$M$R16
v         $xiac/MA.E2$M$R64
                                        # Correspond a la sequence d'images suivante :                                                #
                                        #                                                                                             #
                                        #                   xivPdf 12 1 / 016860_016987                                               #
                                        #                                                                                             #
v         $xiac/MA.F1$R16
v         $xiac/MA.F1$R64
v         $xiac/MA.F1$M$R16
v         $xiac/MA.F1$M$R64
v         $xiirc/MA.F1$M.0000
v         $xiirc/MA.F1$M.0016
v         $xiirc/MA.F1$M.0056
v         $xiirc/MA.F1$M.0072
v         $xiirc/MA.F1$M.0104
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_F1_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set       _____imagesR=$xTV/MAND.1                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.08                                        #
                                        #    $m4            _____include(_____xiirc/.MAND.3.10._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.F1                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.F1$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0000%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F1$M.0000%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0016%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F1$M.0016%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0056%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F1$M.0056%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0072%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F1$M.0072%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0104%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F1$M.0104%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_F1_M:                                                                      #
                                        #                                                                                             #
v         $xiac/MA.F2$R16
v         $xiac/MA.F2$R64
v         $xiac/MA.F2$M$R16
v         $xiac/MA.F2$M$R64
v         $xiirc/MA.F2$M.0000
v         $xiirc/MA.F2$M.0016
v         $xiirc/MA.F2$M.0056
v         $xiirc/MA.F2$M.0072
v         $xiirc/MA.F2$M.0078
v         $xiirc/MA.F2$M.0098
v         $xiirc/MA.F2$M.0104
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_F2_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set       _____imagesR=$xTV/MAND.2                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.08                                        #
                                        #    $Z             set       _____Ptexture=$xiP/roug2_jaun2                                  #
                                        #    $m4            _____include(_____xiirc/.MAND.3.10._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.F2                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.F2$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0000%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0000%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0016%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0016%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0056%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0056%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0072%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0072%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0078%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0078%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0098%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0098%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0104%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F2$M.0104%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_F2_M:                                                                      #
                                        #                                                                                             #
v         $xiac/MA.F3$R16
v         $xiac/MA.F3$R64
v         $xiac/MA.F3$M$R16
v         $xiac/MA.F3$M$R64
v         $xiirc/MA.F3$M.0000
v         $xiirc/MA.F3$M.0016
v         $xiirc/MA.F3$M.0056
v         $xiirc/MA.F3$M.0072
v         $xiirc/MA.F3$M.0078
v         $xiirc/MA.F3$M.0098
v         $xiirc/MA.F3$M.0104
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_F3_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set       _____imagesR=$xTV/MAND.3                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.08                                        #
                                        #    $Z             set       _____Ptexture=$xiP/roug0_jaun0                                  #
                                        #    $m4            _____include(_____xiirc/.MAND.3.10._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.F3                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.F3$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0000%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0000%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0016%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0016%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0056%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0056%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0072%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0072%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0078%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0078%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0098%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0098%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0104%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.F3$M.0104%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_F3_M:                                                                      #
                                        #                                                                                             #
v         $xiac/MA.G2$R16
v         $xiac/MA.G2$R64
v         $xiac/MA.G2$M$R16
v         $xiac/MA.G2$M$R64
v         $xiirc/MA.G2$M.0000
v         $xiirc/MA.G2$M.0015
v         $xiirc/MA.G2$M.0030
v         $xiirc/MA.G2$M.0045
v         $xiirc/MA.G2$M.0060
v         $xiirc/MA.G2$M.0075
v         $xiirc/MA.G2$M.0090
v         $xiirc/MA.G2$M.0105
v         $xiirc/MA.G2$M.0120

Pal ;     anim3     A=$xiirc/MA.G2$M. premiere=0 derniere=120 pas=15
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_G2_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set       _____imagesR=$xTV/MAND.2                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.05                                        #
                                        #    $Z             set       _____Ptexture=$xiP/roug2_jaun2                                  #
                                        #    $Z             set       _____Echelle=0.25                                               #
                                        #    $Z             set       _____Perspective=0.6                                            #
                                        #    $Z             set       _____Ty=0.86                                                    #
                                        #    $m4            _____include(_____xiirc/.MAND.3.10._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.G2                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.G2$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0000%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0000%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0015%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0015%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0030%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0030%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0045%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0045%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0060%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0060%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0075%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0075%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0090%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0090%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0105%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0105%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0120%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G2$M.0120%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_G2_M:                                                                      #
                                        #                                                                                             #
v         $xiac/MA.G3$R16
v         $xiac/MA.G3$R64
v         $xiac/MA.G3$M$R16
v         $xiac/MA.G3$M$R64
v         $xiirc/MA.G3$M.0000
v         $xiirc/MA.G3$M.0015
v         $xiirc/MA.G3$M.0030
v         $xiirc/MA.G3$M.0045
v         $xiirc/MA.G3$M.0060
v         $xiirc/MA.G3$M.0075
v         $xiirc/MA.G3$M.0090
v         $xiirc/MA.G3$M.0105
v         $xiirc/MA.G3$M.0120

Pal ;     anim3     A=$xiirc/MA.G3$M. premiere=0 derniere=120 pas=15
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_G3_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             set       _____imagesR=$xTV/MAND.3                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.05                                        #
                                        #    $Z             set       _____Ptexture=$xiP/roug0_jaun0                                  #
                                        #    $Z             set       _____Echelle=0.25                                               #
                                        #    $Z             set       _____Perspective=0.6                                            #
                                        #    $Z             set       _____Ty=0.86                                                    #
                                        #    $m4            _____include(_____xiirc/.MAND.3.10._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.G3                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.G3$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0000%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0000%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0015%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0015%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0030%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0030%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0045%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0045%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0060%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0060%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0075%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0075%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0090%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0090%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0105%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0105%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0120%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.G3$M.0120%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_G3_M:                                                                      #
                                        #                                                                                             #
v         $xiac/MA.H3$R16
v         $xiac/MA.H3$R64
v         $xiac/MA.H3$N$R16
v         $xiac/MA.H3$N$R64
v         $xiac/MA.H3$M$R16
v         $xiac/MA.H3$M$R64
v         $xiirc/MA.H3$M.0000
v         $xiirc/MA.H3$M.0015
v         $xiirc/MA.H3$M.0030
v         $xiirc/MA.H3$M.0045
v         $xiirc/MA.H3$M.0060
v         $xiirc/MA.H3$M.0075
v         $xiirc/MA.H3$M.0090
v         $xiirc/MA.H3$M.0105
v         $xiirc/MA.H3$M.0120

Pal ;     anim3     A=$xiirc/MA.H3$M. premiere=0 derniere=120 pas=15
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_H3_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MAND.3.10._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____ModulerBrume=$EXIST                                        #
                                        #    $Z             setenv    _____ModulationBrume          $xTV/MODULATION                   #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #    $c                                                                                       #
                                        #    $c             #define   OX        0.0                                                   #
                                        #    $c             #define   EX        4.0                                                   #
                                        #    $c                                                                                       #
                                        #    $c             #define   OZ        0.0                                                   #
                                        #    $c             #define   EZ        1.0                                                   #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    trX=((EX*(n-N0))+(OX*(N-n)))/(N-N0);        #
                                        #    $c                                 double    Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xci/fract_3D.01$X                #
                                        #    $c                                                               mx=0.5 my=0.1 mz=0.2    #
                                        #    $c                                                               trX=%.16f               #
                                        #    $c                                                               Z=%.16f                 #
                                        #    $c                                                          R=$_____ModulationBrume.%04d #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,trX                                            #
                                        #    $c                                       ,Z                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____ModulationBrume.                           \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/nuages.02                                   \  #
                                        #    $Z                                 R=$_____ModulationBrume.                           \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____imagesR=$xTV/MAND.3                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.05                                        #
                                        #    $Z             set       _____Ptexture=$xiP/roug0_jaun0                                  #
                                        #    $Z             set       _____ModulerTexture=$EXIST                                      #
                                        #    $Z             set       _____PourcentageSeuil=49                                        #
                                        #    $Z             set       _____Echelle=0.25                                               #
                                        #    $Z             set       _____Perspective=0.6                                            #
                                        #    $Z             set       _____Ty=0.86                                                    #
                                        #    $Z             set       _____DepthCueing=VRAI                                           #
                                        #    $Z             set       _____MinDepthCueing=0.3                                         #
                                        #    $Z             set       _____Pbrume=$xiP/gris.08                                        #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.H3                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.H3$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #    $Z             set       _____images=$_____ModulationBrume                               #
                                        #    $Z             set       _____animation=$xiac/MA.H3$N                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0000%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0000%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0015%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0015%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0030%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0030%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0045%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0045%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0060%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0060%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0075%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0075%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0090%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0090%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0105%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0105%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0120%s                           \  #
                                        #    $Z                                 R=$xiirc/MA.H3$M.0120%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_H3_M:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # La nouvelle version de la fresque "L'ILLUSION DE LA CONNAISSANCE" fut ainsi generee (sur    #
                                        # '$CMAP28' -ex "belleville"-), en fixant les parametre suivants :                            #
                                        #                                                                                             #
                                        #                   XYmaxNe   2999 2999                                                       #
                                        #                                                                                             #
                                        # afin d'avoir une image carree a la resolution 300dpi et pour une taille du quart de la      #
                                        # taille finale (100x100 cm). D'autre par il a fallu fixer :                                  #
                                        #                                                                                             #
                                        #                   niveau=16                                                                 #
                                        #                                                                                             #
                                        # pour '$xci/fract_3D.01$X' afin 'avoir des temps de calcul raisonnables (09:00) pour les     #
                                        # neuf images (dont seulement sept seront utilisees, les images '0030' et '0060' etant        #
                                        # exclues d'une part parce qu'il ne faut que sept images et que d'autre part, il aurait       #
                                        # fallu modifier le parametre "_____PourcentageSeuil=49" en le dimunuant car, en effet,       #
                                        # pour ces deux images il apparait que le seuil -'v $xiirc/.MAND.3.11.$U SeUiL'- est egal     #
                                        # a '$BLANC' attenuant par la-meme l'integralite de la texture...).                           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # La sequence '$_____ModulationBrume' a ete utilisee pour generer 'v $xiirf/FRA3.Y2.2', sans  #
                                        # la recalculer...                                                                            #

v         $xiac/MAND.U1$R16
v         $xiac/MAND.U1.1$R16
v         $xiac/MAND.U1.2$R16

v         $xiirc/MAND.U1.0001
v         $xiirc/MAND.U1.0002
v         $xiirc/MAND.U1.0003
v         $xiirc/MAND.U1.0004
v         $xiirc/MAND.U1.0005
v         $xiirc/MAND.U1.0006
v         $xiirc/MAND.U1.0007
v         $xiirc/MAND.U1.0008
v         $xiirc/MAND.U1.0009
v         $xiirc/MAND.U1.0010
v         $xiirc/MAND.U1.0011
v         $xiirc/MAND.U1.0012
v         $xiirc/MAND.U1.0013
v         $xiirc/MAND.U1.0014
v         $xiirc/MAND.U1.0015
v         $xiirc/MAND.U1.0016
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_U1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pqu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT0=$xTV/MAND                                          #
                                        #                                                                                             #
                                        #    $Z             set       PaLeTtE=$xiP/fractal.11                                         #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.1                                        #
                                        #    $Z             set       _____ImageT2=$xTV/MAND.2                                        #
                                        #    $Z             set       _____ImageT3=$xTV/MAND.3                                        #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0.0                                                             #
                                        #    $c   #define   ANGLEN    (2*3.1415926535897932)                                          #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("Pqu\n");                                                #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=60                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=+0.1                                           #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.0 ybg=-1.0 xhd=+1.0 yhd=+1.0              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2    pPhi=2                               #
                                        #    $c                                      tTheta=$pi  tPhi=$pi                             #
                                        #    $c                                      visualiser_appartenance=FAUX                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT0.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/accumule.02$X                       #
                                        #    $c                                      A=$_____ImageT0.                                 #
                                        #    $c                                      premiere=$cPremiere derniere=$cDerniere pas=1    #
                                        #    $c                                      inverser=VRAI                                    #
                                        #    $c                                      binariser=VRAI                                   #
                                        #    $c                                      seuil=25                                         #
                                        #    $c                                      translation_quelconque=FAUX                      #
                                        #    $c                                      stereo=0.0                                       #
                                        #    $c                                      trx=`calcul 2/$dimX` try=0                       #
                                        #    $c                                      R=$_____ImageT1.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("$xci/vraies_C$X                          #
                                        #    $c                                      A=$_____ImageT1.%04d                             #
                                        #    $c                                      p=$PaLeTtE                                       #
                                        #    $c                                      RVB=VRAI                                         #
                                        #    $c                                      R=$_____ImageT1.%04d                             #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT1.%04d%%s                #
                                        #    $c                                                points=25                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                                           $xci/format.01$X             #
                                        #    $c                                                mode=2                                 #
                                        #    $c                                                R=$_____ImageT1.%04d%%s                #
                                        #    $c                                                                    $formatR_Pal%c\n"  #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("Pal\n");                                                #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/detourage.11$Z                      #
                                        #    $c                                      $_____ImageT1.%04d                               #
                                        #    $c                                      $_____ImageT2.%04d                               #
                                        #    $c                                      6                                                #
                                        #    $c                                      80                                               #
                                        #    $c                                      $EXIST                                           #
                                        #    $c                                      $NEXIST\n"                                       #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT1.%04d%%s                #
                                        #    $c                                                R=$xiirc/MAND.U1.%04d%%s               #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.U1                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.U1.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.U1.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_U1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MAND.U1'.            #
v         $xiac/MAND.Z2.1$R16
v         $xiac/MAND.Z2.2$R16
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_Z2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.Z1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/MAND.Z2                                       #
                                        #    $Z             set       _____ImageT=$_____ImageT2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/MAND.Z3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.Z2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   DEUX_PI   6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    (-DEUX_PI/16)                                                   #
                                        #    $c   #define   ANGLEN    (+DEUX_PI/16)                                                   #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=+0.1                                           #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.0 ybg=-1.0 xhd=+1.0 yhd=+1.0              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2    pPhi=2                               #
                                        #    $c                                      tTheta=$pi  tPhi=$pi                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.Z2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.Z2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_Z2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MAND.Z2.1' et        #
                                        # de 'v $xiirc/MAND.Z2.2' et donne donc 4x3 stereogrammes de ces images.                      #
v         $xiac/MAND.a2.1$R16
v         $xiac/MAND.a2.2$R16
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_a2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.a1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/MAND.a2                                       #
                                        #    $Z             set       _____ImageT=$_____ImageT2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/MAND.a3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.a2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   K0        0                                                               #
                                        #    $c   #define   KN        0.2                                                             #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    k=((KN*(n-N0))+(K0*(N-n)))/(N-N0);                    #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=%+f                                            #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.0 ybg=-1.0 xhd=+1.0 yhd=+1.0              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2    pPhi=2                               #
                                        #    $c                                      tTheta=$pi  tPhi=$pi                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,k                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.a2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.a2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_a2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose plusieurs sections tridimensionnelles le long de l'axe 'K'          #
                                        # de 'v $xiirc/MAND.Z2.1' et de 'v $xiirc/MAND.Z2.2'.                                         #
v         $xiac/MAND.b2.1$R16
v         $xiac/MAND.b2.2$R16
                                        # Generee (sur '$CMAP28' -ex "belleville"-) par :                                             #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_b2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.b1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/MAND.b2                                       #
                                        #    $Z             set       _____ImageT=$_____ImageT2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/MAND.b3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.b2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   K0        0                                                               #
                                        #    $c   #define   KN        0.22                                                            #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    k=((KN*(n-N0))+(K0*(N-n)))/(N-N0);                    #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=%+f                                            #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.0 ybg=-1.0 xhd=+1.0 yhd=+1.0              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2    pPhi=2                               #
                                        #    $c                                      tTheta=$pi  tPhi=$pi                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,k                                                        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.b2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.b2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_b2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose plusieurs sections tridimensionnelles le long de l'axe 'K'          #
                                        # de 'v $xiirc/MAND.Z2.1' et de 'v $xiirc/MAND.Z2.2' mais en faisant "exposant=1"             #
v         $xiac/MAND.c2.1$R16
v         $xiac/MAND.c2.2$R16
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_c2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.c1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/MAND.c2                                       #
                                        #    $Z             set       _____ImageT=$_____ImageT2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/MAND.c3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.c2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.0 vA=0                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=10                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=+0.1                                           #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.0 ybg=-1.0 xhd=+1.0 yhd=+1.0              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2    pPhi=2                               #
                                        #    $c                                      tTheta=$pi  tPhi=$pi                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.c2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.c2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_c2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MAND.Z2.1' et        #
                                        # de 'v $xiirc/MAND.Z2.2'.                                                                    #
v         $xiac/MAND.d2.1$R16
v         $xiac/MAND.d2.2$R16

v         $xiirc/MAND.d2.1.0001
v         $xiirc/MAND.d2.1.0002
v         $xiirc/MAND.d2.1.0003
v         $xiirc/MAND.d2.1.0004
v         $xiirc/MAND.d2.1.0005
v         $xiirc/MAND.d2.1.0006
v         $xiirc/MAND.d2.1.0007

v         $xiirc/MAND.d2.2.0001
v         $xiirc/MAND.d2.2.0002
v         $xiirc/MAND.d2.2.0003
v         $xiirc/MAND.d2.2.0004
v         $xiirc/MAND.d2.2.0005
v         $xiirc/MAND.d2.2.0006
v         $xiirc/MAND.d2.2.0007
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_d2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.d1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT=$xTV/MAND.d2                                        #
                                        #    $Z             set       _____ImageT2=$xiirc/MAND.d2.1                                   #
                                        #    $Z             set       _____ImageT22=$_____ImageT.2                                    #
                                        #    $Z             set       _____ImageT23=$_____ImageT.3                                    #
                                        #    $Z             set       _____ImageT3=$xiirc/MAND.d2.2                                   #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.d2                                    #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   XBG_D     -1.0                                                            #
                                        #    $c   #define   XBG_A     +0.22261270                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   XHD_D     +1.0                                                            #
                                        #    $c   #define   XHD_A     +0.22261272                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   YBG_D     -1.0                                                            #
                                        #    $c   #define   YBG_A     +0.21514812                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   YHD_D     +1.0                                                            #
                                        #    $c   #define   YHD_A     +0.21514814                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   J1__D     +1.0                                                            #
                                        #    $c   #define   J1__A     +0.39999998                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   J2__D     0                                                               #
                                        #    $c   #define   J2__A     +0.40000002                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   PRECISION 1e-7                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   BA(o,e,l) (((1-(l))*(o))+(((l)-0)*(e)))                                   #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    pow();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             double    rapport=pow(PRECISION,1.0/((double)(N-N0)));                    #
                                        #    $c                                                                                       #
                                        #    $c             double    xbg=XBG_D;                                                      #
                                        #    $c             double    xhd=XHD_D;                                                      #
                                        #    $c             double    ybg=YBG_D;                                                      #
                                        #    $c             double    yhd=YHD_D;                                                      #
                                        #    $c             double    j1_=J1__D;                                                      #
                                        #    $c             double    j2_=J2__D;                                                      #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("$DELETE             $xTV/COMPOSANTE_J\n");              #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/valeurs_inte$X                      #
                                        #    $c                                      p=$cPremiere d=$cDerniere                        #
                                        #    $c                                      vD=%.8f vA=%.8f                                  #
                                        #    $c                                      cubique=FAUX                                     #
                                        #    $c                                                     > $xTV/COMPOSANTE_J\n"            #
                                        #    $c                             ,j1_,j2_                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=15                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=+0.1                                           #
                                        #    $c                                      exposant=2                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=%.8f xhd=%.8f ybg=%.8f yhd=%.8f              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      pTheta=2    pPhi=2                               #
                                        #    $c                                      tTheta=$pi  tPhi=$pi                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,xbg,xhd                                                  #
                                        #    $c                             ,ybg,yhd                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       xbg=BA(xbg,XBG_A,1-rapport);                                    #
                                        #    $c                       xhd=BA(xhd,XHD_A,1-rapport);                                    #
                                        #    $c                       ybg=BA(ybg,YBG_A,1-rapport);                                    #
                                        #    $c                       yhd=BA(yhd,YHD_A,1-rapport);                                    #
                                        #    $c                       j1_=BA(j1_,J1__A,1-rapport);                                    #
                                        #    $c                       j2_=BA(j2_,J2__A,1-rapport);                                    #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.d2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.d2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0008%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0009%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0010%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0011%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0012%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0013%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0014%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0015%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT2.0016%s                                            #
                                        #                                                                                             #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0008%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0009%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0010%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0011%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0012%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0013%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0014%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0015%s                                            #
                                        #    $Z   execRVB   $DELETE   $_____ImageT3.0016%s                                            #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_d2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose un zoom sur 'v $xiirc/MAND.Z2.1' et 'v $xiirc/MAND.Z2.2', mais      #
                                        # en fait pas tres interessant au dela de la septieme image car alors se forment des sortes   #
                                        # nappes uniformes sur la troisieme dimension...                                              #
v         $xiac/MAND.l2.1$R16
v         $xiac/MAND.l2.2$R16

v         $xiirc/MAND.l2.1.0001
v         $xiirc/MAND.l2.1.0002
v         $xiirc/MAND.l2.1.0003
v         $xiirc/MAND.l2.1.0004
v         $xiirc/MAND.l2.1.0005
v         $xiirc/MAND.l2.1.0006
v         $xiirc/MAND.l2.1.0007
v         $xiirc/MAND.l2.1.0008
v         $xiirc/MAND.l2.1.0009
v         $xiirc/MAND.l2.1.0010
v         $xiirc/MAND.l2.1.0011
v         $xiirc/MAND.l2.1.0012
v         $xiirc/MAND.l2.1.0013
v         $xiirc/MAND.l2.1.0014
v         $xiirc/MAND.l2.1.0015
v         $xiirc/MAND.l2.1.0016

Pal ;     anim3     A=$xiirc/MAND.l2.1. premiere=1 derniere=16

v         $xiirc/MAND.l2.2.0001
v         $xiirc/MAND.l2.2.0002
v         $xiirc/MAND.l2.2.0003
v         $xiirc/MAND.l2.2.0004
v         $xiirc/MAND.l2.2.0005
v         $xiirc/MAND.l2.2.0006
v         $xiirc/MAND.l2.2.0007
v         $xiirc/MAND.l2.2.0008
v         $xiirc/MAND.l2.2.0009
v         $xiirc/MAND.l2.2.0010
v         $xiirc/MAND.l2.2.0011
v         $xiirc/MAND.l2.2.0012
v         $xiirc/MAND.l2.2.0013
v         $xiirc/MAND.l2.2.0014
v         $xiirc/MAND.l2.2.0015
v         $xiirc/MAND.l2.2.0016

Pal ;     anim3     A=$xiirc/MAND.l2.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "belleville"-) par :                                             #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_l2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.l1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xiirc/MAND.l2.1                                   #
                                        #    $Z             set       _____ImageT=$xTV/MAND.l2                                        #
                                        #    $Z             set       _____ImageT22=$_____ImageT.2                                    #
                                        #    $Z             set       _____ImageT23=$_____ImageT.3                                    #
                                        #    $Z             set       _____ImageT3=$xiirc/MAND.l2.2                                   #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.l2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.085 vA=0                                     \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    3.14159265358979312                                             #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=20                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=-1.1 ybg=-1.1 xhd=+1.1 yhd=+1.1              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      eRho=8                                           #
                                        #    $c                                      pTheta=8      pPhi=8                             #
                                        #    $c                                      tTheta=0      tPhi=0                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      ROTATION_OY=%f                                   #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,angle                                                    #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.l2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.l2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_l2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MAND.k2.1' et        #
                                        # de 'v $xiirc/MAND.k2.2'.                                                                    #
v         $xiac/MAND.m2.1$R16
v         $xiac/MAND.m2.2$R16

v         $xiirc/MAND.m2.1.0001
v         $xiirc/MAND.m2.1.0002
v         $xiirc/MAND.m2.1.0003
v         $xiirc/MAND.m2.1.0004
v         $xiirc/MAND.m2.1.0005
v         $xiirc/MAND.m2.1.0006
v         $xiirc/MAND.m2.1.0007
v         $xiirc/MAND.m2.1.0008
v         $xiirc/MAND.m2.1.0009
v         $xiirc/MAND.m2.1.0010
v         $xiirc/MAND.m2.1.0011
v         $xiirc/MAND.m2.1.0012
v         $xiirc/MAND.m2.1.0013
v         $xiirc/MAND.m2.1.0014
v         $xiirc/MAND.m2.1.0015
v         $xiirc/MAND.m2.1.0016

Pal ;     anim3     A=$xiirc/MAND.m2.1. premiere=1 derniere=16

v         $xiirc/MAND.m2.2.0001
v         $xiirc/MAND.m2.2.0002
v         $xiirc/MAND.m2.2.0003
v         $xiirc/MAND.m2.2.0004
v         $xiirc/MAND.m2.2.0005
v         $xiirc/MAND.m2.2.0006
v         $xiirc/MAND.m2.2.0007
v         $xiirc/MAND.m2.2.0008
v         $xiirc/MAND.m2.2.0009
v         $xiirc/MAND.m2.2.0010
v         $xiirc/MAND.m2.2.0011
v         $xiirc/MAND.m2.2.0012
v         $xiirc/MAND.m2.2.0013
v         $xiirc/MAND.m2.2.0014
v         $xiirc/MAND.m2.2.0015
v         $xiirc/MAND.m2.2.0016

Pal ;     anim3     A=$xiirc/MAND.m2.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_m2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.m1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT=$xTV/MAND.m2                                        #
                                        #    $Z             set       _____ImageT2=$xiirc/MAND.m2.1                                   #
                                        #    $Z             set       _____ImageT22=$_____ImageT.2                                    #
                                        #    $Z             set       _____ImageT23=$_____ImageT.3                                    #
                                        #    $Z             set       _____ImageT3=$xiirc/MAND.m2.2                                   #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.m2                                    #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   XBG_D     -1.0                                                            #
                                        #    $c   #define   XBG_A     -0.045609                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   XHD_D     +1.0                                                            #
                                        #    $c   #define   XHD_A     -0.045607                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   YBG_D     -1.0                                                            #
                                        #    $c   #define   YBG_A     -0.362768                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   YHD_D     +1.0                                                            #
                                        #    $c   #define   YHD_A     -0.362766                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   J1__D     +1.085                                                          #
                                        #    $c   #define   J1__A     +0.799992                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   J2__D     0                                                               #
                                        #    $c   #define   J2__A     +0.799994                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   PRECISION 1e-7                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   BA(o,e,l) (((1-(l))*(o))+(((l)-0)*(e)))                                   #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    pow();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             double    rapport=pow(PRECISION,1.0/((double)(N-N0)));                    #
                                        #    $c                                                                                       #
                                        #    $c             double    xbg=XBG_D;                                                      #
                                        #    $c             double    xhd=XHD_D;                                                      #
                                        #    $c             double    ybg=YBG_D;                                                      #
                                        #    $c             double    yhd=YHD_D;                                                      #
                                        #    $c             double    j1_=J1__D;                                                      #
                                        #    $c             double    j2_=J2__D;                                                      #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("$DELETE             $xTV/COMPOSANTE_J\n");              #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/valeurs_inte$X                      #
                                        #    $c                                      p=$cPremiere d=$cDerniere                        #
                                        #    $c                                      vD=%.8f vA=%.8f                                  #
                                        #    $c                                      cubique=FAUX                                     #
                                        #    $c                                                     > $xTV/COMPOSANTE_J\n"            #
                                        #    $c                             ,j1_,j2_                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=20                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=%.8f xhd=%.8f ybg=%.8f yhd=%.8f              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      eRho=8                                           #
                                        #    $c                                      pTheta=8      pPhi=8                             #
                                        #    $c                                      tTheta=0      tPhi=0                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,xbg,xhd                                                  #
                                        #    $c                             ,ybg,yhd                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       xbg=BA(xbg,XBG_A,1-rapport);                                    #
                                        #    $c                       xhd=BA(xhd,XHD_A,1-rapport);                                    #
                                        #    $c                       ybg=BA(ybg,YBG_A,1-rapport);                                    #
                                        #    $c                       yhd=BA(yhd,YHD_A,1-rapport);                                    #
                                        #    $c                       j1_=BA(j1_,J1__A,1-rapport);                                    #
                                        #    $c                       j2_=BA(j2_,J2__A,1-rapport);                                    #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.m2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.m2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_m2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose un zoom sur 'v $xiirc/MAND.k2.1' et 'v $xiirc/MAND.k2.2'.           #
v         $xiac/MAND.n2.1$R16
v         $xiac/MAND.n2.2$R16

v         $xiirc/MAND.n2.1.0001
v         $xiirc/MAND.n2.1.0002
v         $xiirc/MAND.n2.1.0003
v         $xiirc/MAND.n2.1.0004
v         $xiirc/MAND.n2.1.0005
v         $xiirc/MAND.n2.1.0006
v         $xiirc/MAND.n2.1.0007
v         $xiirc/MAND.n2.1.0008
v         $xiirc/MAND.n2.1.0009
v         $xiirc/MAND.n2.1.0010
v         $xiirc/MAND.n2.1.0011
v         $xiirc/MAND.n2.1.0012
v         $xiirc/MAND.n2.1.0013
v         $xiirc/MAND.n2.1.0014
v         $xiirc/MAND.n2.1.0015
v         $xiirc/MAND.n2.1.0016

Pal ;     anim3     A=$xiirc/MAND.n2.1. premiere=1 derniere=16

v         $xiirc/MAND.n2.2.0001
v         $xiirc/MAND.n2.2.0002
v         $xiirc/MAND.n2.2.0003
v         $xiirc/MAND.n2.2.0004
v         $xiirc/MAND.n2.2.0005
v         $xiirc/MAND.n2.2.0006
v         $xiirc/MAND.n2.2.0007
v         $xiirc/MAND.n2.2.0008
v         $xiirc/MAND.n2.2.0009
v         $xiirc/MAND.n2.2.0010
v         $xiirc/MAND.n2.2.0011
v         $xiirc/MAND.n2.2.0012
v         $xiirc/MAND.n2.2.0013
v         $xiirc/MAND.n2.2.0014
v         $xiirc/MAND.n2.2.0015
v         $xiirc/MAND.n2.2.0016

Pal ;     anim3     A=$xiirc/MAND.n2.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "belleville"-) par :                                             #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_n2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.n1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT=$xTV/MAND.n2                                        #
                                        #    $Z             set       _____ImageT2=$xiirc/MAND.n2.1                                   #
                                        #    $Z             set       _____ImageT22=$_____ImageT.2                                    #
                                        #    $Z             set       _____ImageT23=$_____ImageT.3                                    #
                                        #    $Z             set       _____ImageT3=$xiirc/MAND.n2.2                                   #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.n2                                    #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   XBG_D     -1.0                                                            #
                                        #    $c   #define   XBG_A     -0.02900000                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   XHD_D     +1.0                                                            #
                                        #    $c   #define   XHD_A     -0.02880000                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   YBG_D     -1.0                                                            #
                                        #    $c   #define   YBG_A     -0.35110000                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   YHD_D     +1.0                                                            #
                                        #    $c   #define   YHD_A     -0.35090000                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   J1__D     +1.085                                                          #
                                        #    $c   #define   J1__A     +0.80020000                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   J2__D     0                                                               #
                                        #    $c   #define   J2__A     +0.80000000                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   PRECISION 1e-4                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   BA(o,e,l) (((1-(l))*(o))+(((l)-0)*(e)))                                   #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    pow();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             double    rapport=pow(PRECISION,1.0/((double)(N-N0)));                    #
                                        #    $c                                                                                       #
                                        #    $c             double    xbg=XBG_D;                                                      #
                                        #    $c             double    xhd=XHD_D;                                                      #
                                        #    $c             double    ybg=YBG_D;                                                      #
                                        #    $c             double    yhd=YHD_D;                                                      #
                                        #    $c             double    j1_=J1__D;                                                      #
                                        #    $c             double    j2_=J2__D;                                                      #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("$DELETE             $xTV/COMPOSANTE_J\n");              #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/valeurs_inte$X                      #
                                        #    $c                                      p=$cPremiere d=$cDerniere                        #
                                        #    $c                                      vD=%.8f vA=%.8f                                  #
                                        #    $c                                      cubique=FAUX                                     #
                                        #    $c                                                     > $xTV/COMPOSANTE_J\n"            #
                                        #    $c                             ,j1_,j2_                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=20                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=0                                              #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=%.8f xhd=%.8f ybg=%.8f yhd=%.8f              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      eRho=8                                           #
                                        #    $c                                      pTheta=8      pPhi=8                             #
                                        #    $c                                      tTheta=0      tPhi=0                             #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,xbg,xhd                                                  #
                                        #    $c                             ,ybg,yhd                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       xbg=BA(xbg,XBG_A,1-rapport);                                    #
                                        #    $c                       xhd=BA(xhd,XHD_A,1-rapport);                                    #
                                        #    $c                       ybg=BA(ybg,YBG_A,1-rapport);                                    #
                                        #    $c                       yhd=BA(yhd,YHD_A,1-rapport);                                    #
                                        #    $c                       j1_=BA(j1_,J1__A,1-rapport);                                    #
                                        #    $c                       j2_=BA(j2_,J2__A,1-rapport);                                    #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.n2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.n2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_n2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose un zoom sur 'v $xiirc/MAND.k2.1' et 'v $xiirc/MAND.k2.2'.           #
v         $xiac/MAND.r2.1$R16
v         $xiac/MAND.r2.2$R16

v         $xiirc/MAND.r2.1.0001
v         $xiirc/MAND.r2.1.0002
v         $xiirc/MAND.r2.1.0003
v         $xiirc/MAND.r2.1.0004
v         $xiirc/MAND.r2.1.0005
v         $xiirc/MAND.r2.1.0006
v         $xiirc/MAND.r2.1.0007
v         $xiirc/MAND.r2.1.0008
v         $xiirc/MAND.r2.1.0009
v         $xiirc/MAND.r2.1.0010
v         $xiirc/MAND.r2.1.0011
v         $xiirc/MAND.r2.1.0012
v         $xiirc/MAND.r2.1.0013
v         $xiirc/MAND.r2.1.0014
v         $xiirc/MAND.r2.1.0015
v         $xiirc/MAND.r2.1.0016

Pal ;     anim3     A=$xiirc/MAND.r2.1. premiere=1 derniere=16

v         $xiirc/MAND.r2.2.0001
v         $xiirc/MAND.r2.2.0002
v         $xiirc/MAND.r2.2.0003
v         $xiirc/MAND.r2.2.0004
v         $xiirc/MAND.r2.2.0005
v         $xiirc/MAND.r2.2.0006
v         $xiirc/MAND.r2.2.0007
v         $xiirc/MAND.r2.2.0008
v         $xiirc/MAND.r2.2.0009
v         $xiirc/MAND.r2.2.0010
v         $xiirc/MAND.r2.2.0011
v         $xiirc/MAND.r2.2.0012
v         $xiirc/MAND.r2.2.0013
v         $xiirc/MAND.r2.2.0014
v         $xiirc/MAND.r2.2.0015
v         $xiirc/MAND.r2.2.0016

Pal ;     anim3     A=$xiirc/MAND.r2.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "villiers"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_r2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MAND.l1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xiirc/MAND.r2.1                                   #
                                        #    $Z             set       _____ImageT=$xTV/MAND.r2                                        #
                                        #    $Z             set       _____ImageT22=$_____ImageT.2                                    #
                                        #    $Z             set       _____ImageT23=$_____ImageT.3                                    #
                                        #    $Z             set       _____ImageT3=$xiirc/MAND.r2.2                                   #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.r2                                    #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/COMPOSANTE_J                                     #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+1.085 vA=0                                     \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/COMPOSANTE_J               #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   XBG_D     -1.1                                                            #
                                        #    $c   #define   XBG_A     -0.822                                                          #
                                        #    $c                                                                                       #
                                        #    $c   #define   XHD_D     +1.1                                                            #
                                        #    $c   #define   XHD_A     +0.822                                                          #
                                        #    $c                                                                                       #
                                        #    $c   #define   YBG_D     -1.1                                                            #
                                        #    $c   #define   YBG_A     -0.822                                                          #
                                        #    $c                                                                                       #
                                        #    $c   #define   YHD_D     +1.1                                                            #
                                        #    $c   #define   YHD_A     +0.822                                                          #
                                        #    $c                                                                                       #
                                        #    $c   #define   PRECIS_1  1e-1                                                            #
                                        #    $c   #define   PRECIS_2  2e-1                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   K0___     0                                                               #
                                        #    $c   #define   KN___     0.88                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   BA(o,e,l) (((1-(l))*(o))+(((l)-0)*(e)))                                   #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    pow();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             double    rapport_1=pow(PRECIS_1,1.0/((double)(N-N0)));                   #
                                        #    $c             double    rapport_2=pow(PRECIS_2,1.0/((double)(N-N0)));                   #
                                        #    $c                                                                                       #
                                        #    $c             double    xbg=XBG_D;                                                      #
                                        #    $c             double    xhd=XHD_D;                                                      #
                                        #    $c             double    ybg=YBG_D;                                                      #
                                        #    $c             double    yhd=YHD_D;                                                      #
                                        #    $c                                                                                       #
                                        #    $c             double    k__=K0___;                                                      #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=20                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=%.2f                                           #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=%.3f   ybg=%.3f   xhd=%.3f   yhd=%.3f        #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      eRho=8                                           #
                                        #    $c                                      pTheta=8    pPhi=8    pAlpha=8                   #
                                        #    $c                                      tTheta=0    tPhi=0    tAlpha=0                   #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,k__                                                      #
                                        #    $c                             ,xbg,ybg                                                  #
                                        #    $c                             ,xhd,yhd                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       xbg=BA(xbg,XBG_A,1-rapport_1);                                  #
                                        #    $c                       xhd=BA(xhd,XHD_A,1-rapport_1);                                  #
                                        #    $c                       ybg=BA(ybg,YBG_A,1-rapport_1);                                  #
                                        #    $c                       yhd=BA(yhd,YHD_A,1-rapport_1);                                  #
                                        #    $c                                                                                       #
                                        #    $c                       k__=BA(k__,KN___,1-rapport_2);                                  #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.r2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MAND.r2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_r2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une interpolation entre 'v $xiirc/MAND.k2.2' et                     #
                                        # 'v $xiirc/MAND.p2.2'.                                                                       #
                                        #                                                                                             #
                                        # On notera que les valeurs d'arrivee {{xbg,ybg},{xhd,yhd}} et de 'K' sont respectivement     #
                                        # {{-0.822,-0.822},{+0.822,+0.822}} et 0.88 respectivement et non pas {{-0.85,-0.85},         #
                                        # {{-0.85,-0.85},{+0.85,+0.85}} et 0.7 a cause de l'interpolation par 'BA(...)'. Ainsi        #
                                        # on atteint en fait les valeurs {{-0.85,-0.85},{+0.85,+0.85}} et 0.7 a la derniere           #
                                        # iteration...                                                                                #
v         $xiac/MAND.s12$R16            p=$xiP/nuages.02
v         $xiac/MAND.s12$R64            p=$xiP/nuages.02
                                        # Donne la texture tridimensionnelle de 'v $xiirc/MAND.s1.2' et 'v $xiirc/MAND.s2.2'.         #
v         $xiac/MAND.w12$R16            p=$xiP/fract.02$Fi
v         $xiac/MAND.w12$R64            p=$xiP/fract.02$Fi
                                        # Donne la texture tridimensionnelle de 'v $xiirc/MAND.w1.2' et 'v $xiirc/MAND.w2.2'.         #
v         $xiac/MAND.x2.2$R04           p=$xiP/cercle.35
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_x2_2_R04:                                                              #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=4                                                      #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             #define   ITER      1                                                     #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/mandel.01$X               #
                                        #    $c                                                     iterations=%d                     #
                                        #    $c                                                     arguments=FAUX                    #
                                        #    $c                                                     images=1                          #
                                        #    $c                                                     R=$xTV/MAND.1.                    #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,(n-N0)+ITER                                    #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$CP                                           #
                                        #    $c                                                     $xTV/MAND.1.%04d                  #
                                        #    $c                                                     $xTV/MAND.1.%04d\n"               #
                                        #    $c                                       ,N0-N0,n                                        #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_04$X A=$xTV/MAND.1.                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/MAND.x2.2$R04                              \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_x2_2_R04:                                                                #
                                        #                                                                                             #
v         $xiac/MAND.x2.2$R16           p=$xiP/cercle.35
                                        # Generee (sur '$LACT18') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MAND_x2_2_R16:                                                              #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             #define   ITER      1                                                     #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/mandel.01$X               #
                                        #    $c                                                     iterations=%d                     #
                                        #    $c                                                     arguments=FAUX                    #
                                        #    $c                                                     images=1                          #
                                        #    $c                                                     R=$xTV/MAND.1.                    #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,(n-N0)+ITER                                    #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$CP                                           #
                                        #    $c                                                     $xTV/MAND.1.%04d                  #
                                        #    $c                                                     $xTV/MAND.1.%04d\n"               #
                                        #    $c                                       ,N0-N0,n                                        #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_16$X A=$xTV/MAND.1.                                     \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 calculer=VRAI                                      \  #
                                        #    $Z                                 R=$xiac/MAND.x2.2$R16                              \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_MAND_x2_2_R16:                                                                #
                                        #                                                                                             #

v         $xiac/MANE.22.1$R16
v         $xiac/MANE.22.2$R16

v         $xiirc/MANE.22.1.0001
v         $xiirc/MANE.22.1.0002
v         $xiirc/MANE.22.1.0003
v         $xiirc/MANE.22.1.0004
v         $xiirc/MANE.22.1.0005
v         $xiirc/MANE.22.1.0006
v         $xiirc/MANE.22.1.0007
v         $xiirc/MANE.22.1.0008
v         $xiirc/MANE.22.1.0009
v         $xiirc/MANE.22.1.0010
v         $xiirc/MANE.22.1.0011
v         $xiirc/MANE.22.1.0012
v         $xiirc/MANE.22.1.0013
v         $xiirc/MANE.22.1.0014
v         $xiirc/MANE.22.1.0015
v         $xiirc/MANE.22.1.0016

Pal ;     anim3     A=$xiirc/MANE.22.1. premiere=1 derniere=16

v         $xiirc/MANE.22.2.0001
v         $xiirc/MANE.22.2.0002
v         $xiirc/MANE.22.2.0003
v         $xiirc/MANE.22.2.0004
v         $xiirc/MANE.22.2.0005
v         $xiirc/MANE.22.2.0006
v         $xiirc/MANE.22.2.0007
v         $xiirc/MANE.22.2.0008
v         $xiirc/MANE.22.2.0009
v         $xiirc/MANE.22.2.0010
v         $xiirc/MANE.22.2.0011
v         $xiirc/MANE.22.2.0012
v         $xiirc/MANE.22.2.0013
v         $xiirc/MANE.22.2.0014
v         $xiirc/MANE.22.2.0015
v         $xiirc/MANE.22.2.0016

Pal ;     anim3     A=$xiirc/MANE.22.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_22:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MANE.21                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT=$xTV/MANE.22                                        #
                                        #    $Z             set       _____ImageT2=$xiirc/MANE.22.1                                   #
                                        #    $Z             set       _____ImageT22=$_____ImageT.2                                    #
                                        #    $Z             set       _____ImageT23=$_____ImageT.3                                    #
                                        #    $Z             set       _____ImageT3=$xiirc/MANE.22.2                                   #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.22                                    #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   XBG_D     -0.85                                                           #
                                        #    $c   #define   XBG_A     +0.096327                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   XHD_D     +0.85                                                           #
                                        #    $c   #define   XHD_A     +0.098327                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   YBG_D     -0.85                                                           #
                                        #    $c   #define   YBG_A     -0.437969                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   YHD_D     +0.85                                                           #
                                        #    $c   #define   YHD_A     -0.435969                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   J1__D     +0.820                                                          #
                                        #    $c   #define   J1__A     +0.42043118                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   J2__D     0                                                               #
                                        #    $c   #define   J2__A     +0.40795553                                                     #
                                        #    $c                                                                                       #
                                        #    $c   #define   PRECISION 1e-3                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   BA(o,e,l) (((1-(l))*(o))+(((l)-0)*(e)))                                   #
                                        #    $c                                                                                       #
                                        #    $c   extern    double    pow();                                                          #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c             double    rapport=pow(PRECISION,1.0/((double)(N-N0)));                    #
                                        #    $c                                                                                       #
                                        #    $c             double    xbg=XBG_D;                                                      #
                                        #    $c             double    xhd=XHD_D;                                                      #
                                        #    $c             double    ybg=YBG_D;                                                      #
                                        #    $c             double    yhd=YHD_D;                                                      #
                                        #    $c             double    j1_=J1__D;                                                      #
                                        #    $c             double    j2_=J2__D;                                                      #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("$DELETE             $xTV/COMPOSANTE_J\n");              #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/valeurs_inte$X                      #
                                        #    $c                                      p=$cPremiere d=$cDerniere                        #
                                        #    $c                                      vD=%.8f vA=%.8f                                  #
                                        #    $c                                      cubique=FAUX                                     #
                                        #    $c                                                     > $xTV/COMPOSANTE_J\n"            #
                                        #    $c                             ,j1_,j2_                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xrc/mandel.41$X                         #
                                        #    $c                                      images=$Nimages                                  #
                                        #    $c                                      iterations=20                                    #
                                        #    $c                                      COMPOSANTE_J=$xTV/COMPOSANTE_J                   #
                                        #    $c                                      K=+0.7                                           #
                                        #    $c                                      exposant=1                                       #
                                        #    $c                                      fenetres_depart_arrivee_identiques=VRAI          #
                                        #    $c                                      xbg=%.8f xhd=%.8f ybg=%.8f yhd=%.8f              #
                                        #    $c                                      produit_non_theorique=VRAI                       #
                                        #    $c                                      eRho=8                                           #
                                        #    $c                                      pTheta=8    pPhi=8    pAlpha=8                   #
                                        #    $c                                      tTheta=0    tPhi=0    tAlpha=0                   #
                                        #    $c                                      visualiser_appartenance=VRAI                     #
                                        #    $c                                      R=$_____ImageT1.                                 #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                             ,xbg,xhd                                                  #
                                        #    $c                             ,ybg,yhd                                                  #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=0 pY=0 pZ=1                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=1 pY=0 pZ=0'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=0                          #
                                        #    $c                                                R=$_____ImageT%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       xbg=BA(xbg,XBG_A,1-rapport);                                    #
                                        #    $c                       xhd=BA(xhd,XHD_A,1-rapport);                                    #
                                        #    $c                       ybg=BA(ybg,YBG_A,1-rapport);                                    #
                                        #    $c                       yhd=BA(yhd,YHD_A,1-rapport);                                    #
                                        #    $c                       j1_=BA(j1_,J1__A,1-rapport);                                    #
                                        #    $c                       j2_=BA(j2_,J2__A,1-rapport);                                    #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/MANE.22.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/MANE.22.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_22:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose un zoom sur 'v $xiirc/MAND.q1.2'.                                   #
v         $xiac/MANE.41$R16             p=$xiP/trou_noir.D4
v         $xiac/MANE.41$R64             p=$xiP/trou_noir.D4
                                        # Donne la texture tridimensionnelle de 'v $xiirc/MANE.41.2'.                                 #
v         $xiac/MANE.81$R16
v         $xiac/MANE.81.1$R16
v         $xiac/MANE.81.2$R16
v         $xiac/MANE.81.2.1$R16

v         $xiirc/MANE.81.2.0001
v         $xiirc/MANE.81.2.0002
v         $xiirc/MANE.81.2.0003
v         $xiirc/MANE.81.2.0004
v         $xiirc/MANE.81.2.0005
v         $xiirc/MANE.81.2.0006
v         $xiirc/MANE.81.2.0007
v         $xiirc/MANE.81.2.0008
v         $xiirc/MANE.81.2.0009
v         $xiirc/MANE.81.2.0010
v         $xiirc/MANE.81.2.0011
v         $xiirc/MANE.81.2.0012
v         $xiirc/MANE.81.2.0013
v         $xiirc/MANE.81.2.0014
v         $xiirc/MANE.81.2.0015
v         $xiirc/MANE.81.2.0016

Pal ;     anim3     A=$xiirc/MANE.81.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_81:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MANE.81                                       #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/param.81                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=0.80131489 vA=0.79628076                        \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/param.81                   #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.41$X                                                       \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=20                                      \  #
                                        #    $Z                                 COMPOSANTE_J=$xTV/param.81                         \  #
                                        #    $Z                                 K=0                                                \  #
                                        #    $Z                                 exposant=1                                         \  #
                                        #    $Z                                 fenetres_depart_arrivee_identiques=VRAI            \  #
                                        #    $Z                                 xbg=-0.04403889 xhd=-0.03475372                    \  #
                                        #    $Z                                 ybg=-0.36672577 yhd=-0.35744060                    \  #
                                        #    $Z                                 produit_non_theorique=VRAI                         \  #
                                        #    $Z                                 eRho=8                                             \  #
                                        #    $Z                                 pTheta=8  pPhi=8    pAlpha=1                       \  #
                                        #    $Z                                 tTheta=0  tPhi=0    tAlpha=0                       \  #
                                        #    $Z                                 visualiser_appartenance=VRAI                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/param.81                                         #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.3._____U)                 #
                                        #    $Z             set       _____ImageTT=$_____ImageTo                                      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/MANE.81.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/MANE.81                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.81.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.81.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/MANE.81.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_81:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MANE.61.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image. On notera qu'ici la source lumineuse relative  #
                                        # l'ombrage semble tourner de facon identique a celle de l'objet : les ombres portees sont    #
                                        # donc immobiles par rapport a l'objet (l'objet et la source lumineuse tournent ensemble).    #
                                        #                                                                                             #
                                        # ATTENTION : l'ombrage par 'v $xiirc/.MANE.41.3.$U .xci.ombrage.11.X' n'est pas fait a       #
                                        # l'interieur de la boucle 'while(...)', mais une seule fois au prealable et a l'exterieur,   #
                                        # ce qui est en fait incorrect car, en effet pour que les ombres semblent fixes sur l'objet,  #
                                        # alors que ce dernier tourne, il faut que la source lumineuse tourne aussi...                #
v         $xiac/MANE.91$R16
v         $xiac/MANE.91.1$R16
v         $xiac/MANE.91.2$R16
v         $xiac/MANE.91.2.1$R16

v         $xiirc/MANE.91.2.0001
v         $xiirc/MANE.91.2.0002
v         $xiirc/MANE.91.2.0003
v         $xiirc/MANE.91.2.0004
v         $xiirc/MANE.91.2.0005
v         $xiirc/MANE.91.2.0006
v         $xiirc/MANE.91.2.0007
v         $xiirc/MANE.91.2.0008
v         $xiirc/MANE.91.2.0009
v         $xiirc/MANE.91.2.0010
v         $xiirc/MANE.91.2.0011
v         $xiirc/MANE.91.2.0012
v         $xiirc/MANE.91.2.0013
v         $xiirc/MANE.91.2.0014
v         $xiirc/MANE.91.2.0015
v         $xiirc/MANE.91.2.0016

Pal ;     anim3     A=$xiirc/MANE.91.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_91:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/MANE.91                                       #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/param.91                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$cPremiere d=$cDerniere                          \  #
                                        #    $Z                                 vD=+0.820 vA=0                                     \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xTV/param.91                   #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.41$X                                                       \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 iterations=20                                      \  #
                                        #    $Z                                 COMPOSANTE_J=$xTV/param.91                         \  #
                                        #    $Z                                 K=+0.7                                             \  #
                                        #    $Z                                 exposant=1                                         \  #
                                        #    $Z                                 fenetres_depart_arrivee_identiques=VRAI            \  #
                                        #    $Z                                 xbg=-0.85 ybg=-0.85 xhd=+0.85 yhd=+0.85            \  #
                                        #    $Z                                 produit_non_theorique=VRAI                         \  #
                                        #    $Z                                 eRho=8                                             \  #
                                        #    $Z                                 pTheta=8    pPhi=8    pAlpha=8                     \  #
                                        #    $Z                                 tTheta=0    tPhi=0    tAlpha=0                     \  #
                                        #    $Z                                 visualiser_appartenance=VRAI                       \  #
                                        #    $Z                                 R=$_____ImageT1.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE             $xTV/param.91                                         #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.3._____U)                 #
                                        #    $Z             set       _____ImageTT=$_____ImageTo                                      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.1%s   $_____ImageT1.1.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2.1%s $_____ImageT1.2.1.$NImAgE%s    #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/MANE.91.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1                                       #
                                        #    $Z             set       _____animation=$xiac/MANE.91                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.1                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.91.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.91.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2.1                                   #
                                        #    $Z             set       _____animation=$xiac/MANE.91.2.1                                #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_91:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MANE.72.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image. On notera que dans cette rotation,             #
                                        # l'ombrage semble tourner de facon identique a celle de l'objet : les ombres portees sont    #
                                        # donc immobiles par rapport a l'objet (l'objet et la source lumineuse tournent ensemble).    #
                                        #                                                                                             #
                                        # ATTENTION : l'ombrage par 'v $xiirc/.MANE.41.3.$U .xci.ombrage.11.X' n'est pas fait a       #
                                        # l'interieur de la boucle 'while(...)', mais une seule fois au prealable et a l'exterieur,   #
                                        # ce qui est en fait incorrect car, en effet pour que les ombres semblent fixes sur l'objet,  #
                                        # alors que ce dernier tourne, il faut que la source lumineuse tourne aussi...                #
v         $xiac/MANE.C1$R16 p=$xiP/fractal.91
v         $xiac/MANE.C1$R16 p=$xiP/inter.02.11
v         $xiac/MANE.C1$R16 p=$xiP/orange.11

v         $xiirc/MANE.C1.0000
v         $xiirc/MANE.C1.0008
v         $xiirc/MANE.C1.0016
v         $xiirc/MANE.C1.0024
v         $xiirc/MANE.C1.0032
v         $xiirc/MANE.C1.0040
v         $xiirc/MANE.C1.0048
v         $xiirc/MANE.C1.0056
v         $xiirc/MANE.C1.0064
v         $xiirc/MANE.C1.0072
v         $xiirc/MANE.C1.0080
v         $xiirc/MANE.C1.0088
v         $xiirc/MANE.C1.0096
v         $xiirc/MANE.C1.0104
v         $xiirc/MANE.C1.0112
v         $xiirc/MANE.C1.0120

Pal ;     anim1     A=$xiirc/MANE.C1. premiere=0 Zmax=120 pas=8 p=$xiP/fractal.91
Pal ;     anim1     A=$xiirc/MANE.C1. premiere=0 Zmax=120 pas=8 p=$xiP/inter.02.11
Pal ;     anim1     A=$xiirc/MANE.C1. premiere=0 Zmax=120 pas=8 p=$xiP/orange.11

Pal ;     anim3     A=$xiirc/MANE.C1. premiere=0 derniere=120 pas=8
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_C1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             set       LiStE_N=`$xci/nombres$X A="$K_VIDE" p=0 d=127 pas=8 CAL1=FAUX`  #
                                        #    $Z             set       _____ListeNumeros=($LiStE_N)                                    #
                                        #    $Z             set       __________imagesR=$xiirc/MANE.C1                                #
                                        #    $m4            _____include(_____xiirc/.MANE.B1.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$__________imagesR.%04d                          \  #
                                        #    $Z                                 R=$__________imagesR.%04d                          \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set  Premiere=`echo $LiStE_N[1] | $SE -e 's/^0*\(..*\)$/\1/'`             #
                                        #    $Z             set  Derniere=`echo $LiStE_N[$#LiStE_N] | $SE -e 's/^0*\(..*\)$/\1/'`     #
                                        #    $Z             set       _____images=$__________imagesR                                  #
                                        #    $Z             set       _____animation=$xiac/MANE.C1                                    #
                                        #    $Z             SET       _____CalculerR64=$NEXIST                                        #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_16$X                                                    \  #
                                        #    $Z                                 A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 calculer=FAUX pas=8                                \  #
                                        #    $Z                                 R=$_____animation$R16                              \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_C1:                                                                      #
                                        #                                                                                             #
v         $xiac/MANE.O1.2$R16

v         $xiirc/MANE.O1.2.0001
v         $xiirc/MANE.O1.2.0002
v         $xiirc/MANE.O1.2.0003
v         $xiirc/MANE.O1.2.0004
v         $xiirc/MANE.O1.2.0005
v         $xiirc/MANE.O1.2.0006
v         $xiirc/MANE.O1.2.0007
v         $xiirc/MANE.O1.2.0008
v         $xiirc/MANE.O1.2.0009
v         $xiirc/MANE.O1.2.0010
v         $xiirc/MANE.O1.2.0011
v         $xiirc/MANE.O1.2.0012
v         $xiirc/MANE.O1.2.0013
v         $xiirc/MANE.O1.2.0014
v         $xiirc/MANE.O1.2.0015
v         $xiirc/MANE.O1.2.0016

Pal ;     anim3     A=$xiirc/MANE.O1.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_O1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=256                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/MANE.O1                                #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        cPremiere                                             #
                                        #    $c             #define   N         cDerniere                                             #
                                        #    $c                                                                                       #
                                        #    $c             #define   OJ        0.80131489                                            #
                                        #    $c             #define   EJ        0.79828076                                            #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(n-N0))+(OJ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/mandel.81$X   #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               iterations=20           #
                                        #    $c                                                               J=%f                    #
                                        #    $c                                                               K=0                     #
                                        #    $c                                                               S=0                     #
                                        #    $c                                                               T=0                     #
                                        #    $c                                                               U=0                     #
                                        #    $c                                                               V=0                     #
                                        #    $c                                                               exposant=1              #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               xbg=-0.04553889         #
                                        #    $c                                                               xhd=-0.04089630         #
                                        #    $c                                                               ybg=-0.36672577         #
                                        #    $c                                                               yhd=-0.36208318         #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               eRho=8                  #
                                        #    $c                                                               pA1=8     tA1=0         #
                                        #    $c                                                               pA2=8     tA2=0         #
                                        #    $c                                                               pA3=8     tA3=0         #
                                        #    $c                                                               pA4=1     tA4=0         #
                                        #    $c                                                               pA5=1     tA5=0         #
                                        #    $c                                                               pA6=1     tA6=0         #
                                        #    $c                                                               pA7=1     tA7=0         #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               chiffres=0              #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.3._____U)                 #
                                        #    $Z             set       _____ImageTT=$_____ImageTo                                      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/MANE.O1.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.O1.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_O1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MANE.O1.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image. On notera que dans cette rotation,             #
                                        # l'ombrage semble tourner de facon identique a celle de l'objet : les ombres portees sont    #
                                        # donc immobiles par rapport a l'objet (l'objet et la source lumineuse tournent ensemble).    #
                                        #                                                                                             #
                                        # ATTENTION : l'ombrage par 'v $xiirc/.MANE.41.3.$U .xci.ombrage.11.X' n'est pas fait a       #
                                        # l'interieur de la boucle 'while(...)', mais une seule fois au prealable et a l'exterieur,   #
                                        # ce qui est en fait incorrect car, en effet pour que les ombres semblent fixes sur l'objet,  #
                                        # alors que ce dernier tourne, il faut que la source lumineuse tourne aussi...                #
v         $xiac/MANE.O4.1$R16
v         $xiac/MANE.O4.2$R16
v         $xiac/MANE.O4.21$R16
                                        # Generee (sur '$CMAP28' -ex "picpus"-) par :                                                 #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_O4:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=64                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/MANE.O4.1                              #
                                        #    $Z             set       _____ImageT2=$xTV/MANE.O4.2                                     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        cPremiere                                             #
                                        #    $c             #define   N         cDerniere                                             #
                                        #    $c                                                                                       #
                                        #    $c             #define   OJ        0.80131489                                            #
                                        #    $c             #define   EJ        0.79828076                                            #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(n-N0))+(OJ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/mandel.81$X   #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               iterations=20           #
                                        #    $c                                                               J=%f                    #
                                        #    $c                                                               K=0                     #
                                        #    $c                                                               S=0                     #
                                        #    $c                                                               T=0                     #
                                        #    $c                                                               U=0                     #
                                        #    $c                                                               V=0                     #
                                        #    $c                                                               exposant=1              #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               xbg=-0.04553889         #
                                        #    $c                                                               xhd=-0.04089630         #
                                        #    $c                                                               ybg=-0.36672577         #
                                        #    $c                                                               yhd=-0.36208318         #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               eRho=8                  #
                                        #    $c                                                               pA1=8     tA1=0         #
                                        #    $c                                                               pA2=8     tA2=0         #
                                        #    $c                                                               pA3=8     tA3=0         #
                                        #    $c                                                               pA4=1     tA4=0         #
                                        #    $c                                                               pA5=1     tA5=0         #
                                        #    $c                                                               pA6=1     tA6=0         #
                                        #    $c                                                               pA7=1     tA7=0         #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               chiffres=0              #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMeTrEs="$K_VIDE"                                            #
                                        #    $Z             set       PaRaMeTrEs="$PaRaMeTrEs"" premiere=$Premiere"                   #
                                        #    $Z             set       PaRaMeTrEs="$PaRaMeTrEs"" derniere=$Derniere"                   #
                                        #                                                                                             #
                                        #    $Z             set       LNuMeRo=`$xci/nombres$X $PaRaMeTrEs`             #
                                        #    $Z             set       index=1                                                         #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMeTrEs="$PaRaMeTrEs"" vD=-1.0"                              #
                                        #    $Z             set       PaRaMeTrEs="$PaRaMeTrEs"" vA=+1.0"                              #
                                        #    $Z             set       PaRaMeTrEs="$PaRaMeTrEs"" lineaire=VRAI"                        #
                                        #                                                                                             #
                                        #    $Z             set       LSoUrCeX=`$xci/valeurs_inte$X $PaRaMeTrEs`                      #
                                        #                                                                                             #
                                        #    $Z             foreach   NuMeRo ($LNuMeRo)                                               #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.1._____U)       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $Z                       set       _____SourceX=$LSoUrCeX[$index]                        #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #    $Z                       set       _____Speculaire=8                                     #
                                        #    $Z                       set       _____imagesR=$_____ImageT2.$NuMeRo                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z                       execRVB   $xci/format.01$X    A=$_____imagesR.1%s            \  #
                                        #    $Z                                                               $formatI             \  #
                                        #    $Z                                                     mode=2                         \  #
                                        #    $Z                                                     R=$_____ImageT2.1.$NuMeRo%s    \  #
                                        #    $Z                                                               $formatR_Pqu            #
                                        #                                                                                             #
                                        #    $Z                       execRVB   $xci/format.01$X    A=$_____imagesR.2%s            \  #
                                        #    $Z                                                               $formatI             \  #
                                        #    $Z                                                     mode=2                         \  #
                                        #    $Z                                                     R=$_____ImageT2.2.$NuMeRo%s    \  #
                                        #    $Z                                                               $formatR_Pqu            #
                                        #                                                                                             #
                                        #    $Z                       execRVB   $xci/format.01$X    A=$_____imagesR.21%s           \  #
                                        #    $Z                                                               $formatI             \  #
                                        #    $Z                                                     mode=2                         \  #
                                        #    $Z                                                     R=$_____ImageT2.21.$NuMeRo%s   \  #
                                        #    $Z                                                               $formatR_Pqu            #
                                        #                                                                                             #
                                        #    $Z                       @         index = $index + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             Pqu                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2.1                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.O4.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.O4.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2.21                                    #
                                        #    $Z             set       _____animation=$xiac/MANE.O4.21                                 #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_O4:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image correspond a un mouvement de la source lumineuse de la gauche vers la droite,   #
                                        # de 'v $xiirc/MANE.O2.2' a 'v $xiirc/MANE.O3.2'...                                           #
v         $xiac/MANE.R1.2$R16

v         $xiirc/MANE.R1.2.0001
v         $xiirc/MANE.R1.2.0002
v         $xiirc/MANE.R1.2.0003
v         $xiirc/MANE.R1.2.0004
v         $xiirc/MANE.R1.2.0005
v         $xiirc/MANE.R1.2.0006
v         $xiirc/MANE.R1.2.0007
v         $xiirc/MANE.R1.2.0008
v         $xiirc/MANE.R1.2.0009
v         $xiirc/MANE.R1.2.0010
v         $xiirc/MANE.R1.2.0011
v         $xiirc/MANE.R1.2.0012
v         $xiirc/MANE.R1.2.0013
v         $xiirc/MANE.R1.2.0014
v         $xiirc/MANE.R1.2.0015
v         $xiirc/MANE.R1.2.0016

Pal ;     anim3     A=$xiirc/MANE.R1.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_R1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=256                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/MANE.R1                                #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        cPremiere                                             #
                                        #    $c             #define   N         cDerniere                                             #
                                        #    $c                                                                                       #
                                        #    $c             #define   OJ        0.80131489                                            #
                                        #    $c             #define   EJ        0.79828076                                            #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(n-N0))+(OJ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/mandel.81$X   #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               iterations=20           #
                                        #    $c                                                               J=%f                    #
                                        #    $c                                                               K=0                     #
                                        #    $c                                                               S=0                     #
                                        #    $c                                                               T=0                     #
                                        #    $c                                                               U=0                     #
                                        #    $c                                                               V=0                     #
                                        #    $c                                                               exposant=1              #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               xbg=-0.04553889         #
                                        #    $c                                                               xhd=-0.04089630         #
                                        #    $c                                                               ybg=-0.36672577         #
                                        #    $c                                                               yhd=-0.36208318         #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               eRho=8                  #
                                        #    $c                                                               pA1=8     tA1=0         #
                                        #    $c                                                               pA2=8     tA2=0         #
                                        #    $c                                                               pA3=8     tA3=0         #
                                        #    $c                                                               pA4=1     tA4=0         #
                                        #    $c                                                               pA5=1     tA5=0         #
                                        #    $c                                                               pA6=1     tA6=0         #
                                        #    $c                                                               pA7=1     tA7=0         #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               chiffres=0              #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #    $Z             set       _____ImageTT=$_____ImageTo                                      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #    $Z                       set       _____RotationZ=0                                      #
                                        #                                                                                             #
                                        #    $Z                       set       _____ORotationX=$_____RotationX                       #
                                        #    $Z                       set       _____ORotationY=$_____RotationY                       #
                                        #    $Z                       set       _____ORotationZ=$_____RotationZ                       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/MANE.R1.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.R1.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_R1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/MANE.O1.2' et        #
                                        # donne donc 4x3 stereogrammes de cette image. On notera que dans cette rotation,             #
                                        # l'ombrage ne tourne pas comme l'objet : les ombres portees sont donc mobiles par            #
                                        # rapport a l'objet (l'objet tourne, mais pas la source lumineuse).                           #
v         $xiac/MANE.V1.2$R16

v         $xiirc/MANE.V1.2.0001
v         $xiirc/MANE.V1.2.0002
v         $xiirc/MANE.V1.2.0003
v         $xiirc/MANE.V1.2.0004
v         $xiirc/MANE.V1.2.0005
v         $xiirc/MANE.V1.2.0006
v         $xiirc/MANE.V1.2.0007
v         $xiirc/MANE.V1.2.0008
v         $xiirc/MANE.V1.2.0009
v         $xiirc/MANE.V1.2.0010
v         $xiirc/MANE.V1.2.0011
v         $xiirc/MANE.V1.2.0012
v         $xiirc/MANE.V1.2.0013
v         $xiirc/MANE.V1.2.0014
v         $xiirc/MANE.V1.2.0015
v         $xiirc/MANE.V1.2.0016

Pal ;     anim3     A=$xiirc/MANE.V1.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "abbesses"-) par :                                               #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_V1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=256                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/MANE.V1                                #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             SET       PrEciSiOn="precision=0.0002"                                    #
                                        #                                                                                             #
                                        #    $Z             set       OJ_0=1.08800000                                                 #
                                        #    $Z             set       OJ_N=0.80093562                                                 #
                                        #    $Z             set       L_OJs="p=$Premiere d=$Derniere vD=$OJ_0 vA=$OJ_N"               #
                                        #    $Z             set       L_OJs=`$xci/valeurs_bary$X $L_OJs $PrEciSiOn`                   #
                                        #                                                                                             #
                                        #    $Z             set       EJ_0=0.00000000                                                 #
                                        #    $Z             set       EJ_N=0.80093562                                                 #
                                        #    $Z             set       L_EJs="p=$Premiere d=$Derniere vD=$EJ_0 vA=$EJ_N"               #
                                        #    $Z             set       L_EJs=`$xci/valeurs_bary$X $L_EJs $PrEciSiOn`                   #
                                        #                                                                                             #
                                        #    $Z             set       xbg_0=-1.00000000                                               #
                                        #    $Z             set       xbg_N=-0.04129560                                               #
                                        #    $Z             set       L_xbgs="p=$Premiere d=$Derniere vD=$xbg_0 vA=$xbg_N"            #
                                        #    $Z             set       L_xbgs=`$xci/valeurs_bary$X $L_xbgs $PrEciSiOn`                 #
                                        #                                                                                             #
                                        #    $Z             set       xhd_0=+1.00000000                                               #
                                        #    $Z             set       xhd_N=-0.04129560                                               #
                                        #    $Z             set       L_xhds="p=$Premiere d=$Derniere vD=$xhd_0 vA=$xhd_N"            #
                                        #    $Z             set       L_xhds=`$xci/valeurs_bary$X $L_xhds $PrEciSiOn`                 #
                                        #                                                                                             #
                                        #    $Z             set       ybg_0=-1.00000000                                               #
                                        #    $Z             set       ybg_N=-0.36665904                                               #
                                        #    $Z             set       L_ybgs="p=$Premiere d=$Derniere vD=$ybg_0 vA=$ybg_N"            #
                                        #    $Z             set       L_ybgs=`$xci/valeurs_bary$X $L_ybgs $PrEciSiOn`                 #
                                        #                                                                                             #
                                        #    $Z             set       yhd_0=+1.00000000                                               #
                                        #    $Z             set       yhd_N=-0.36665904                                               #
                                        #    $Z             set       L_yhds="p=$Premiere d=$Derniere vD=$yhd_0 vA=$yhd_N"            #
                                        #    $Z             set       L_yhds=`$xci/valeurs_bary$X $L_yhds $PrEciSiOn`                 #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #                                                                                             #
                                        #    $Z                       setenv    _OJ       $L_OJs[$ImAgE]                              #
                                        #    $Z                       setenv    _EJ       $L_EJs[$ImAgE]                              #
                                        #    $Z                       setenv    _xbg      $L_xbgs[$ImAgE]                             #
                                        #    $Z                       setenv    _xhd      $L_xhds[$ImAgE]                             #
                                        #    $Z                       setenv    _ybg      $L_ybgs[$ImAgE]                             #
                                        #    $Z                       setenv    _yhd      $L_yhds[$ImAgE]                             #
                                        #                                                                                             #
                                        #    $Z                       FilSTmpB            FFrAcTaL                                    #
                                        #                                                                                             #
                                        #    $c                       #include  <stdio.h>                                             #
                                        #    $c                                                                                       #
                                        #    $c                       #define   N0        cPremiere                                   #
                                        #    $c                       #define   N         cDerniere                                   #
                                        #    $c                                                                                       #
                                        #    $c                       #define   n_N0      ((double)(n-N0))                            #
                                        #    $c                       #define   N_N0      ((double)(N-N0))                            #
                                        #    $c                                                                                       #
                                        #    $c                       int       main()                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 int       n;                                          #
                                        #    $c                                                                                       #
                                        #    $c                                 for       (n=N0 ; n<=N ; n++)                         #
                                        #    $c                                           {                                           #
                                        #    $c                                           double    lambda=n_N0/N_N0;                 #
                                        #    $c                                                                                       #
                                        #    $c                                           printf("echo      %c$xrc/mandel.81$X        #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               iterations=20           #
                                        #    $c                                                J=`$xcg/BARY.01$X O=$_OJ E=$_EJ L=%f`  #
                                        #    $c                                                               K=0                     #
                                        #    $c                                                               S=0                     #
                                        #    $c                                                               T=0                     #
                                        #    $c                                                               U=0                     #
                                        #    $c                                                               V=0                     #
                                        #    $c                                                               exposant=1              #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               xbg=$_xbg               #
                                        #    $c                                                               xhd=$_xhd               #
                                        #    $c                                                               ybg=$_ybg               #
                                        #    $c                                                               yhd=$_yhd               #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               eRho=8                  #
                                        #    $c                                                               pA1=8     tA1=0         #
                                        #    $c                                                               pA2=8     tA2=0         #
                                        #    $c                                                               pA3=8     tA3=0         #
                                        #    $c                                                               pA4=1     tA4=0         #
                                        #    $c                                                               pA5=1     tA5=0         #
                                        #    $c                                                               pA6=1     tA6=0         #
                                        #    $c                                                               pA7=1     tA7=0         #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               chiffres=0              #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                                 ,'\''                                 #
                                        #    $c                                                 ,lambda                               #
                                        #    $c                                                 ,n                                    #
                                        #    $c                                                 ,'\''                                 #
                                        #    $c                                                  );                                   #
                                        #    $c                                           }                                           #
                                        #    $c                                 }                                                     #
                                        #                                                                                             #
                                        #    $Z                       ro                  $FFrAcTaL                                   #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z                       FilSTmpE            FFrAcTaL                                    #
                                        #                                                                                             #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.2._____U)       #
                                        #    $Z                       set       _____ImageTT=$_____ImageTo                            #
                                        #                                                                                             #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/MANE.V1.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.V1.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_V1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation un zoom de 'v $xiirc/MANE.V1.2' a 'v $xiirc/MANE.U1.2'...                   #
v         $xiac/MANE.d1.2$R16

v         $xiirc/MANE.d1.2.0001
v         $xiirc/MANE.d1.2.0002
v         $xiirc/MANE.d1.2.0003
v         $xiirc/MANE.d1.2.0004
v         $xiirc/MANE.d1.2.0005
v         $xiirc/MANE.d1.2.0006
v         $xiirc/MANE.d1.2.0007
v         $xiirc/MANE.d1.2.0008
v         $xiirc/MANE.d1.2.0009
v         $xiirc/MANE.d1.2.0010
v         $xiirc/MANE.d1.2.0011
v         $xiirc/MANE.d1.2.0012
v         $xiirc/MANE.d1.2.0013
v         $xiirc/MANE.d1.2.0014
v         $xiirc/MANE.d1.2.0015
v         $xiirc/MANE.d1.2.0016

Pdu ;     anim3     A=$xiirc/MANE.d1.2. premiere=1 derniere=16
                                        # Generee (sur '$CMAP28' -ex "robespierre"-) par :                                            #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_d1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=512                                                   #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT2        $xTV/SECTIONS.1                             #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirf/.FRB3.32.2.1._____U)               #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____ImageT2.                                   \  #
                                        #    $Z                                 premiere=$cPremiere derniere=$cDerniere            \  #
                                        #    $Z                                 p=$xiP/trou_noir.E5                                \  #
                                        #    $Z                                 R=$_____ImageT2.                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/MANE.d1                                #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        cPremiere                                             #
                                        #    $c             #define   N         cDerniere                                             #
                                        #    $c                                                                                       #
                                        #    $c             #define   OJ        0.80131489                                            #
                                        #    $c             #define   EJ        0.79828076                                            #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(n-N0))+(OJ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/mandel.81$X   #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               iterations=20           #
                                        #    $c                                                               J=%f                    #
                                        #    $c                                                               K=0                     #
                                        #    $c                                                               S=0                     #
                                        #    $c                                                               T=0                     #
                                        #    $c                                                               U=0                     #
                                        #    $c                                                               V=0                     #
                                        #    $c                                                               exposant=1              #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               xbg=-0.04553889         #
                                        #    $c                                                               xhd=-0.04089630         #
                                        #    $c                                                               ybg=-0.36672577         #
                                        #    $c                                                               yhd=-0.36208318         #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               eRho=8                  #
                                        #    $c                                                               pA1=8     tA1=0         #
                                        #    $c                                                               pA2=8     tA2=0         #
                                        #    $c                                                               pA3=8     tA3=0         #
                                        #    $c                                                               pA4=1     tA4=0         #
                                        #    $c                                                               pA5=1     tA5=0         #
                                        #    $c                                                               pA6=1     tA6=0         #
                                        #    $c                                                               pA7=1     tA7=0         #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               chiffres=0              #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.MANE.41.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.MANE.41.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       execALBUM_Para=FAUX                                             #
                                        #    $Z   execALBUM $cPremiere $cDerniere                                                  \  #
                                        #    $Z             execRVB   $xci/multi_02.01$X                                           \  #
                                        #    $Z                                           A1=$_____ImageTo.%04d                    \  #
                                        #    $Z                                           A2=$_____ImageT2.%04d%%s                 \  #
                                        #    $Z                                           renormaliser=FAUX                        \  #
                                        #    $Z                                           R=$_____ImageTT.%04d%%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       AnGlE0=`calcul -$dpi/16`                                        #
                                        #    $Z             set       AnGlEN=`calcul +$dpi/16`                                        #
                                        #    $Z             set       LAnGlEs="p=$Premiere d=$Derniere vD=$AnGlE0 vA=$AnGlEN"         #
                                        #    $Z             set       LAnGlEs=`$xci/valeurs_inte$X lineaire=VRAI $LAnGlEs`            #
                                        #                                                                                             #
                                        #    $Z             set       ImAgE=$Premiere                                                 #
                                        #                                                                                             #
                                        #    $Z             while     ($ImAgE <= $Derniere)                                           #
                                        #    $Z                       set       _____RotationX=0                                      #
                                        #    $Z                       set       _____RotationY=$LAnGlEs[$ImAgE]                       #
                                        #    $Z                       set       _____RotationZ=0                                      #
                                        #                                                                                             #
                                        #    $Z                       set       _____ORotationX=$_____RotationX                       #
                                        #    $Z                       set       _____ORotationY=$_____RotationY                       #
                                        #    $Z                       set       _____ORotationZ=$_____RotationZ                       #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.3._____U)       #
                                        #                                                                                             #
                                        #    $Z                       set       NImAgE=`$xci/nombres$X p=$ImAgE d=$ImAgE A="$K_VIDE"` #
                                        #    $Z                       set       _____ccXYZ=FAUX                                       #
                                        #    $Z                       set       _____exec_aR="pX=0 pY=0 pZ=0"                         #
                                        #    $Z                       set       _____exec_aV="pX=0 pY=0 pZ=0"                         #
                                        #    $Z                       set       _____exec_aB="pX=0 pY=0 pZ=0"                         #
                                        #    $Z                       set       _____PostfixeT="%s"                                   #
                                        #    $Z                       set       _____imagesR=$_____ImageT1.$NImAgE                    #
                                        #    $m4                      _____include(_____xiirc/.MANE.41.4._____U)       #
                                        #                                                                                             #
                                        #    $Z             execRVB   $MV  $_____ImageT1.$NImAgE.2%s   $_____ImageT1.2.$NImAgE%s      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImageT1.2.$NImAgE%s              \  #
                                        #    $Z                                           R=$xiirc/MANE.d1.2.$NImAgE%s             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z                       @         ImAgE = $ImAgE + 1                                    #
                                        #    $Z             end                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT1.2                                     #
                                        #    $Z             set       _____animation=$xiac/MANE.d1.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_d1:                                                                      #
                                        #                                                                                             #
v         $xiac/MANE.w1$R16             p=$xiP/fract.03$Fi
v         $xiac/MANE.w1$R16             p=$xiP/random.32$Fi
                                        # Generee (sur '$LACT19') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_w1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pqu                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/MANE.w1                                        #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=0                                                      #
                                        #    $Z             set       Derniere=15                                                     #
                                        #    $Z             @         Nimages = $Derniere - $Premiere + 1                             #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.01$X                                                       \  #
                                        #    $Z                                 N=$Nimages                                         \  #
                                        #    $Z                                 iterations=256                                     \  #
                                        #    $Z                                 xbgD=-2.0        ybgD=-1.25                        \  #
                                        #    $Z                                 xhdD=+0.5        yhdD=+1.25                        \  #
                                        #    $Z                                 xbgA=-0.74542955 ybgA=+0.11300805                  \  #
                                        #    $Z                                 xhdA=-0.74542955 yhdA=+0.11300805                  \  #
                                        #    $Z                                 arguments=FAUX                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set                 _____animation=$xiac/MANE.w1                          #
                                        #    $m4            _____include(_____xivPdf_09_2/.LYAP.1.12._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_w1:                                                                      #
                                        #                                                                                             #
v         $xiac/MANE.w2$MPEG
v         $xiac/MANE.w2$R16             p=$xiP/fract.03$Fi
v         $xiac/MANE.w2$R16             p=$xiP/random.32$Fi
                                        # Generee (sur '$LACT1A', puis recaclculee sur '$LACT1B') par :                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_w2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$xTV/MANE.w2                                        #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=0                                                      #
                                        #    $Z             set       Derniere=127                                                    #
                                        #    $Z             @         Nimages = $Derniere - $Premiere + 1                             #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.01$X                                                       \  #
                                        #    $Z                                 N=$Nimages                                         \  #
                                        #    $Z                                 iterations=256                                     \  #
                                        #    $Z                                 xbgD=-2.0        ybgD=-1.25                        \  #
                                        #    $Z                                 xhdD=+0.5        yhdD=+1.25                        \  #
                                        #    $Z                                 xbgA=-0.74542955 ybgA=+0.11300805                  \  #
                                        #    $Z                                 xhdA=-0.74542955 yhdA=+0.11300805                  \  #
                                        #    $Z                                 arguments=FAUX                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set                 _____animation=$xiac/MANE.w2                          #
                                        #    $m4            _____include(_____xivPdf_09_2/.LYAP.1.12._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=$xiP/random.32$Fi                              #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_w2:                                                                      #
                                        #                                                                                             #
v         $xiac/MANE.x1$MPEG
v         $xiac/MANE.x1$R16             p=$xiP/arc_ciel.A1
v         $xiac/MANE.x1$R16             p=$xiP/random.32$Fi
                                        # Generee (sur '$LACT1A', puis recaclculee sur '$LACT1B') par :                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANE_x1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             SETENV    Autoriser_____set_SET        $EXIST                             #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$xTV/MANE.x1                                        #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=0                                                      #
                                        #    $Z             set       Derniere=127                                                    #
                                        #    $Z             @         Nimages = $Derniere - $Premiere + 1                             #
                                        #                                                                                             #
                                        #    $Z             $xrc/mandel.01$X                                                       \  #
                                        #    $Z                                 N=$Nimages                                         \  #
                                        #    $Z                                 iterations=256                                     \  #
                                        #    $Z                                 xbgD=-2.0        ybgD=-1.25                        \  #
                                        #    $Z                                 xhdD=+0.5        yhdD=+1.25                        \  #
                                        #    $Z                                 xbgA=-0.15293    ybgA=+1.03980                     \  #
                                        #    $Z                                 xhdA=-0.15293    yhdA=+1.03980                     \  #
                                        #    $Z                                 arguments=FAUX                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set                 _____animation=$xiac/MANE.x1                          #
                                        #    $m4            _____include(_____xivPdf_09_2/.LYAP.1.12._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             set       _____PaletteMPEG=$xiP/arc_ciel.A1                               #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_MANE_x1:                                                                      #
                                        #                                                                                             #
v         $xiac/MANF.D4.5$R16             p=$xiP/cercle.35
                                        # Generee (sur '$LACT1A') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MANF_D4_5:                                                                  #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____Debut="Debut_listG_MANF_D4_5"                              #
                                        #    $Z             set       _____Fin__="Milieu_listG_MANF_D4_5"                             #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/MANF.D4.5                                  #
                                        #    $m4            _____include(_____xiac/.MANF.D4.5._____U)                  #
                                        #                                                                                             #
                                        #    :Fin_listG_MANF_D4_5:                                                                    #
                                        #                                                                                             #

v         $xiac/MANS.11$R16             p=$xiP/arc_ciel.01
                                        # Genere a partir de :                                                                        #
                                        #                                                                                             #
                                        #                   $xrc/mandel.31$X    Sx=FAUX Sy=VRAI                                    \  #
                                        #                                       images=128 iterations=256                          \  #
                                        #                                       R=...                                              \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        # et :                                                                                        #
                                        #                                                                                             #
                                        #                   $xci/reduction_16$X ...     pas=4 R=$xiac/MANS.11$R16                  \  #
                                        #                                       $formatI                                              #
                                        #                                                                                             #
                                        # Le nom 'MANS' est une contraction de 'MAND' et de 'Symetrique' qui rappelle le processus    #
                                        # de calcul. ATTENTION, je n'ai pas genere de sequence video associee, car en effet, j'ai     #
                                        # programme ce processus suite a un article sur lequel j'ai referre...                        #

v         $xiac/MA.Q0$R16$DROITE        p=$xiP/arc_ciel.01
v         $xiac/MA.Q0$R16$DROITE        p=$xiP/fractal.11
v         $xiac/MA.Q0$R16$DROITE        p=$xiP/gris_oran.01
v         $xiac/MA.Q0$R16$DROITE
v         $xiac/MA.Q0$R64$DROITE        p=$xiP/arc_ciel.01
v         $xiac/MA.Q0$R64$DROITE        p=$xiP/fractal.11
v         $xiac/MA.Q0$R64$DROITE        p=$xiP/gris_oran.01
v         $xiac/MA.Q0$R64$DROITE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 012636_012763                                                #
                                        #                   xivPdf 7 1 / 012764_012891                                                #
                                        #                                                                                             #
v         $xiac/MA.Q0$R16$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/MA.Q0$R16$GAUCHE        p=$xiP/fractal.11
v         $xiac/MA.Q0$R16$GAUCHE        p=$xiP/gris_oran.01
v         $xiac/MA.Q0$R16$GAUCHE
v         $xiac/MA.Q0$R64$GAUCHE        p=$xiP/arc_ciel.01
v         $xiac/MA.Q0$R64$GAUCHE        p=$xiP/fractal.11
v         $xiac/MA.Q0$R64$GAUCHE        p=$xiP/gris_oran.01
v         $xiac/MA.Q0$R64$GAUCHE
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 7 1 / 012892_013019                                                #
                                        #                   xivPdf 7 1 / 013020_013147                                                #
                                        #                                                                                             #
v         $xiac/MA.R3$MP4
v         $xiac/MA.R3$R16
v         $xiac/MA.R3$R64
v         $xiac/MA.R3$N$MP4
v         $xiac/MA.R3$N$R16
v         $xiac/MA.R3$N$R64
v         $xiac/MA.R3$M$MP4
v         $xiac/MA.R3$M$R16
v         $xiac/MA.R3$M$R64

v         $xiirc/MA.R3$M.0001
v         $xiirc/MA.R3$M.0016
v         $xiirc/MA.R3$M.0032
v         $xiirc/MA.R3$M.0048
v         $xiirc/MA.R3$M.0064
v         $xiirc/MA.R3$M.0080
v         $xiirc/MA.R3$M.0096
v         $xiirc/MA.R3$M.0112
v         $xiirc/MA.R3$M.0128
                                        # Generee (sur '$LACT1B') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_R3_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             ext       Pdu                                                             #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=128                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ModulerBrume=$EXIST                                        #
                                        #    $Z             SET       _____ModulationBrume=$xTV/NUAG.1                                #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$xiff/NUAG.1.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/nuages.02                                   \  #
                                        #    $Z                                 R=$_____ModulationBrume.                           \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       _____imagesR=$xTV/MAND.3                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.05                                        #
                                        #    $Z             set       _____Ptexture=$xiP/roug0_jaun0                                  #
                                        #    $Z             set       _____ModulerTexture=$EXIST                                      #
                                        #    $Z             set       _____PourcentageSeuil=49                                        #
                                        #    $Z             set       _____Echelle=0.25                                               #
                                        #    $Z             set       _____Perspective=0.6                                            #
                                        #    $Z             set       _____Ty=0.86                                                    #
                                        #    $Z             set       _____DepthCueing=VRAI                                           #
                                        #    $Z             set       _____MinDepthCueing=0.3                                         #
                                        #    $Z             set       _____Pbrume=$xiP/gris.08                                        #
                                        #    $m4            _____include(_____xiirc/.MAND.3.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.R3                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.R3$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$_____ModulationBrume                               #
                                        #    $Z             set       _____animation=$xiac/MA.R3$N                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/MA.R3$M                                     #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0001%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0001%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0016%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0016%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0032%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0032%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0048%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0048%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0064%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0064%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0080%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0080%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0096%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0096%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0112%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0112%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0128%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0128%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_R3_M:                                                                      #
v         $xiac/MA.S3$MP4
v         $xiac/MA.S3$R16
v         $xiac/MA.S3$R64
v         $xiac/MA.S3$M$MP4
v         $xiac/MA.S3$M$R16
v         $xiac/MA.S3$M$R64

v         $xiirc/MA.R3$M.0321
v         $xiirc/MA.R3$M.0433
v         $xiirc/MA.R3$M.0497
                                        # Generee (sur '$LACT1B') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_MA_S3_M:                                                                    #
                                        #                                                                                             #
                                        #    $Z             ext       Pdu                                                             #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=512                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             SET       _____imagesR=$xTV/MAND.3                                        #
                                        #    $Z             set       _____Pbrume=$xiP/gris.05                                        #
                                        #    $Z             set       _____Ptexture=$xiP/random.A5                                    #
                                        #    $Z             set       _____ModulerTexture=$EXIST                                      #
                                        #    $Z             set       _____PourcentageSeuil=49                                        #
                                        #    $Z             set       _____Echelle=0.25                                               #
                                        #    $Z             set       _____Perspective=0.6                                            #
                                        #    $Z             set       _____Ty=0.86                                                    #
                                        #    $Z             set       _____DepthCueing=VRAI                                           #
                                        #    $Z             set       _____MinDepthCueing=0.2                                         #
                                        #    $Z             set       _____Pbrume=$xiP/gris.08                                        #
                                        #    $m4            _____include(_____xiirc/.MAND.S.11._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$_____imagesT                                       #
                                        #    $Z             set       _____animation=$xiac/MA.S3                                      #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$_____imagesR$M                                     #
                                        #    $Z             set       _____animation=$xiac/MA.S3$M                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xiirc/MA.S3$M                                     #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0321%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0321%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0433%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0433%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z   execRVB   $xci/neutre$X                                                          \  #
                                        #    $Z                                 A=$_____imagesR$M.0497%s                           \  #
                                        #    $Z                                 R=$_____ImagesR.0497%s                             \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_MA_S3_M:                                                                      #

v         $xiac/POLY.112$R16            p=$xiP/cercle.35
v         $xiac/POLY.112$R64            p=$xiP/cercle.35
                                        # Donne l'exposant 'eRho' variable de 'v $xiirc/POLY.11.2' et 'v $xiirc/POLY.12.2'.           #
v         $xiac/POLY.212$R16            p=$xiP/cercle.35
v         $xiac/POLY.212$R64            p=$xiP/cercle.35
                                        # Donne l'exposant 'eRho' variable de 'v $xiirc/POLY.21.2' et 'v $xiirc/POLY.22.2'.           #
v         $xiac/POLY.312$R16            p=$xiP/cercle.35
v         $xiac/POLY.312$R64            p=$xiP/cercle.35
                                        # Donne l'exposant 'eRho' variable de 'v $xiirc/POLY.31.2' et 'v $xiirc/POLY.32.2'.           #
v         $xiac/POLY.412$R16            p=$xiP/cercle.35
v         $xiac/POLY.412$R64            p=$xiP/cercle.35
                                        # Donne l'exposant 'eRho' variable de 'v $xiirc/POLY.41.2' et 'v $xiirc/POLY.42.2'.           #
v         $xiac/POLY.512$R16            p=$xiP/cercle.35
v         $xiac/POLY.512$R64            p=$xiP/cercle.35
                                        # Donne l'exposant 'eRho' variable de 'v $xiirc/POLY.51.2' et 'v $xiirc/POLY.52.2'.           #
v         $xiac/POLY.612$R16            p=$xiP/cercle.35
v         $xiac/POLY.612$R64            p=$xiP/cercle.35
                                        # Donne l'exposant 'eRho' variable de 'v $xiirc/POLY.61.2' et 'v $xiirc/POLY.62.2'.           #
v         $xiac/POLY.82.1$R16
v         $xiac/POLY.82.2$R16

v         $xiirc/POLY.82.1.0001
v         $xiirc/POLY.82.1.0002
v         $xiirc/POLY.82.1.0003
v         $xiirc/POLY.82.1.0004
v         $xiirc/POLY.82.1.0005
v         $xiirc/POLY.82.1.0006
v         $xiirc/POLY.82.1.0007
v         $xiirc/POLY.82.1.0008
v         $xiirc/POLY.82.1.0009
v         $xiirc/POLY.82.1.0010
v         $xiirc/POLY.82.1.0011
v         $xiirc/POLY.82.1.0012
v         $xiirc/POLY.82.1.0013
v         $xiirc/POLY.82.1.0014
v         $xiirc/POLY.82.1.0015
v         $xiirc/POLY.82.1.0016

v         $xiirc/POLY.82.2.0001
v         $xiirc/POLY.82.2.0002
v         $xiirc/POLY.82.2.0003
v         $xiirc/POLY.82.2.0004
v         $xiirc/POLY.82.2.0005
v         $xiirc/POLY.82.2.0006
v         $xiirc/POLY.82.2.0007
v         $xiirc/POLY.82.2.0008
v         $xiirc/POLY.82.2.0009
v         $xiirc/POLY.82.2.0010
v         $xiirc/POLY.82.2.0011
v         $xiirc/POLY.82.2.0012
v         $xiirc/POLY.82.2.0013
v         $xiirc/POLY.82.2.0014
v         $xiirc/POLY.82.2.0015
v         $xiirc/POLY.82.2.0016

v         $xiac/POLY.82$R16   p=$xiP/cercle.35
v         $xiac/POLY.82$R64   p=$xiP/cercle.35

v         $xiirc/POLY.82.1
v         $xiirc/POLY.82.2    p=$xiP/enfer.03
v         $xiirc/POLY.82.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.82.3
v         $xiirc/POLY.82.4    p=$xiP/enfer.03
v         $xiirc/POLY.82.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "belleville" puis "villiers" pour 'v $xiac/POLY.82$R16'-) par :  #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_82:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/POLY.81                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/POLY.82                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/POLY.83                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageF         $_____ImageT1.f                             #
                                        #    $Z             setenv    _____ImageFS        $_____ImageT1.fs                            #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        cPremiere                                             #
                                        #    $c             #define   N         cDerniere                                             #
                                        #    $c                                                                                       #
                                        #    $c             #define   OZ        0.0                                                   #
                                        #    $c             #define   EZ        1.0                                                   #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xci/fract_3D.01$X                #
                                        #    $c                                                               standard=FAUX           #
                                        #    $c                                                               iterations=4            #
                                        #    $c                                                               mx=0.05 my=0.05 mz=0.05 #
                                        #    $c                                                               Z=%.16f                 #
                                        #    $c                                                               R=$_____ImageF.%04d     #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,Z                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $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("$xci/normalise.01$X            #
                                        #    $c                                                A=$_____ImageF.%04d                    #
                                        #    $c                                                origine=2 extremite=12                 #
                                        #    $c                                                R=$_____ImageF.%04d                    #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        0.58                                                            #
                                        #    $c   #define   EJ        0.0                                                             #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0.58                                                            #
                                        #    $c   #define   EK        0.0                                                             #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("$xrc/polynome.41$X             #
                                        #    $c                                                images=1                               #
                                        #    $c                                                A=$_____ImageP.                        #
                                        #    $c                                                premiereA=0                            #
                                        #    $c                                                Zmin=0 Zmax=1                          #
                                        #    $c                                                ValiderAxes=FAUX                       #
                                        #    $c                                                xbg=-1 ybg=-1                          #
                                        #    $c                                                xhd=+1 yhd=+1                          #
                                        #    $c                                                ROTATION_OY=%f                         #
                                        #    $c                                                r=0 i=1 j=0 k=0                        #
                                        #    $c                                                pondPA=1                               #
                                        #    $c                                                pondPC=0                               #
                                        #    $c                                                fdai=VRAI                              #
                                        #    $c                                                pnt=VRAI                               #
                                        #    $c                                                AeRho=$_____ImageF.%04d                #
                                        #    $c                                                ApTheta=5                              #
                                        #    $c                                                ApPhi=8                                #
                                        #    $c                                                ApAlpha=11                             #
                                        #    $c                                                J=%+f                                  #
                                        #    $c                                                K=%+f                                  #
                                        #    $c                                                appartenance=VRAI                      #
                                        #    $c                                                iterations=6                           #
                                        #    $c                                                R=$_____ImageT1.%04d                   #
                                        #    $c                                                chiffresR=0                            #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,p                                              #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.82%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.82%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.82.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.82.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.82.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.82.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.82.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.82.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.82.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.82.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.82.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.82.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.82.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.82.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.82.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.82.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $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("$xci/acces$X                                  #
                                        #    $c                                                A=$_____ImageF.%04d                    #
                                        #    $c                                                standard=FAUX zero=FAUX                #
                                        #    $c                                                R=$_____ImageFS.%04d                   #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageFS                                       #
                                        #    $Z             SET       Premiere=$cPremiere                                             #
                                        #    $Z             SET       Derniere=$cDerniere                                             #
                                        #    $Z             set       _____animation=$xiac/POLY.82                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.LYAP.1.12._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_82:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette animation propose une rotation autour de l'axe 'OY' de 'v $xiirc/POLY.22.1' et        #
                                        # de 'v $xiirc/POLY.22.2'.                                                                    #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication de degre variable (AeRho=Frac3D(x,y,z),ApTheta=5,ApPhi=8,ApAlpha=11) et le   #
                                        # polynome P(q)=1.q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                   #
v         $xiac/POLY.92.1$R16
v         $xiac/POLY.92.2$R16

v         $xiirc/POLY.92.1.0001
v         $xiirc/POLY.92.1.0002
v         $xiirc/POLY.92.1.0003
v         $xiirc/POLY.92.1.0004
v         $xiirc/POLY.92.1.0005
v         $xiirc/POLY.92.1.0006
v         $xiirc/POLY.92.1.0007
v         $xiirc/POLY.92.1.0008
v         $xiirc/POLY.92.1.0009
v         $xiirc/POLY.92.1.0010
v         $xiirc/POLY.92.1.0011
v         $xiirc/POLY.92.1.0012
v         $xiirc/POLY.92.1.0013
v         $xiirc/POLY.92.1.0014
v         $xiirc/POLY.92.1.0015
v         $xiirc/POLY.92.1.0016

v         $xiirc/POLY.92.2.0001
v         $xiirc/POLY.92.2.0002
v         $xiirc/POLY.92.2.0003
v         $xiirc/POLY.92.2.0004
v         $xiirc/POLY.92.2.0005
v         $xiirc/POLY.92.2.0006
v         $xiirc/POLY.92.2.0007
v         $xiirc/POLY.92.2.0008
v         $xiirc/POLY.92.2.0009
v         $xiirc/POLY.92.2.0010
v         $xiirc/POLY.92.2.0011
v         $xiirc/POLY.92.2.0012
v         $xiirc/POLY.92.2.0013
v         $xiirc/POLY.92.2.0014
v         $xiirc/POLY.92.2.0015
v         $xiirc/POLY.92.2.0016

v         $xiac/POLY.92$R16   p=$xiP/cercle.35
v         $xiac/POLY.92$R64   p=$xiP/cercle.35

v         $xiirc/POLY.92.1
v         $xiirc/POLY.92.2    p=$xiP/enfer.03
v         $xiirc/POLY.92.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.92.3
v         $xiirc/POLY.92.4    p=$xiP/enfer.03
v         $xiirc/POLY.92.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "courcelle"-) par :                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_92:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/POLY.91                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/POLY.92                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/POLY.93                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageF         $_____ImageT1.f                             #
                                        #    $Z             setenv    _____ImageFS        $_____ImageT1.fs                            #
                                        #                                                                                             #
                                        #    $Z             FilSTmpB            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $c             #include  <stdio.h>                                                       #
                                        #    $c                                                                                       #
                                        #    $c             #define   N0        cPremiere                                             #
                                        #    $c             #define   N         cDerniere                                             #
                                        #    $c                                                                                       #
                                        #    $c             #define   OZ        0.0                                                   #
                                        #    $c             #define   EZ        1.0                                                   #
                                        #    $c                                                                                       #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xci/fract_3D.01$X                #
                                        #    $c                                                               standard=FAUX           #
                                        #    $c                                                               iterations=4            #
                                        #    $c                                                               mx=0.05 my=0.05 mz=0.05 #
                                        #    $c                                                               Z=%.16f                 #
                                        #    $c                                                               R=$_____ImageF.%04d     #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FFrAcTaL\n"    #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,Z                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             ro                  $FFrAcTaL                                             #
                                        #    $Z             $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z     $FFrAcTaL" p14=FAUX     #
                                        #                                                                                             #
                                        #    $Z             FilSTmpE            FFrAcTaL                                              #
                                        #                                                                                             #
                                        #    $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("$xci/normalise.01$X            #
                                        #    $c                                                A=$_____ImageF.%04d                    #
                                        #    $c                                                origine=2 extremite=4                  #
                                        #    $c                                                R=$_____ImageF.%04d                    #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.0                                                            #
                                        #    $c   #define   EJ        +1.0                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("$xrc/polynome.41$X             #
                                        #    $c                                                images=1                               #
                                        #    $c                                                A=$_____ImageP.                        #
                                        #    $c                                                premiereA=0                            #
                                        #    $c                                                Zmin=0 Zmax=1                          #
                                        #    $c                                                ValiderAxes=FAUX                       #
                                        #    $c                                                xbg=-1.10 ybg=-1.10                    #
                                        #    $c                                                xhd=+1.10 yhd=+1.10                    #
                                        #    $c                                                ROTATION_OY=%f                         #
                                        #    $c                                                r=-0.5815147625160462                  #
                                        #    $c                                                i=+0.6358885017421603                  #
                                        #    $c                                                j=0                                    #
                                        #    $c                                                k=0                                    #
                                        #    $c                                                pondPA=1                               #
                                        #    $c                                                pondPC=0                               #
                                        #    $c                                                fdai=VRAI                              #
                                        #    $c                                                pnt=VRAI                               #
                                        #    $c                                                AeRho=$_____ImageF.%04d                #
                                        #    $c                                                ApTheta=2                              #
                                        #    $c                                                ApPhi=3                                #
                                        #    $c                                                ApAlpha=4                              #
                                        #    $c                                                J=%+f                                  #
                                        #    $c                                                K=%+f                                  #
                                        #    $c                                                appartenance=VRAI                      #
                                        #    $c                                                iterations=10                          #
                                        #    $c                                                R=$_____ImageT1.%04d                   #
                                        #    $c                                                chiffresR=0                            #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,p                                              #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.92%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.92%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.92.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.92.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.92.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.92.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.92.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.92.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.92.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.92.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.92.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.92.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.92.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.92.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.92.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.92.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $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("$xci/acces$X                                  #
                                        #    $c                                                A=$_____ImageF.%04d                    #
                                        #    $c                                                standard=FAUX zero=FAUX                #
                                        #    $c                                                R=$_____ImageFS.%04d                   #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageFS                                       #
                                        #    $Z             SET       Premiere=$cPremiere                                             #
                                        #    $Z             SET       Derniere=$cDerniere                                             #
                                        #    $Z             set       _____animation=$xiac/POLY.92                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.LYAP.1.12._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_92:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication de degre variable (AeRho=Frac3D(x,y,z),ApTheta=2,ApPhi=3,ApAlpha=4) et le    #
                                        # polynome P(q)=1.q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                   #
v         $xiac/POLY.A2.1$R16
v         $xiac/POLY.A2.2$R16

v         $xiirc/POLY.A2.1.0001
v         $xiirc/POLY.A2.1.0002
v         $xiirc/POLY.A2.1.0003
v         $xiirc/POLY.A2.1.0004
v         $xiirc/POLY.A2.1.0005
v         $xiirc/POLY.A2.1.0006
v         $xiirc/POLY.A2.1.0007
v         $xiirc/POLY.A2.1.0008
v         $xiirc/POLY.A2.1.0009
v         $xiirc/POLY.A2.1.0010
v         $xiirc/POLY.A2.1.0011
v         $xiirc/POLY.A2.1.0012
v         $xiirc/POLY.A2.1.0013
v         $xiirc/POLY.A2.1.0014
v         $xiirc/POLY.A2.1.0015
v         $xiirc/POLY.A2.1.0016

v         $xiirc/POLY.A2.2.0001
v         $xiirc/POLY.A2.2.0002
v         $xiirc/POLY.A2.2.0003
v         $xiirc/POLY.A2.2.0004
v         $xiirc/POLY.A2.2.0005
v         $xiirc/POLY.A2.2.0006
v         $xiirc/POLY.A2.2.0007
v         $xiirc/POLY.A2.2.0008
v         $xiirc/POLY.A2.2.0009
v         $xiirc/POLY.A2.2.0010
v         $xiirc/POLY.A2.2.0011
v         $xiirc/POLY.A2.2.0012
v         $xiirc/POLY.A2.2.0013
v         $xiirc/POLY.A2.2.0014
v         $xiirc/POLY.A2.2.0015
v         $xiirc/POLY.A2.2.0016

v         $xiirc/POLY.A2.1
v         $xiirc/POLY.A2.2    p=$xiP/enfer.03
v         $xiirc/POLY.A2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.A2.3
v         $xiirc/POLY.A2.4    p=$xiP/enfer.03
v         $xiirc/POLY.A2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_A2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/POLY.A1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/POLY.A2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/POLY.A3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.0                                                            #
                                        #    $c   #define   EJ        +1.0                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("$xrc/polynome.41$X             #
                                        #    $c                                                images=1                               #
                                        #    $c                                                A=$_____ImageP.                        #
                                        #    $c                                                premiereA=0                            #
                                        #    $c                                                Zmin=0 Zmax=1                          #
                                        #    $c                                                ValiderAxes=FAUX                       #
                                        #    $c                                                xbg=-1.10 ybg=-1.10                    #
                                        #    $c                                                xhd=+1.10 yhd=+1.10                    #
                                        #    $c                                                ROTATION_OY=%f                         #
                                        #    $c                                                r=-0.5815147625160462                  #
                                        #    $c                                                i=+0.6358885017421603                  #
                                        #    $c                                                j=0                                    #
                                        #    $c                                                k=0                                    #
                                        #    $c                                                pondPA=1                               #
                                        #    $c                                                pondPC=0                               #
                                        #    $c                                                fdai=VRAI                              #
                                        #    $c                                                pnt=VRAI                               #
                                        #    $c                                                AeRho=2                                #
                                        #    $c                                                ApTheta=2                              #
                                        #    $c                                                ApPhi=3                                #
                                        #    $c                                                ApAlpha=4                              #
                                        #    $c                                                J=%+f                                  #
                                        #    $c                                                K=%+f                                  #
                                        #    $c                                                appartenance=VRAI                      #
                                        #    $c                                                iterations=10                          #
                                        #    $c                                                R=$_____ImageT1.%04d                   #
                                        #    $c                                                chiffresR=0                            #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.A2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.A2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.A2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.A2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.A2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.A2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.A2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.A2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.A2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.A2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.A2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.A2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.A2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.A2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.A2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.A2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_A2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication de degre variable (AeRho=2,ApTheta=2,ApPhi=3,ApAlpha=4) et le polynome       #
                                        # P(q)=1.q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                            #
v         $xiac/POLY.B2.1$R16
v         $xiac/POLY.B2.2$R16

v         $xiirc/POLY.B2.1.0001
v         $xiirc/POLY.B2.1.0002
v         $xiirc/POLY.B2.1.0003
v         $xiirc/POLY.B2.1.0004
v         $xiirc/POLY.B2.1.0005
v         $xiirc/POLY.B2.1.0006
v         $xiirc/POLY.B2.1.0007
v         $xiirc/POLY.B2.1.0008
v         $xiirc/POLY.B2.1.0009
v         $xiirc/POLY.B2.1.0010
v         $xiirc/POLY.B2.1.0011
v         $xiirc/POLY.B2.1.0012
v         $xiirc/POLY.B2.1.0013
v         $xiirc/POLY.B2.1.0014
v         $xiirc/POLY.B2.1.0015
v         $xiirc/POLY.B2.1.0016

v         $xiirc/POLY.B2.2.0001
v         $xiirc/POLY.B2.2.0002
v         $xiirc/POLY.B2.2.0003
v         $xiirc/POLY.B2.2.0004
v         $xiirc/POLY.B2.2.0005
v         $xiirc/POLY.B2.2.0006
v         $xiirc/POLY.B2.2.0007
v         $xiirc/POLY.B2.2.0008
v         $xiirc/POLY.B2.2.0009
v         $xiirc/POLY.B2.2.0010
v         $xiirc/POLY.B2.2.0011
v         $xiirc/POLY.B2.2.0012
v         $xiirc/POLY.B2.2.0013
v         $xiirc/POLY.B2.2.0014
v         $xiirc/POLY.B2.2.0015
v         $xiirc/POLY.B2.2.0016

v         $xiirc/POLY.B2.1
v         $xiirc/POLY.B2.2    p=$xiP/enfer.03
v         $xiirc/POLY.B2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.B2.3
v         $xiirc/POLY.B2.4    p=$xiP/enfer.03
v         $xiirc/POLY.B2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "maubert"-) par :                                                #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_B2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/POLY.B1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/POLY.B2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/POLY.B3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.0                                                            #
                                        #    $c   #define   EJ        +1.0                                                            #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("$xrc/polynome.41$X             #
                                        #    $c                                                images=1                               #
                                        #    $c                                                A=$_____ImageP.                        #
                                        #    $c                                                premiereA=0                            #
                                        #    $c                                                Zmin=0 Zmax=1                          #
                                        #    $c                                                ValiderAxes=FAUX                       #
                                        #    $c                                                xbg=-1.10 ybg=-1.10                    #
                                        #    $c                                                xhd=+1.10 yhd=+1.10                    #
                                        #    $c                                                ROTATION_OY=%f                         #
                                        #    $c                                                r=-0.5815147625160462                  #
                                        #    $c                                                i=+0.6358885017421603                  #
                                        #    $c                                                j=0                                    #
                                        #    $c                                                k=0                                    #
                                        #    $c                                                pondPA=1                               #
                                        #    $c                                                pondPC=0                               #
                                        #    $c                                                fdai=VRAI                              #
                                        #    $c                                                pnt=VRAI                               #
                                        #    $c                                                AeRho=2                                #
                                        #    $c                                                ApTheta=2                              #
                                        #    $c                                                ApPhi=2                                #
                                        #    $c                                                ApAlpha=2                              #
                                        #    $c                                                J=%+f                                  #
                                        #    $c                                                K=%+f                                  #
                                        #    $c                                                appartenance=VRAI                      #
                                        #    $c                                                iterations=10                          #
                                        #    $c                                                R=$_____ImageT1.%04d                   #
                                        #    $c                                                chiffresR=0                            #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.B2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.B2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.B2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.B2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.B2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.B2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.B2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.B2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.B2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.B2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.B2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.B2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.B2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.B2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.B2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.B2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_B2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication du second degre (AeRho=ApTheta=ApPhi=ApAlpha=2) et le polynome               #
                                        # P(q)=1.q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                            #
v         $xiac/POLY.C2.1$R16
v         $xiac/POLY.C2.2$R16

v         $xiirc/POLY.C2.1.0001
v         $xiirc/POLY.C2.1.0002
v         $xiirc/POLY.C2.1.0003
v         $xiirc/POLY.C2.1.0004
v         $xiirc/POLY.C2.1.0005
v         $xiirc/POLY.C2.1.0006
v         $xiirc/POLY.C2.1.0007
v         $xiirc/POLY.C2.1.0008
v         $xiirc/POLY.C2.1.0009
v         $xiirc/POLY.C2.1.0010
v         $xiirc/POLY.C2.1.0011
v         $xiirc/POLY.C2.1.0012
v         $xiirc/POLY.C2.1.0013
v         $xiirc/POLY.C2.1.0014
v         $xiirc/POLY.C2.1.0015
v         $xiirc/POLY.C2.1.0016

v         $xiirc/POLY.C2.2.0001
v         $xiirc/POLY.C2.2.0002
v         $xiirc/POLY.C2.2.0003
v         $xiirc/POLY.C2.2.0004
v         $xiirc/POLY.C2.2.0005
v         $xiirc/POLY.C2.2.0006
v         $xiirc/POLY.C2.2.0007
v         $xiirc/POLY.C2.2.0008
v         $xiirc/POLY.C2.2.0009
v         $xiirc/POLY.C2.2.0010
v         $xiirc/POLY.C2.2.0011
v         $xiirc/POLY.C2.2.0012
v         $xiirc/POLY.C2.2.0013
v         $xiirc/POLY.C2.2.0014
v         $xiirc/POLY.C2.2.0015
v         $xiirc/POLY.C2.2.0016

v         $xiirc/POLY.C2.1
v         $xiirc/POLY.C2.2    p=$xiP/enfer.03
v         $xiirc/POLY.C2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.C2.3
v         $xiirc/POLY.C2.4    p=$xiP/enfer.03
v         $xiirc/POLY.C2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_C2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/POLY.C1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/POLY.C2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/POLY.C3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.00                                                           #
                                        #    $c   #define   EJ        +1.00                                                           #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("$xrc/polynome.41$X             #
                                        #    $c                                                images=1                               #
                                        #    $c                                                A=$_____ImageP.                        #
                                        #    $c                                                premiereA=0                            #
                                        #    $c                                                Zmin=0 Zmax=1                          #
                                        #    $c                                                ValiderAxes=FAUX                       #
                                        #    $c                                                xbg=-1.00 ybg=-1.00                    #
                                        #    $c                                                xhd=+1.00 yhd=+1.00                    #
                                        #    $c                                                ROTATION_OY=%f                         #
                                        #    $c                                                r=-0.5815147625160462                  #
                                        #    $c                                                i=+0.6358885017421603                  #
                                        #    $c                                                j=0                                    #
                                        #    $c                                                k=0                                    #
                                        #    $c                                                pondPA=1                               #
                                        #    $c                                                pondPC=0.5                             #
                                        #    $c                                                fdai=VRAI                              #
                                        #    $c                                                pnt=VRAI                               #
                                        #    $c                                                AeRho=2                                #
                                        #    $c                                                ApTheta=2                              #
                                        #    $c                                                ApPhi=2                                #
                                        #    $c                                                ApAlpha=2                              #
                                        #    $c                                                J=%+f                                  #
                                        #    $c                                                K=%+f                                  #
                                        #    $c                                                appartenance=VRAI                      #
                                        #    $c                                                iterations=10                          #
                                        #    $c                                                R=$_____ImageT1.%04d                   #
                                        #    $c                                                chiffresR=0                            #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.C2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.C2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.C2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.C2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.C2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.C2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.C2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.C2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.C2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.C2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.C2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.C2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.C2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.C2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.C2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.C2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_C2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Mandelbrot-Julia calcule avec     #
                                        # une "fausse" multiplication du second degre (AeRho=ApTheta=ApPhi=ApAlpha=2) et le polynome  #
                                        # P(q)=1.q+A+C/2 avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                        #
v         $xiac/POLY.D2.1$R16
v         $xiac/POLY.D2.2$R16

v         $xiirc/POLY.D2.1.0001
v         $xiirc/POLY.D2.1.0002
v         $xiirc/POLY.D2.1.0003
v         $xiirc/POLY.D2.1.0004
v         $xiirc/POLY.D2.1.0005
v         $xiirc/POLY.D2.1.0006
v         $xiirc/POLY.D2.1.0007
v         $xiirc/POLY.D2.1.0008
v         $xiirc/POLY.D2.1.0009
v         $xiirc/POLY.D2.1.0010
v         $xiirc/POLY.D2.1.0011
v         $xiirc/POLY.D2.1.0012
v         $xiirc/POLY.D2.1.0013
v         $xiirc/POLY.D2.1.0014
v         $xiirc/POLY.D2.1.0015
v         $xiirc/POLY.D2.1.0016

v         $xiirc/POLY.D2.2.0001
v         $xiirc/POLY.D2.2.0002
v         $xiirc/POLY.D2.2.0003
v         $xiirc/POLY.D2.2.0004
v         $xiirc/POLY.D2.2.0005
v         $xiirc/POLY.D2.2.0006
v         $xiirc/POLY.D2.2.0007
v         $xiirc/POLY.D2.2.0008
v         $xiirc/POLY.D2.2.0009
v         $xiirc/POLY.D2.2.0010
v         $xiirc/POLY.D2.2.0011
v         $xiirc/POLY.D2.2.0012
v         $xiirc/POLY.D2.2.0013
v         $xiirc/POLY.D2.2.0014
v         $xiirc/POLY.D2.2.0015
v         $xiirc/POLY.D2.2.0016

v         $xiirc/POLY.D2.1
v         $xiirc/POLY.D2.2    p=$xiP/enfer.03
v         $xiirc/POLY.D2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.D2.3
v         $xiirc/POLY.D2.4    p=$xiP/enfer.03
v         $xiirc/POLY.D2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "villiers"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_D2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT1=$xTV/POLY.D1                                       #
                                        #    $Z             set       _____ImageTd=$_____ImageT1.d                                    #
                                        #    $Z             set       _____ImageT2=$xTV/POLY.D2                                       #
                                        #    $Z             set       _____ImageT22=$_____ImageT2.2                                   #
                                        #    $Z             set       _____ImageT23=$_____ImageT2.3                                   #
                                        #    $Z             set       _____ImageT3=$xTV/POLY.D3                                       #
                                        #    $Z             set       _____ImageZ=$xTV/Z_BUFFER.v2                                    #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=1                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0002                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.00                                                           #
                                        #    $c   #define   EJ        +1.00                                                           #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("$xrc/polynome.41$X             #
                                        #    $c                                                images=1                               #
                                        #    $c                                                A=$_____ImageP.                        #
                                        #    $c                                                premiereA=0                            #
                                        #    $c                                                Zmin=0 Zmax=2                          #
                                        #    $c                                                ValiderAxes=FAUX                       #
                                        #    $c                                                xbg=-1.00 ybg=-1.00                    #
                                        #    $c                                                xhd=+1.00 yhd=+1.00                    #
                                        #    $c                                                ROTATION_OY=%f                         #
                                        #    $c                                                r=-0.5815147625160462                  #
                                        #    $c                                                i=+0.6358885017421603                  #
                                        #    $c                                                j=0                                    #
                                        #    $c                                                k=0                                    #
                                        #    $c                                                pondPA=1                               #
                                        #    $c                                                pondPC=0                               #
                                        #    $c                                                fdai=VRAI                              #
                                        #    $c                                                pnt=VRAI                               #
                                        #    $c                                                AeRho=2                                #
                                        #    $c                                                ApTheta=2                              #
                                        #    $c                                                ApPhi=2                                #
                                        #    $c                                                ApAlpha=2                              #
                                        #    $c                                                J=%+f                                  #
                                        #    $c                                                K=%+f                                  #
                                        #    $c                                                appartenance=VRAI                      #
                                        #    $c                                                iterations=10                          #
                                        #    $c                                                R=$_____ImageT1.%04d                   #
                                        #    $c                                                chiffresR=0                            #
                                        #    $c                                                                         $formatI\n"   #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.D2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.D2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.D2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.D2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.D2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.D2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.D2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.D2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.D2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.D2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.D2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.D2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.D2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.D2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.D2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.D2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_D2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication du second degre (AeRho=ApTheta=ApPhi=ApAlpha=2) et le polynome               #
                                        # P(q)=1.q+q.q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                        #
v         $xiac/POLY.E2.1$R16
v         $xiac/POLY.E2.2$R16

v         $xiirc/POLY.E2.1.0001
v         $xiirc/POLY.E2.1.0002
v         $xiirc/POLY.E2.1.0003
v         $xiirc/POLY.E2.1.0004
v         $xiirc/POLY.E2.1.0005
v         $xiirc/POLY.E2.1.0006
v         $xiirc/POLY.E2.1.0007
v         $xiirc/POLY.E2.1.0008
v         $xiirc/POLY.E2.1.0009
v         $xiirc/POLY.E2.1.0010
v         $xiirc/POLY.E2.1.0011
v         $xiirc/POLY.E2.1.0012
v         $xiirc/POLY.E2.1.0013
v         $xiirc/POLY.E2.1.0014
v         $xiirc/POLY.E2.1.0015
v         $xiirc/POLY.E2.1.0016

v         $xiirc/POLY.E2.2.0001
v         $xiirc/POLY.E2.2.0002
v         $xiirc/POLY.E2.2.0003
v         $xiirc/POLY.E2.2.0004
v         $xiirc/POLY.E2.2.0005
v         $xiirc/POLY.E2.2.0006
v         $xiirc/POLY.E2.2.0007
v         $xiirc/POLY.E2.2.0008
v         $xiirc/POLY.E2.2.0009
v         $xiirc/POLY.E2.2.0010
v         $xiirc/POLY.E2.2.0011
v         $xiirc/POLY.E2.2.0012
v         $xiirc/POLY.E2.2.0013
v         $xiirc/POLY.E2.2.0014
v         $xiirc/POLY.E2.2.0015
v         $xiirc/POLY.E2.2.0016

v         $xiirc/POLY.E2.1
v         $xiirc/POLY.E2.2    p=$xiP/enfer.03
v         $xiirc/POLY.E2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.E2.3
v         $xiirc/POLY.E2.4    p=$xiP/enfer.03
v         $xiirc/POLY.E2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "villiers"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_E2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/POLY.E1                                #
                                        #    $Z             setenv    _____ImageTd        $_____ImageT1.d                             #
                                        #    $Z             setenv    _____ImageT2        $xTV/POLY.E2                                #
                                        #    $Z             setenv    _____ImageT22       $_____ImageT2.2                             #
                                        #    $Z             setenv    _____ImageT23       $_____ImageT2.3                             #
                                        #    $Z             setenv    _____ImageT3        $xTV/POLY.E3                                #
                                        #    $Z             setenv    _____ImageZ         $xTV/Z_BUFFER.v2                            #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=+1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=-1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=+1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0002                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=-1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0003                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.00                                                           #
                                        #    $c   #define   EJ        +1.00                                                           #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("FilSTmpB            FPoLyNoMe\n");                      #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/polynome.41$X                #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               A=$_____ImageP.         #
                                        #    $c                                                               premiereA=0             #
                                        #    $c                                                               Zmin=0 Zmax=3           #
                                        #    $c                                                               ValiderAxes=FAUX        #
                                        #    $c                                                               xbg=-1.00 ybg=-1.00     #
                                        #    $c                                                               xhd=+1.00 yhd=+1.00     #
                                        #    $c                                                               ROTATION_OY=%f          #
                                        #    $c                                                               r=-0.5815147625160462   #
                                        #    $c                                                               i=+0.6358885017421603   #
                                        #    $c                                                               j=0                     #
                                        #    $c                                                               k=0                     #
                                        #    $c                                                               pondPA=1                #
                                        #    $c                                                               pondPC=0                #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               AeRho=2                 #
                                        #    $c                                                               ApTheta=2               #
                                        #    $c                                                               ApPhi=2                 #
                                        #    $c                                                               ApAlpha=2               #
                                        #    $c                                                               J=%+f                   #
                                        #    $c                                                               K=%+f                   #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               iterations=6            #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                               chiffresR=0             #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FPoLyNoMe\n"   #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("ro                  $FPoLyNoMe\n");                     #
                                        #    $c                       printf("$xcg/parallele.1N$X commande=%c$xcs/Linda$vv$Z          #
                                        #    $c                                                   $FPoLyNoMe%c p14=FAUX\n"            #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("FilSTmpE            FPoLyNoMe\n");                      #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.E2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.E2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.E2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.E2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.E2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.E2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.E2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.E2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.E2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.E2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.E2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.E2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.E2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.E2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.E2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.E2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_E2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication du 2x3=sixieme degre (AeRho=ApTheta=ApPhi=ApAlpha=2) et le polynome          #
                                        # P(q)=1-1.q+q.q-q*q*q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                #
v         $xiac/POLY.F2.1$R16
v         $xiac/POLY.F2.2$R16

v         $xiirc/POLY.F2.1.0001
v         $xiirc/POLY.F2.1.0002
v         $xiirc/POLY.F2.1.0003
v         $xiirc/POLY.F2.1.0004
v         $xiirc/POLY.F2.1.0005
v         $xiirc/POLY.F2.1.0006
v         $xiirc/POLY.F2.1.0007
v         $xiirc/POLY.F2.1.0008
v         $xiirc/POLY.F2.1.0009
v         $xiirc/POLY.F2.1.0010
v         $xiirc/POLY.F2.1.0011
v         $xiirc/POLY.F2.1.0012
v         $xiirc/POLY.F2.1.0013
v         $xiirc/POLY.F2.1.0014
v         $xiirc/POLY.F2.1.0015
v         $xiirc/POLY.F2.1.0016

v         $xiirc/POLY.F2.2.0001
v         $xiirc/POLY.F2.2.0002
v         $xiirc/POLY.F2.2.0003
v         $xiirc/POLY.F2.2.0004
v         $xiirc/POLY.F2.2.0005
v         $xiirc/POLY.F2.2.0006
v         $xiirc/POLY.F2.2.0007
v         $xiirc/POLY.F2.2.0008
v         $xiirc/POLY.F2.2.0009
v         $xiirc/POLY.F2.2.0010
v         $xiirc/POLY.F2.2.0011
v         $xiirc/POLY.F2.2.0012
v         $xiirc/POLY.F2.2.0013
v         $xiirc/POLY.F2.2.0014
v         $xiirc/POLY.F2.2.0015
v         $xiirc/POLY.F2.2.0016

v         $xiirc/POLY.F2.1
v         $xiirc/POLY.F2.2    p=$xiP/enfer.03
v         $xiirc/POLY.F2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.F2.3
v         $xiirc/POLY.F2.4    p=$xiP/enfer.03
v         $xiirc/POLY.F2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "villiers"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_F2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/POLY.F1                                #
                                        #    $Z             setenv    _____ImageTd        $_____ImageT1.d                             #
                                        #    $Z             setenv    _____ImageT2        $xTV/POLY.F2                                #
                                        #    $Z             setenv    _____ImageT22       $_____ImageT2.2                             #
                                        #    $Z             setenv    _____ImageT23       $_____ImageT2.3                             #
                                        #    $Z             setenv    _____ImageT3        $xTV/POLY.F3                                #
                                        #    $Z             setenv    _____ImageZ         $xTV/Z_BUFFER.v2                            #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=0                                                \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=+1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=-1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0002                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=+1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0003                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.00                                                           #
                                        #    $c   #define   EJ        +1.00                                                           #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("FilSTmpB            FPoLyNoMe\n");                      #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/polynome.41$X                #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               A=$_____ImageP.         #
                                        #    $c                                                               premiereA=0             #
                                        #    $c                                                               Zmin=0 Zmax=3           #
                                        #    $c                                                               ValiderAxes=FAUX        #
                                        #    $c                                                               xbg=-1.00 ybg=-1.00     #
                                        #    $c                                                               xhd=+1.00 yhd=+1.00     #
                                        #    $c                                                               ROTATION_OY=%f          #
                                        #    $c                                                               r=-0.5815147625160462   #
                                        #    $c                                                               i=+0.6358885017421603   #
                                        #    $c                                                               j=0                     #
                                        #    $c                                                               k=0                     #
                                        #    $c                                                               pondPA=1                #
                                        #    $c                                                               pondPC=0                #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               AeRho=2                 #
                                        #    $c                                                               ApTheta=2               #
                                        #    $c                                                               ApPhi=2                 #
                                        #    $c                                                               ApAlpha=2               #
                                        #    $c                                                               J=%+f                   #
                                        #    $c                                                               K=%+f                   #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               iterations=6            #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                               chiffresR=0             #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FPoLyNoMe\n"   #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("ro                  $FPoLyNoMe\n");                     #
                                        #    $c                       printf("$xcg/parallele.1N$X commande=%c$xcs/Linda$vv$Z          #
                                        #    $c                                                   $FPoLyNoMe%c p14=FAUX\n"            #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("FilSTmpE            FPoLyNoMe\n");                      #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.F2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.F2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.F2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.F2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.F2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.F2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.F2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.F2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.F2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.F2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.F2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.F2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.F2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.F2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.F2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.F2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_F2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication du 2x3=sixieme degre (AeRho=ApTheta=ApPhi=ApAlpha=2) et le polynome          #
                                        # P(q)=1.q-q.q+q*q*q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                  #
v         $xiac/POLY.G2.1$R16
v         $xiac/POLY.G2.2$R16

v         $xiirc/POLY.G2.1.0001
v         $xiirc/POLY.G2.1.0002
v         $xiirc/POLY.G2.1.0003
v         $xiirc/POLY.G2.1.0004
v         $xiirc/POLY.G2.1.0005
v         $xiirc/POLY.G2.1.0006
v         $xiirc/POLY.G2.1.0007
v         $xiirc/POLY.G2.1.0008
v         $xiirc/POLY.G2.1.0009
v         $xiirc/POLY.G2.1.0010
v         $xiirc/POLY.G2.1.0011
v         $xiirc/POLY.G2.1.0012
v         $xiirc/POLY.G2.1.0013
v         $xiirc/POLY.G2.1.0014
v         $xiirc/POLY.G2.1.0015
v         $xiirc/POLY.G2.1.0016

v         $xiirc/POLY.G2.2.0001
v         $xiirc/POLY.G2.2.0002
v         $xiirc/POLY.G2.2.0003
v         $xiirc/POLY.G2.2.0004
v         $xiirc/POLY.G2.2.0005
v         $xiirc/POLY.G2.2.0006
v         $xiirc/POLY.G2.2.0007
v         $xiirc/POLY.G2.2.0008
v         $xiirc/POLY.G2.2.0009
v         $xiirc/POLY.G2.2.0010
v         $xiirc/POLY.G2.2.0011
v         $xiirc/POLY.G2.2.0012
v         $xiirc/POLY.G2.2.0013
v         $xiirc/POLY.G2.2.0014
v         $xiirc/POLY.G2.2.0015
v         $xiirc/POLY.G2.2.0016

v         $xiirc/POLY.G2.1
v         $xiirc/POLY.G2.2    p=$xiP/enfer.03
v         $xiirc/POLY.G2.2    p=$xiP/trou_noir.13
v         $xiirc/POLY.G2.3
v         $xiirc/POLY.G2.4    p=$xiP/enfer.03
v         $xiirc/POLY.G2.4    p=$xiP/trou_noir.13
                                        # Generee (sur '$CMAP28' -ex "grenelle"-) par :                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_POLY_G2:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #                                                                                             #
                                        #    $Z             SET       cPremiere=1                                                     #
                                        #    $Z             SET       cDerniere=128                                                   #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $cDerniere - $cPremiere                               #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageT1        $xTV/POLY.G1                                #
                                        #    $Z             setenv    _____ImageTd        $_____ImageT1.d                             #
                                        #    $Z             setenv    _____ImageT2        $xTV/POLY.G2                                #
                                        #    $Z             setenv    _____ImageT22       $_____ImageT2.2                             #
                                        #    $Z             setenv    _____ImageT23       $_____ImageT2.3                             #
                                        #    $Z             setenv    _____ImageT3        $xTV/POLY.G3                                #
                                        #    $Z             setenv    _____ImageZ         $xTV/Z_BUFFER.v2                            #
                                        #                                                                                             #
                                        #    $Z             setenv    _____ImageP         $_____ImageT1.p                             #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=+1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0000                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=-1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0001                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=+1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0002                                \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 v=-1                                               \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 R=$_____ImageP.0003                                \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMA="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" A=$_____ImageTd."                             #
                                        #    $Z             set       PaRaMA="$PaRaMA"" standard=FAUX"                                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" premiere=$cPremiere"                          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmin=`calcul $cPremiere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" Zmax=`calcul $cDerniere-$cPremiere`"          #
                                        #    $Z             set       PaRaMA="$PaRaMA"" inverser_Z=VRAI"                              #
                                        #    $Z             set       PaRaMA="$PaRaMA"" interpoler=VRAI lineaire=VRAI"                #
                                        #    $Z             set       PaRaMA="$PaRaMA"" source_lumineuse=VRAI"                        #
                                        #    $Z             set       PaRaMA="$PaRaMA"" cn=FAUX cnl=VRAI ccXYZ=VRAI"                  #
                                        #    $Z             set       PaRaMA="$PaRaMA"" speculaire=2"                                 #
                                        #    $Z             set       PaRaMA="$PaRaMA"" depth_cueing=0.3"                             #
                                        #                                                                                             #
                                        #    $Z             set       PaRaMC="$K_VIDE"                                                #
                                        #    $Z             set       PaRaMC="$PaRaMC"" points=4"                                     #
                                        #                                                                                             #
                                        #    $c   #include  <stdio.h>                                                                 #
                                        #    $c                                                                                       #
                                        #    $c   #define   N0        Premiere                                                        #
                                        #    $c   #define   N         Derniere                                                        #
                                        #    $c                                                                                       #
                                        #    $c   #define   P0        cPremiere                                                       #
                                        #    $c   #define   P         cDerniere                                                       #
                                        #    $c                                                                                       #
                                        #    $c   #define   ANGLE0    0                                                               #
                                        #    $c   #define   ANGLEN    6.283185307179586                                               #
                                        #    $c                                                                                       #
                                        #    $c   #define   OJ        -1.00                                                           #
                                        #    $c   #define   EJ        +1.00                                                           #
                                        #    $c                                                                                       #
                                        #    $c   #define   OK        0                                                               #
                                        #    $c   #define   EK        0                                                               #
                                        #    $c                                                                                       #
                                        #    $c   int       main()                                                                    #
                                        #    $c             {                                                                         #
                                        #    $c             int       n;                                                              #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       int       p;                                                    #
                                        #    $c                                                                                       #
                                        #    $c                       double    angle=((ANGLEN*(n-N0))+(ANGLE0*(N-n)))/(N-N0);        #
                                        #    $c                                                                                       #
                                        #    $c                       printf("FilSTmpB            FPoLyNoMe\n");                      #
                                        #    $c                                                                                       #
                                        #    $c                       for       (p=P0 ; p<=P ; p++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 double    J=((EJ*(p-P0))+(OJ*(P-p)))/(P-P0);          #
                                        #    $c                                 double    K=((EK*(p-P0))+(OK*(P-p)))/(P-N0);          #
                                        #    $c                                                                                       #
                                        #    $c                                 printf("echo      %c$xrc/polynome.41$X                #
                                        #    $c                                                               images=1                #
                                        #    $c                                                               A=$_____ImageP.         #
                                        #    $c                                                               premiereA=0             #
                                        #    $c                                                               Zmin=0 Zmax=3           #
                                        #    $c                                                               ValiderAxes=FAUX        #
                                        #    $c                                                               pep=-1                  #
                                        #    $c                                                               xbg=-1.00 ybg=-1.00     #
                                        #    $c                                                               xhd=+1.00 yhd=+1.00     #
                                        #    $c                                                               ROTATION_OY=%f          #
                                        #    $c                                                               r=-0.5815147625160462   #
                                        #    $c                                                               i=+0.6358885017421603   #
                                        #    $c                                                               j=0                     #
                                        #    $c                                                               k=0                     #
                                        #    $c                                                               pondPA=1                #
                                        #    $c                                                               pondPC=0                #
                                        #    $c                                                               fdai=VRAI               #
                                        #    $c                                                               pnt=VRAI                #
                                        #    $c                                                               AeRho=2                 #
                                        #    $c                                                               ApTheta=2               #
                                        #    $c                                                               ApPhi=2                 #
                                        #    $c                                                               ApAlpha=2               #
                                        #    $c                                                               J=%+f                   #
                                        #    $c                                                               K=%+f                   #
                                        #    $c                                                               appartenance=VRAI       #
                                        #    $c                                                               iterations=6            #
                                        #    $c                                                               R=$_____ImageT1.%04d    #
                                        #    $c                                                               chiffresR=0             #
                                        #    $c                                                                         $formatI%c    #
                                        #    $c                                                                    >> $FPoLyNoMe\n"   #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                       ,angle                                          #
                                        #    $c                                       ,J                                              #
                                        #    $c                                       ,K                                              #
                                        #    $c                                       ,p                                              #
                                        #    $c                                       ,'\''                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                                                                                       #
                                        #    $c                       printf("ro                  $FPoLyNoMe\n");                     #
                                        #    $c                       printf("$xcg/parallele.1N$X commande=%c$xcs/Linda$vv$Z          #
                                        #    $c                                                   $FPoLyNoMe%c p14=FAUX\n"            #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("FilSTmpE            FPoLyNoMe\n");                      #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/densite_3D.11$X                     #
                                        #    $c                                      A=$_____ImageT1.                                 #
                                        #    $c                                      premiere=$cPremiere                              #
                                        #    $c                                      standard=VRAI                                    #
                                        #    $c                                      Zmin=`calcul $cPremiere-$cPremiere`              #
                                        #    $c                                      Zmax=`calcul $cDerniere-$cPremiere`              #
                                        #    $c                                      dx=2 dy=2 dz=2                                   #
                                        #    $c                                      R=$_____ImageTd.                                 #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("set       exec_aR=%cpX=1 pY=0 pZ=0                      #
                                        #    $c                                                  ZBuffer=VRAI Z=$_____ImageZ%c\n"     #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("set       exec_aV='pX=0 pY=1 pZ=0'\n");                 #
                                        #    $c                       printf("set       exec_aB='pX=0 pY=0 pZ=1'\n");                 #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/accumule.41$X           #
                                        #    $c                                                $PaRaMA                                #
                                        #    $c                                                ROTATION_OX=+0.3                       #
                                        #    $c                                                R=$xTV/POLY.G2%%s                      #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$xTV/POLY.G2%%s                      #
                                        #    $c                                                $PaRaMC                                #
                                        #    $c                                                R=$_____ImageT2.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/normalise.01$X                      #
                                        #    $c                                      A=$_____ImageZ                                   #
                                        #    $c                                      extrema=FAUX                                     #
                                        #    $c                                      minimum=0 maximum=1                              #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/acces$X                                            #
                                        #    $c                                      standard=FAUX zero=FAUX                          #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/complement$X                        #
                                        #    $c                                                                    $formatI  |        #
                                        #    $c                               $xci/vraies_C$X                          #
                                        #    $c                                      p=$xiP/gris.05                                   #
                                        #    $c                                      R=$xTV/BRUME                                     #
                                        #    $c                                                                    $formatI\n"        #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/cache$X                                #
                                        #    $c                                                A=$BLANC                               #
                                        #    $c                                                M=$_____ImageT2.%04d%%s                #
                                        #    $c                                                anti_aliasing=FAUX                     #
                                        #    $c                                                R=$_____ImageT22%%s                    #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("$xci/vitre.53$Z                          #
                                        #    $c                                      $_____ImageT22                                   #
                                        #    $c                                      $xTV/BRUME                                       #
                                        #    $c                                      $_____ImageT23\n"                                #
                                        #    $c                              );                                                       #
                                        #    $c                                                                                       #
                                        #    $c                       printf("execRVB   %c$xci/convol.01$X             #
                                        #    $c                                                A=$_____ImageT23%%s                    #
                                        #    $c                                                points=9                               #
                                        #    $c                                                circulaire=VRAI                        #
                                        #    $c                                                circulaire_optimale=VRAI               #
                                        #    $c                                                R=$_____ImageT3.%04d%%s                #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT2.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.G2.1.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       printf("execRVB   %c$xci/neutre$X                               #
                                        #    $c                                                A=$_____ImageT3.%04d%%s                #
                                        #    $c                                                R=$xiirc/POLY.G2.2.%04d%%s             #
                                        #    $c                                                                    $formatI%c\n"      #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,n                                                        #
                                        #    $c                             ,'"'                                                      #
                                        #    $c                              );                                                       #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N0 ; n<=N ; n++)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N0)                                               #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.G2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.G2.1%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.G2.1%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c                                                                                       #
                                        #    $c             for       (n=N ; n>=N0 ; n--)                                             #
                                        #    $c                       {                                                               #
                                        #    $c                       if        (n==N)                                                #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/neutre$X                     #
                                        #    $c                                                          A=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          R=$xiirc/POLY.G2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       else                                                            #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("execRVB   %c$xci/cache$X                      #
                                        #    $c                                                          M=$_____ImageT2.%04d%%s      #
                                        #    $c                                                          A=$xiirc/POLY.G2.3%%s        #
                                        #    $c                                                          anti_aliaser=VRAI            #
                                        #    $c                                                          R=$xiirc/POLY.G2.3%%s        #
                                        #    $c                                                                         $formatI%c\n" #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                       ,n                                              #
                                        #    $c                                       ,'"'                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #    $c             }                                                                         #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.G2.1                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.G2.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/luminance.01$X                                                    \  #
                                        #    $Z                                 A=$xiirc/POLY.G2.3                                 \  #
                                        #    $Z                                 R=$xiirc/POLY.G2.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT2                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.G2.1                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImageT3                                       #
                                        #    $Z             set       _____animation=$xiac/POLY.G2.2                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Fin_listG_POLY_G2:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Montre la rotation quadri-dimensionnelle d'un ensemble de Julia calcule avec une "fausse"   #
                                        # multiplication du 2x3=sixieme degre (AeRho=ApTheta=ApPhi=ApAlpha=2) et le polynome          #
                                        # P(q)=1/q-1+1.q-q*q+A avec A=(-0.5815147625160462,+0.6358885017421603,0,0).                  #
v         $xiac/POLY.I22$R16            p=$xiP/cercle.35
v         $xiac/POLY.I22$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.I2.1'...                        #
v         $xiac/POLY.J22$R16            p=$xiP/cercle.35
v         $xiac/POLY.J22$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.J2.1'...                        #
v         $xiac/POLY.K22$R16            p=$xiP/cercle.35
v         $xiac/POLY.K22$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.K2.1'...                        #
v         $xiac/POLY.L22$R16            p=$xiP/cercle.35
v         $xiac/POLY.L22$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.L2.1'...                        #
v         $xiac/POLY.M22$R16            p=$xiP/cercle.35
v         $xiac/POLY.M22$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.M2.1'...                        #
                                        #                                                                                             #
                                        # On notera que l'on ne voit pratiquement pas de points blancs. C'est en fait logique         #
                                        # car ils correspondent exactement au maximum (=8) et que celui-ci n'est atteint qu'en        #
                                        # tres peu de points du champ fractal tridimensionnel. Pour bien faire il aurait mieux        #
                                        # valu utiliser 8.9999 a la place de 8, ce qui a ete fait avec 'v $xiac/POLY.M42$R16'...      #
v         $xiac/POLY.M32$R16            p=$xiP/cercle.35
v         $xiac/POLY.M32$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.M3.1'...                        #
v         $xiac/POLY.M42$R16            p=$xiP/cercle.35
v         $xiac/POLY.M42$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.M4.1'...                        #
v         $xiac/POLY.N22$R16            p=$xiP/cercle.35
v         $xiac/POLY.N22$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.N2.1'...                        #
                                        #                                                                                             #
                                        # On notera que l'on ne voit pratiquement pas de points blancs. C'est en fait logique         #
                                        # car ils correspondent exactement au maximum (=6) et que celui-ci n'est atteint qu'en        #
                                        # tres peu de points du champ fractal tridimensionnel. Pour bien faire il aurait mieux        #
                                        # valu utiliser 6.9999 a la place de 6, ce qui a ete fait avec 'v $xiac/POLY.N42$R16'...      #
v         $xiac/POLY.N32$R16            p=$xiP/cercle.35
v         $xiac/POLY.N32$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.N3.1'...                        #
v         $xiac/POLY.N42$R16            p=$xiP/cercle.35
v         $xiac/POLY.N42$R64            p=$xiP/cercle.35
                                        # Champ de definition du polynome utilise pour 'v $xiirc/POLY.N4.1'...                        #

v         $xiac/RACN.13$R16
                                        # Generee (sur '$LACT15') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_RACN_13:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/RACN.23                                        #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #    $c                       int       iterations=1;                                         #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/racN.01$X                                #
                                        #    $c                                                     images=1                          #
                                        #    $c                                                     exposant=3                        #
                                        #    $c                                                     iterations=%d                     #
                                        #    $c                                                     chiffres=0                        #
                                        #    $c                                                     R=$_____images.%04d               #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,iterations,n                                   #
                                        #    $c                                        );                                             #
                                        #                                                                                             #
                                        #    $c                                 iterations++;                                         #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/rac3.11                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/RACN.13                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_RACN_13:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image montre la convergence lors du calcul des racines de l'unite dans le plan        #
                                        # complexe (de 1 a 16 iterations).                                                            #

v         $xiac/RAQN.03$R16             p=$xiP/arc_ciel.03
v         $xiac/RAQN.03$R16             p=$xiP/dentscie.01
v         $xiac/RAQN.03$R16             p=$xiP/fract.02$Fi
v         $xiac/RAQN.03$R16             p=$xiP/rac3.11
v         $xiac/RAQN.03$R16             p=$xiP/trou_noir.95
                                        # Generee (sur '$LACT16') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_RAQN_03:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$Premiere d=$Derniere                            \  #
                                        #    $Z                                 vD=0 vA=0.15                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xT/COMPOSANTE_J                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/RAQN.03                                        #
                                        #                                                                                             #
                                        #    $Z             $xrc/racN.41$X                                                         \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 exposant=3                                         \  #
                                        #    $Z                                 iterations=8                                       \  #
                                        #    $Z                                 COMPOSANTE_J=$xT/COMPOSANTE_J                      \  #
                                        #    $Z                                 COMPOSANTE_K=0                                     \  #
                                        #    $Z                                 ponderationT=1                                     \  #
                                        #    $Z                                 ponderationP=0                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/RAQN.03                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.ITER.1.12._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_RAQN_03:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image montre le calcul des racines troisiemes de l'unite dans les quaternions en      #
                                        # partant du plan complexe ("vD=0"), puis en progressant le long de la 'COMPOSANTE_J', le     #
                                        # tout avec peu d'iterations...                                                               #
v         $xiac/RAQN.13$R16             p=$xiP/arc_ciel.03
v         $xiac/RAQN.13$R16             p=$xiP/dentscie.01
v         $xiac/RAQN.13$R16             p=$xiP/fract.02$Fi
v         $xiac/RAQN.13$R16             p=$xiP/rac3.11
v         $xiac/RAQN.13$R16             p=$xiP/trou_noir.95
                                        # Generee (sur '$LACT16') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_RAQN_13:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$Premiere d=$Derniere                            \  #
                                        #    $Z                                 vD=0 vA=0.15                                       \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xT/COMPOSANTE_J                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/RAQN.13                                        #
                                        #                                                                                             #
                                        #    $Z             $xrc/racN.41$X                                                         \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 exposant=3                                         \  #
                                        #    $Z                                 iterations=8                                       \  #
                                        #    $Z                                 COMPOSANTE_J=$xT/COMPOSANTE_J                      \  #
                                        #    $Z                                 COMPOSANTE_K=0                                     \  #
                                        #    $Z                                 ponderationT=1                                     \  #
                                        #    $Z                                 ponderationP=0                                     \  #
                                        #    $Z                                 compatibilite_20061206=VRAI                        \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/RAQN.13                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.ITER.1.12._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_RAQN_13:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image montre le calcul des racines troisiemes de l'unite dans les quaternions en      #
                                        # partant du plan complexe ("vD=0"), puis en progressant le long de la 'COMPOSANTE_J', le     #
                                        # tout avec peu d'iterations, en mode "compatibilite_20061206"...                             #
v         $xiac/RAQN.23$R16
v         $xiirc/RAQN.23                p=$xiP/gris.01
                                        # Generee (sur '$LACT16') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_RAQN_23:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$Premiere d=$Derniere                            \  #
                                        #    $Z                                 vD=0 vA=1                                          \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xT/COMPOSANTE_J                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/RAQN.23                                        #
                                        #                                                                                             #
                                        #    $Z             $xrc/racN.41$X                                                         \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 exposant=3                                         \  #
                                        #    $Z                                 iterations=32                                      \  #
                                        #    $Z                                 COMPOSANTE_J=$xT/COMPOSANTE_J                      \  #
                                        #    $Z                                 COMPOSANTE_K=0                                     \  #
                                        #    $Z                                 ponderationT=1                                     \  #
                                        #    $Z                                 ponderationP=0                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/rac3.11                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/RAQN.23                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xci/gradient.01$X             #
                                        #    $c                                                     A=$_____images.%04d               #
                                        #    $c                                                     points=25                         #
                                        #    $c                                                     R=$_____images.1.%04d             #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.1.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 R=$xiirc/RAQN.23                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_RAQN_23:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image montre le calcul des racines troisiemes de l'unite dans les quaternions en      #
                                        # partant du plan complexe ("vD=0"), puis en progressant le long de la 'COMPOSANTE_J'.        #
v         $xiac/RAQN.33$R16
v         $xiac/RAQN.33$R64
v         $xiirc/RAQN.33.1              p=$xiP/fractal.A2
v         $xiirc/RAQN.33.2              p=$xiP/fractal.A2
v         $xiirc/RAQN.33.3              p=$xiP/sepia.00
v         $xiirc/RAQN.33.4              p=$xiP/cotes.31
v         $xiirc/RAQN.33.4              p=$xiP/random.11$Fi
v         $xiirc/RAQN.33.4              p=$xiP/random.A5
v         $xiirc/RAQN.33.4$m
                                        # Generee (sur '$LACT16') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_RAQN_33:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=128                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$Premiere d=$Derniere                            \  #
                                        #    $Z                                 vD=0 vA=2                                          \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xT/COMPOSANTE_J                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/RAQN.33                                        #
                                        #                                                                                             #
                                        #    $Z             $xrc/racN.41$X                                                         \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 exposant=3                                         \  #
                                        #    $Z                                 iterations=32                                      \  #
                                        #    $Z                                 COMPOSANTE_J=$xT/COMPOSANTE_J                      \  #
                                        #    $Z                                 COMPOSANTE_K=0                                     \  #
                                        #    $Z                                 ponderationT=1                                     \  #
                                        #    $Z                                 ponderationP=0                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/rac3.11                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/RAQN.33                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xci/gradient.01$X             #
                                        #    $c                                                     A=$_____images.%04d               #
                                        #    $c                                                     points=25                         #
                                        #    $c                                                     R=$_____images.1.%04d             #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.1.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 binariser=VRAI                                     \  #
                                        #    $Z                                 R=$xiirc/RAQN.33.1                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       NpOiNtS=`(calculNS pow(2*7+1,2)*$pi/4) | $SE -e 's/\..*$//'`    #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xci/gradient.01$X             #
                                        #    $c                                                     A=$_____images.%04d               #
                                        #    $c                                                     points=$NpOiNtS                   #
                                        #    $c                                                     circulaire=VRAI                   #
                                        #    $c                                                     R=$_____images.2.%04d             #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$xci/solarise.11$Z             #
                                        #    $c                                                     $_____images.2.%04d               #
                                        #    $c                                                     $_____images.3.%04d               #
                                        #    $c                                                     $GRIS_1\n"                        #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.2.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 binariser=VRAI                                     \  #
                                        #    $Z                                 R=$xiirc/RAQN.33.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.3.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 seuil=$GRIS_1                                      \  #
                                        #    $Z                                 binariser=FAUX                                     \  #
                                        #    $Z                                 R=$xiirc/RAQN.33.3                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.01$X                                                     \  #
                                        #    $Z                                 A=$_____images.2.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 maximum=VRAI                                       \  #
                                        #    $Z                                 lineaire=VRAI depart=0.1 arrivee=1.0               \  #
                                        #    $Z                                 R=$xiirc/RAQN.33.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/vraies_C$X                                                        \  #
                                        #    $Z                                 A=$xiirc/RAQN.33.4                                 \  #
                                        #    $Z                                 p=$xiP/random.11$Fi                                \  #
                                        #    $Z                                 R=$xTV/RAQN.33.T                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/acces$X                                                           \  #
                                        #    $Z                                 A=$xiirc/RAQN.33.4                                 \  #
                                        #    $Z                                 convertir=VRAI                                     \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/lissage$X                                                         \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 passes=20                                          \  #
                                        #    $Z                                 R=$xTV/RAQN.33.S                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       PaRaM="$K_VIDE"                                                 #
                                        #    $Z             set       PaRaM="$PaRaM"" A=$xTV/RAQN.33.S"                               #
                                        #    $Z             set       PaRaM="$PaRaM"" standard=FAUX zero=FAUX"                        #
                                        #    $Z             set       PaRaM="$PaRaM"" T=$xTV/RAQN.33.T%s"                             #
                                        #    $Z             set       PaRaM="$PaRaM"" avion=VRAI"                                     #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/montagne.01$X  $PaRaM R=$xiirc/RAQN.33.4$m%s $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_RAQN_33:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image montre le calcul des racines troisiemes de l'unite dans les quaternions en      #
                                        # partant du plan complexe ("vD=0"), puis en progressant le long de la 'COMPOSANTE_J'.        #
                                        #                                                                                             #
                                        # Tout cela a ete recalcule sous la forme 'v $xiac/RAQN.73$R16' (et les autres...), suite     #
                                        # aux modifications 'v $ximcd/operator$FON 20230204091013'...                  #
v         $xiac/RAQN.73$R16
v         $xiac/RAQN.73$R64
v         $xiirc/RAQN.73.1              p=$xiP/fractal.A2
v         $xiirc/RAQN.73.2              p=$xiP/fractal.A2
v         $xiirc/RAQN.73.3              p=$xiP/sepia.00
v         $xiirc/RAQN.73.4              p=$xiP/cotes.31
v         $xiirc/RAQN.73.4              p=$xiP/random.11$Fi
v         $xiirc/RAQN.73.4              p=$xiP/random.A5
v         $xiirc/RAQN.73.4$m
                                        # Generee (sur '$LACT1B') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_RAQN_73:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=128                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/valeurs_inte$X p=$Premiere d=$Derniere                            \  #
                                        #    $Z                                 vD=0 vA=2                                          \  #
                                        #    $Z                                 cubique=FAUX                                       \  #
                                        #    $Z                                                     > $xT/COMPOSANTE_J                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/RAQN.73                                        #
                                        #                                                                                             #
                                        #    $Z             $xrc/racN.41$X                                                         \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 exposant=3                                         \  #
                                        #    $Z                                 iterations=10                                      \  #
                                        #    $Z                                 COMPOSANTE_J=$xT/COMPOSANTE_J                      \  #
                                        #    $Z                                 COMPOSANTE_K=0                                     \  #
                                        #    $Z                                 ponderationT=1                                     \  #
                                        #    $Z                                 ponderationP=0                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/COMPOSANTE_J                                                #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X                                                     \  #
                                        #    $Z                                 A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/rac3.11                                     \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/RAQN.73                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xci/gradient.01$X             #
                                        #    $c                                                     A=$_____images.%04d               #
                                        #    $c                                                     points=25                         #
                                        #    $c                                                     R=$_____images.1.%04d             #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.1.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 binariser=VRAI                                     \  #
                                        #    $Z                                 R=$xiirc/RAQN.73.1                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       NpOiNtS=`(calculNS pow(2*7+1,2)*$pi/4) | $SE -e 's/\..*$//'`    #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xci/gradient.01$X             #
                                        #    $c                                                     A=$_____images.%04d               #
                                        #    $c                                                     points=$NpOiNtS                   #
                                        #    $c                                                     circulaire=VRAI                   #
                                        #    $c                                                     R=$_____images.2.%04d             #
                                        #    $c                                                               $formatI\n"             #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$xci/solarise.11$Z             #
                                        #    $c                                                     $_____images.2.%04d               #
                                        #    $c                                                     $_____images.3.%04d               #
                                        #    $c                                                     $GRIS_1\n"                        #
                                        #    $c                                       ,n,n                                            #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.2.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 binariser=VRAI                                     \  #
                                        #    $Z                                 R=$xiirc/RAQN.73.2                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/accumule.02$X                                                     \  #
                                        #    $Z                                 A=$_____images.3.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 seuil=$GRIS_1                                      \  #
                                        #    $Z                                 binariser=FAUX                                     \  #
                                        #    $Z                                 R=$xiirc/RAQN.73.3                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/accumule.01$X                                                     \  #
                                        #    $Z                                 A=$_____images.2.                                  \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 trx=0 try=0                                        \  #
                                        #    $Z                                 inverser=VRAI                                      \  #
                                        #    $Z                                 maximum=VRAI                                       \  #
                                        #    $Z                                 lineaire=VRAI depart=0.1 arrivee=1.0               \  #
                                        #    $Z                                 R=$xiirc/RAQN.73.4                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/vraies_C$X                                                        \  #
                                        #    $Z                                 A=$xiirc/RAQN.73.4                                 \  #
                                        #    $Z                                 p=$xiP/random.11$Fi                                \  #
                                        #    $Z                                 R=$xTV/RAQN.73.T                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             $xci/acces$X                                                           \  #
                                        #    $Z                                 A=$xiirc/RAQN.73.4                                 \  #
                                        #    $Z                                 convertir=VRAI                                     \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/lissage$X                                                         \  #
                                        #    $Z                                 standard=FAUX                                      \  #
                                        #    $Z                                 passes=20                                          \  #
                                        #    $Z                                 R=$xTV/RAQN.73.S                                   \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       PaRaM="$K_VIDE"                                                 #
                                        #    $Z             set       PaRaM="$PaRaM"" A=$xTV/RAQN.73.S"                               #
                                        #    $Z             set       PaRaM="$PaRaM"" standard=FAUX zero=FAUX"                        #
                                        #    $Z             set       PaRaM="$PaRaM"" T=$xTV/RAQN.73.T%s"                             #
                                        #    $Z             set       PaRaM="$PaRaM"" avion=VRAI"                                     #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/montagne.01$X  $PaRaM R=$xiirc/RAQN.73.4$m%s $formatI                #
                                        #                                                                                             #
                                        #    :Fin_listG_RAQN_73:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image montre le calcul des racines troisiemes de l'unite dans les quaternions en      #
                                        # partant du plan complexe ("vD=0"), puis en progressant le long de la 'COMPOSANTE_J'.        #
                                        #                                                                                             #
                                        # Tout cela est formellement identique a {Debut_listG_RAQN_33,Debut_listG_RAQN_33} mais       #
                                        # apres les modifications 'v $ximcd/operator$FON 20230204091013'...                           #

v         $xiac/TOUR.C.11$R16
v         $xiac/TOUR.C.11$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 017724_017843                                               #
                                        #                                                                                             #
                                        # Ces images ont ete recalculees le 20060523154800 afin de beneficier de l'option             #
                                        # 'v $xrc/tour.01$K visualiser_la_falaise_avant_de_la_montagne_dans_Imontagnes_precises'      #
                                        # et en en profitant pour remplacer '$xiP/fractal.21' par '$xiP/fractal.A1'. On notera que    #
                                        # les dates anterieures ont ete conservees (sur '$LACT16', cela ayant fait que les            #
                                        # 'reference's sur '$LACT15' ne sont pas faits, ces images etant donc considerees comme       #
                                        # "A JOUR" comme cela fut constate le 20060901122407 ; cela a donc conduit a une mise a       #
                                        # jour de '$LACT15' et donc aussi de '$LACT17' et de '$CMAP28'...).                           #
                                        #                                                                                             #
                                        # Ces images ont ete recalculees le 20060901143013 afin d'utiliser la meme palette que        #
                                        # 'v $xiirc/TOUR.C.11.0032' c'est-a-dire '$xiP/fractal.A2'...                                 #
v         $xiac/TOUR.C.21$R16           p=$xiP/cercle.35
v         $xiac/TOUR.C.21$R16           p=$xiP/fractal.11
v         $xiac/TOUR.C.21$R64           p=$xiP/cercle.35
v         $xiac/TOUR.C.21$R64           p=$xiP/fractal.11
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 017965_018099                                               #
                                        #                   xivPdf 11 1 / 018100_018234                                               #
                                        #                                                                                             #
v         $xiac/TOUR.C.22$R16           p=$xiP/cercle.11
v         $xiac/TOUR.C.22$R16           p=$xiP/fractal.91
v         $xiac/TOUR.C.22$R16           p=$xiP/orange.11
v         $xiac/TOUR.C.22$R16           p=$xiP/random.06
v         $xiac/TOUR.C.22$R64           p=$xiP/cercle.11
v         $xiac/TOUR.C.22$R64           p=$xiP/fractal.91
v         $xiac/TOUR.C.22$R64           p=$xiP/orange.11
v         $xiac/TOUR.C.22$R64           p=$xiP/random.06
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 018235_018369                                               #
                                        #                   xivPdf 11 1 / 018370_018504                                               #
                                        #                   xivPdf 11 1 / 018505_018639                                               #
                                        #                   xivPdf 11 1 / 018640_018774                                               #
                                        #                                                                                             #
v         $xiac/TO.C.23$M$R16
v         $xiac/TO.C.23$M$R64
v         $xiac/TO.C.23$m$R16
v         $xiac/TO.C.23$m$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 018775_018909                                               #
                                        #                   xivPdf 11 1 / 018910_019044                                               #
                                        #                                                                                             #
v         $xiac/TOUR.C.41$MPEG
v         $xiac/TOUR.C.41$R16
v         $xiac/TOUR.C.41$R64
v         $xiirc/TOUR.C.41.0069
                                        # Generees par (sur '$LACT1B') :                                                              #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_TOUR_C_4:                                                                   #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             Pdu                                                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____Palette=$xiP/fractal.A2                                    #
                                        #                                                                                             #
                                        #    $Z             SET       _____images=$xTV/MAND.1                                         #
                                        #                                                                                             #
                                        #    $Z             $xrc/tour.01$X                                                         \  #
                                        #    $Z                                 pas=8                                              \  #
                                        #    $Z                                 RC=$xTV/MAND.1.C                                   \  #
                                        #    $Z                                 RE=$xTV/MAND.1.E                                   \  #
                                        #    $Z                                 RM=$xTV/MAND.1.M                                   \  #
                                        #    $Z                                 RT=$xTV/MAND.1.T                                   \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                 $formatI                                              #
                                        #                                                                                             #
                                        #    $Z             xTV                                                                       #
                                        #                                                                                             #
                                        #    $Z             SET       MaNdEL=`GetLeaf $_____images`                                   #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=`ls $MaNdEL.???? |& $HEA -1 | $SE -e "s/^$MaNdEL.//"`  #
                                        #    $Z             SET       Derniere=`ls $MaNdEL.???? |& $TAI -1 | $SE -e "s/^$MaNdEL.//"`  #
                                        #                                                                                             #
                                        # On notera les "|&"s ci-dessus destines a eviter les messages "ls: No match." lors           #
                                        # du 'glistN' de 'Debut_listG_TOUR_C_4'...                                                    #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X  A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$_____Palette RVB=VRAI                           \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/TOUR.C.41                                  #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             SET       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       NuMeRo=0069                                                     #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/neutre$X       A=$_____images.$NuMeRo%s                           \  #
                                        #    $Z                                 R=$xiirc/`GetLeaf $_____animation`.$NuMeRo%s       \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    :Fin_listG_TOUR_C_4:                                                                     #
                                        #                                                                                             #

v         $xiac/TO.Q.11.0$R16
v         $xiac/TO.Q.11.0$R64

v         $xiac/TO.Q.11.1$R16
v         $xiac/TO.Q.11.1$R64

v         $xiac/TO.Q.11.2$R16
v         $xiac/TO.Q.11.2$R64

v         $xiac/TO.Q.11.3$R16
v         $xiac/TO.Q.11.3$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 019045_019178                                               #
                                        #                   xivPdf 11 1 / 019179_019312                                               #
                                        #                   xivPdf 11 1 / 019313_019446                                               #
                                        #                   xivPdf 11 1 / 019447_019580                                               #
                                        #                                                                                             #
v         $xiac/TO.Q.24$R16
v         $xiac/TO.Q.24$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 019581_019714                                               #
                                        #                                                                                             #
v         $xiac/TO.Q.340$R16
v         $xiac/TO.Q.340$R64

v         $xiac/TO.Q.380$R16
v         $xiac/TO.Q.380$R64

v         $xiac/TO.Q.3G0$R16
v         $xiac/TO.Q.3G0$R64

v         $xiac/TO.Q.3X0$R16
v         $xiac/TO.Q.3X0$R64
                                        # Correspond aux sequences d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 019715_019848                                               #
                                        #                   xivPdf 11 1 / 019849_019982                                               #
                                        #                   xivPdf 11 1 / 019983_020116                                               #
                                        #                   xivPdf 11 1 / 020117_020250                                               #
                                        #                                                                                             #

v         $xiac/VERH.71$R16             p=$xiP/cercle.35
v         $xiac/VERH.71$R64             p=$xiP/cercle.35
                                        # Generee (sur '$LACT16') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VERH_71:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=0                                                      #
                                        #    $Z             SET       Derniere=127                                                    #
                                        #                                                                                             #
                                        #    $Z             @         Nimages = $Derniere - $Premiere                                 #
                                        #    $Z             @         Nimages = $Nimages + 1                                          #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/VERH.71                                        #
                                        #                                                                                             #
                                        #    $Z             $xrc/verhulst.01$X                                                     \  #
                                        #    $Z                                 images=$Nimages                                    \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       _____animation=$xiac/VERH.71                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.ITER.1.12._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VERH_71:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Cette image est une belle demonstration de l'auto-similarite et correspond a une version    #
                                        # "modernisee" de :                                                                           #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 004404_004531                                                #
                                        #                                                                                             #
                                        # faite pour 'v $xiMd/HommageBenoitMandelbrot.21$m4'...                                       #

v         $xiac/VONK.11$R16             p=$xiP/fractal.91
v         $xiac/VONK.11$R64             p=$xiP/fractal.91
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 034073_034200                                                #
                                        #                                                                                             #
v         $xiac/VONK.21$R16             p=$xiP/fractal.91
v         $xiac/VONK.21$R64             p=$xiP/fractal.91
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 034201_034328                                                #
                                        #                                                                                             #
v         $xiac/VONK.22$R16             p=$xiP/fractal.91
v         $xiac/VONK.22$R64             p=$xiP/fractal.91
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 034329_034456                                                #
                                        #                                                                                             #
v         $xiac/VONK.31$R16             p=$xiP/gris.01
v         $xiac/VONK.31$R64             p=$xiP/gris.01
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 11 1 / 033246_033373                                               #
                                        #                                                                                             #
v         $xiac/VONK.44$MPEG
v         $xiac/VONK.44$R04
                                        # Generee (sur '$CMAP28' -ex "porte-brancion"- puis sur '$LACT1A' pour le '$MPEG') par :      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_44:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesA1=$xTV/VONK.1                                       #
                                        #    $Z             set       _____ImagesA2=$xTV/VONK.2                                       #
                                        #    $Z             set       _____ImagesA3=$xTV/VONK.3                                       #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $_____ImagesA1.*                                  >& $nul       #
                                        #    $Z             $DELETE   $_____ImagesA2.*                                  >& $nul       #
                                        #    $Z             $DELETE   $_____ImagesA3.*                                  >& $nul       #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.01                                                 #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=3                                                  #
                                        #    $Z             set       _____ImagesR=$_____ImagesA1                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.005                                                #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=0.5                                                #
                                        #    $Z             set       _____ImagesR=$_____ImagesA2                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        # Ainsi, on gaspille un peu (beaucoup ?) en calculant 16 images, alors que 2 suffisent...     #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xTV/VONK                                          #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.VONK.51.2._____U)                 #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0003%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0001%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             set                 PaRaMeTrEs="$K_VIDE"                                  #
                                        #    $Z             set                 PaRaMeTrEs="$PaRaMeTrEs"" centrer=FAUX"               #
                                        #    $Z             set                 PaRaMeTrEs="$PaRaMeTrEs"" anti_aliasing=VRAI"         #
                                        #                                                                                             #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs"" taille=3"                  #
                                        #    $Z             set                 PaRaMeTrEs2="$PaRaMeTrEs"" taille=2"                  #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$_____ImagesR.0005%s                             \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesR.0005%s                             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0001%s                           \  #
                                        #    $Z                                 A2=$_____ImagesR.0005%s                            \  #
                                        #    $Z                                 R=$_____ImagesA3.0002%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB  "$xci/message$X                                                         \  #
                                        #    $Z                                 A=$NOIR                                            \  #
                                        #    $Z                                 message="1"                                        \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.160 Y=0.550                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="2"                                        \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.410 Y=0.730                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="3"                                        \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.570 Y=0.730                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="4"                                        \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.807 Y=0.550                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/dilate.01$X                                                       \  #
                                        #    $Z                                 dilater=VRAI                                       \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesR.0005%s                            \  #
                                        #    $Z                                 R=$_____ImagesR.0005%s                             \  #
                                        #    $Z                                                               $formatI"               #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0002%s                           \  #
                                        #    $Z                                 A2=$_____ImagesR.0005%s                            \  #
                                        #    $Z                                 R=$_____ImagesA3.0003%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB  "$xci/message$X                                                         \  #
                                        #    $Z                                 A=$NOIR                                            \  #
                                        #    $Z                                 message="N=4"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 centrer=VRAI Y=0.50                                \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/dilate.01$X                                                       \  #
                                        #    $Z                                 dilater=VRAI                                       \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0003%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0004%s                            \  #
                                        #    $Z                                                                         $formatI"     #
                                        #    $Z             set                 Xmaxs3=`calculINS ($dimX/3)-1`                        #
                                        #    $Z             set                 Ymaxs3=`calculINS ($dimY/3)-1`                        #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/format.01$X                                                       \  #
                                        #    $Z                                 A=$_____ImagesR.0003%s                             \  #
                                        #    $Z                                 mode=2                                             \  #
                                        #    $Z                                                     $formatI                       \  #
                                        #    $Z                                 R=$xTV/VONK.44.0%s                                 \  #
                                        #    $Z                                                     XmaxR=$Xmaxs3 YmaxR=$Ymaxs3       #
                                        #                                                                                             #
                                        #    $Z             XYmaxNe             $Xmaxs3 $Ymaxs3                                       #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/format.01$X                                                       \  #
                                        #    $Z                                 A=$xTV/VONK.44.0%s                                 \  #
                                        #    $Z                                 mode=3                                             \  #
                                        #    $Z                                                               $formatI             \  #
                                        #    $Z                                 R=$xTV/VONK.44.1%s                                 \  #
                                        #    $Z                                                               $formatR_Pal            #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/dilate.01$X                                                       \  #
                                        #    $Z                                 A=$xTV/VONK.44.1%s                                 \  #
                                        #    $Z                                 dilater=VRAI                                       \  #
                                        #    $Z                                 R=$xTV/VONK.44.1%s                                 \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xTV/VONK.44.1%s                                 \  #
                                        #    $Z                                 toreX=FAUX trX=`calcul 1/3`                        \  #
                                        #    $Z                                 toreY=FAUX trY=0                                   \  #
                                        #    $Z                                 R=$xTV/VONK.44.2%s                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xTV/VONK.44.1%s                                 \  #
                                        #    $Z                                 toreX=FAUX trX=`calcul 2/3`                        \  #
                                        #    $Z                                 toreY=FAUX trY=0                                   \  #
                                        #    $Z                                 R=$xTV/VONK.44.3%s                                 \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0004%s                           \  #
                                        #    $Z                                 A2=$xTV/VONK.44.1%s                                \  #
                                        #    $Z                                 R=$_____ImagesA3.0005%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0005%s                           \  #
                                        #    $Z                                 A2=$xTV/VONK.44.2%s                                \  #
                                        #    $Z                                 R=$_____ImagesA3.0006%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0006%s                           \  #
                                        #    $Z                                 A2=$xTV/VONK.44.3%s                                \  #
                                        #    $Z                                 R=$_____ImagesA3.0007%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z   execRVB  "$xci/message$X                                                         \  #
                                        #    $Z                                 A=$NOIR                                            \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs2                                       \  #
                                        #    $Z                                 X=0.130 Y=0.120                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs2                                       \  #
                                        #    $Z                                 X=0.464 Y=0.120                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs2                                       \  #
                                        #    $Z                                 X=0.796 Y=0.120                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/dilate.01$X                                                       \  #
                                        #    $Z                                 dilater=VRAI                                       \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0007%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0008%s                            \  #
                                        #    $Z                                                               $formatI"               #
                                        #    $Z   execRVB  "$xci/message$X                                                         \  #
                                        #    $Z                                 A=$NOIR                                            \  #
                                        #    $Z                                 message="H=3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 centrer=VRAI Y=0.35                                \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/dilate.01$X                                                       \  #
                                        #    $Z                                 dilater=VRAI                                       \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0008%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0009%s                            \  #
                                        #    $Z                                                               $formatI"               #
                                        #                                                                                             #
                                        #    $Z             set       LImAgEs=$_____ImagesA3                                          #
                                        #    $Z   set       LIm=`ls $LImAgEs.*$ROUGE | $SE -e "s+^$LImAgEs\.0*\(.*\)\$ROUGE"'$+\1+'`  #
                                        #    $Z             unset     LImAgEs                                                         #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=$LIm[1]                                                #
                                        #    $Z             set       Derniere=$LIm[$#LIm]                                            #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesA3                                      #
                                        #    $Z             set       _____animation=$xiac/VONK.44                                    #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_04$Z           $_____images.                            \  #
                                        #    $Z                                           $_____animation                          \  #
                                        #    $Z                                           $Premiere $Derniere                      \  #
                                        #    $Z                                           VRAI FAUX FAUX                              #
                                        #                                                                                             #
                                        #    $Z             set       Derniere=$LIm[$#LIm]                                            #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             set       _____PaletteMPEG=RVB                                            #
                                        #    $Z             set       _____LRepetitions=`GenListe $#LIm $Seconde`                     #
                                        #    $m4            _____include(_____xivPdf_06_2/.TUR2.1.11._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_44:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.51$R16
                                        # Generee (sur '$LACT15') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_51:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV                 $xTG                                        #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesA1=$xTV/VONK.1                                       #
                                        #    $Z             set       _____ImagesA2=$xTV/VONK.2                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.01                                                 #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=3                                                  #
                                        #    $Z             set       _____ImagesR=$_____ImagesA1                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.005                                                #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=0.5                                                #
                                        #    $Z             set       _____ImagesR=$_____ImagesA2                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xTV/VONK                                          #
                                        #    $m4            _____include(_____xiirc/.VONK.51.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/VONK.51                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.f.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_51:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.52$MPEG
v         $xiac/VONK.52$R04
v         $xiac/VONK.52$R16
v         $xiirc/VONK.52.0001
v         $xiirc/VONK.52.0002
v         $xiirc/VONK.52.0001.0002
                                        # Generee (sur '$LACT1A') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_52:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesA1=$xTV/VONK.1                                       #
                                        #    $Z             set       _____ImagesA2=$xTV/VONK.2                                       #
                                        #    $Z             set       _____ImagesA3=$xTV/VONK.3                                       #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.01                                                 #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=3                                                  #
                                        #    $Z             set       _____ImagesR=$_____ImagesA1                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.005                                                #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=0.5                                                #
                                        #    $Z             set       _____ImagesR=$_____ImagesA2                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xTV/VONK                                          #
                                        #    $m4            _____include(_____xiirc/.VONK.51.2._____U)                 #
                                        #    $m4            _____include(_____xiirc/.VONK.51.3._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=1                                                      #
                                        #    $Z             set       Derniere=16                                                     #
                                        #    $Z             set       _____images=$_____ImagesR                                       #
                                        #    $Z             set       _____animation=$xiac/VONK.52                                    #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.f.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0001%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0001%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0003%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0002%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0005%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0003%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0016%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0004%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_04$Z           $_____ImagesA3.                          \  #
                                        #    $Z                                           $_____animation                          \  #
                                        #    $Z                                           1 4                                      \  #
                                        #    $Z                                           VRAI VRAI VRAI                              #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/format.01$X                                             \  #
                                        #    $Z                                           A=$_____animation$R04%s                  \  #
                                        #    $Z                                                                         $formatI   \  #
                                        #    $Z                                           mode=2                                   \  #
                                        #    $Z                                           R=$_____animation$R04%s                  \  #
                                        #    $Z                                                                         $formatR_Pdu  #
                                        #                                                                                             #
                                        #    $Z             set       Save_____ImagesR=$_____ImagesR                                  #
                                        #    $Z             set       _____ImagesR=$xiirc/VONK.52                                     #
                                        #                                                                                             #
                                        #    $Z             set                 PaRaMeTrEs1="$K_VIDE"                                 #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs1"" taille=3"                 #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs1"" centrer=FAUX"             #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs1"" anti_aliasing=VRAI"       #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/message$X                                                         \  #
                                        #    $Z                                 A=$_____ImagesA3.0001%s                            \  #
                                        #    $Z                                 message="1"                                        \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 centrer=VRAI Y=0.30                                \  #
                                        #    $Z                                 R=$_____ImagesR.0001%s                             \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB  "$xci/message$X                                                         \  #
                                        #    $Z                                 A=$_____ImagesA3.0002%s                            \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.120 Y=0.420                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.290 Y=0.550                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.600 Y=0.550                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.770 Y=0.420                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3_+_1/3_+_1/3_+_1/3_=_4/3"              \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 UnderScoreEspace=VRAI                              \  #
                                        #    $Z                                 centrer=VRAI                                       \  #
                                        #    $Z                                 Y=0.300                                            \  #
                                        #    $Z                                 R=$_____ImagesR.0002%s                             \  #
                                        #    $Z                                                               $formatI"               #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$_____ImagesR.0001%s                             \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=-0.20                                          \  #
                                        #    $Z                                 R=$xTV/VONK.52.0001%s                              \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB  "$xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$_____ImagesR.0002%s                             \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=-0.25                                          \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.40                                          \  #
                                        #    $Z                                 R=$xTV/VONK.52.0002%s                              \  #
                                        #    $Z                                                               $formatI"               #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$xTV/VONK.52.0001%s                             \  #
                                        #    $Z                                 A2=$xTV/VONK.52.0002%s                             \  #
                                        #    $Z                                 R=$_____ImagesR.0001.0002%s                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$Save_____ImagesR                                  #
                                        #    $m4            _____include(_____xiirc/.VONK.51.4._____U)                 #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             set       _____PaletteMPEG=RVB                                            #
                                        #    $m4            _____include(_____xivPdf_06_2/.TUR2.1.11._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_52:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.53$MPEG
v         $xiac/VONK.53$R04
                                        # Generee (sur '$CMAP28' -ex "porte-brancion"- puis sur '$LACT1A' pour le '$MPEG') par :      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_53:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesA1=$xTV/VONK.1                                       #
                                        #    $Z             set       _____ImagesA2=$xTV/VONK.2                                       #
                                        #    $Z             set       _____ImagesA3=$xTV/VONK.3                                       #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $_____ImagesA1.*                                  >& $nul       #
                                        #    $Z             $DELETE   $_____ImagesA2.*                                  >& $nul       #
                                        #    $Z             $DELETE   $_____ImagesA3.*                                  >& $nul       #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.01                                                 #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=3                                                  #
                                        #    $Z             set       _____ImagesR=$_____ImagesA1                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set       _____Rayon=0.005                                                #
                                        #    $Z             set       _____Apoints=16                                                 #
                                        #    $Z             set       _____Rpoints=0.5                                                #
                                        #    $Z             set       _____ImagesR=$_____ImagesA2                                     #
                                        #    $m4            _____include(_____xiirc/.VONK.41.1._____U)                 #
                                        #                                                                                             #
                                        # Ainsi, on gaspille un peu (beaucoup ?) en calculant 16 images, alors que 2 suffisent...     #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesR=$xTV/VONK                                          #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.VONK.51.2._____U)                 #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0001%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0001%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             execRVB   $xci/neutre$X                                                \  #
                                        #    $Z                                           A=$_____ImagesR.0003%s                   \  #
                                        #    $Z                                           R=$_____ImagesA3.0003%s                  \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             set                 PaRaMeTrEs1="$K_VIDE"                                 #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs1"" taille=3"                 #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs1"" centrer=FAUX"             #
                                        #    $Z             set                 PaRaMeTrEs1="$PaRaMeTrEs1"" anti_aliasing=VRAI"       #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$_____ImagesA3.0001%s                            \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=-0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesA3.0001%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/message$X                                                         \  #
                                        #    $Z                                 A=$_____ImagesA3.0001%s                            \  #
                                        #    $Z                                 message="1"                                        \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 centrer=VRAI Y=0.10                                \  #
                                        #    $Z                                 R=$_____ImagesA3.0002%s                            \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB  "$xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$_____ImagesA3.0003%s                            \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=-0.25                                          \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.40                                          \  #
                                        #    $Z                                 R=$_____ImagesA3.0003%s                            \  #
                                        #    $Z                                                               $formatI"               #
                                        #                                                                                             #
                                        #    $Z   execRVB  "$xci/message$X                                                         \  #
                                        #    $Z                                 A=$_____ImagesA3.0003%s                            \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.120 Y=0.570                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.290 Y=0.700                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.600 Y=0.700                                    \  #
                                        #    $Z                                                               $formatI       |     \  #
                                        #    $Z             $xci/message$X                                                         \  #
                                        #    $Z                                 message="1/3"                                      \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 X=0.770 Y=0.570                                    \  #
                                        #    $Z                                 R=$_____ImagesA3.0004%s                            \  #
                                        #    $Z                                                               $formatI"               #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/message$X                                                         \  #
                                        #    $Z                                 A=$_____ImagesA3.0004%s                            \  #
                                        #    $Z                                 message="1/3_+_1/3_+_1/3_+_1/3_=_4/3"              \  #
                                        #    $Z                                 $PaRaMeTrEs1                                       \  #
                                        #    $Z                                 UnderScoreEspace=VRAI                              \  #
                                        #    $Z                                 centrer=VRAI                                       \  #
                                        #    $Z                                 Y=0.450                                            \  #
                                        #    $Z                                 R=$_____ImagesA3.0005%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0002%s                           \  #
                                        #    $Z                                 A2=$_____ImagesA3.0005%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0006%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       LImAgEs=$_____ImagesA3                                          #
                                        #    $Z   set       LIm=`ls $LImAgEs.*$ROUGE | $SE -e "s+^$LImAgEs\.0*\(.*\)\$ROUGE"'$+\1+'`  #
                                        #    $Z             unset     LImAgEs                                                         #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=$LIm[1]                                                #
                                        #    $Z             set       Derniere=$LIm[4]                                                #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesA3                                      #
                                        #    $Z             set       _____animation=$xiac/VONK.53                                    #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_04$Z           $_____images.                            \  #
                                        #    $Z                                           $_____animation                          \  #
                                        #    $Z                                           $Premiere $Derniere                      \  #
                                        #    $Z                                           VRAI FAUX FAUX                              #
                                        #                                                                                             #
                                        #    $Z             set       Derniere=$LIm[$#LIm]                                            #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             set       _____PaletteMPEG=RVB                                            #
                                        #    $Z             set       _____LRepetitions=`GenListe $#LIm $Seconde`                     #
                                        #    $m4            _____include(_____xivPdf_06_2/.TUR2.1.11._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_53:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.61$R16
                                        # Generee (sur '$LACT19') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_61:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #    $Z             setenv    LONGUEUR_NOMS       $xLONGUEUR_NOMS                             #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/VONK.6                                         #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $c             #define   N0        Premiere                                              #
                                        #    $c             #define   N         Derniere                                              #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       double    xDD=1.0;                                              #
                                        #    $c                       double    xDA=3.0;                                              #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/Cfract_2D.01$X            #
                                        #    $c                                                     xG=0.0 xD=%f                      #
                                        #    $c                                                     yG=0.2 yD=0.2                     #
                                        #    $c                                                     rectangulaire=FAUX                #
                                        #    $c                                                     grand_carre=VRAI                  #
                                        #    $c                                                     argument=FAUX                     #
                                        #    $c                                                     $formatI                      |   #
                                        #    $c                                         $xci/dilate.01$X               #
                                        #    $c                                                     $formatI                      |   #
                                        #    $c                                         $xci/convol.01$X               #
                                        #    $c                                                     R=$_____images.%04d               #
                                        #    $c                                                     $formatI\n"                       #
                                        #    $c                                       ,((xDA*(n-N0))+(xDD*(N-n)))/(N-N0)              #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $xci/vraies_C.01$X  A=$_____images.                                    \  #
                                        #    $Z                                 premiere=$Premiere derniere=$Derniere              \  #
                                        #    $Z                                 p=$xiP/gris.01 RVB=VRAI                            \  #
                                        #    $Z                                 R=$_____images.                                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       NPremiere=`$xci/nombres$X p=$Premiere d=$Premiere`              #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 niveau=$NOIR                                       \  #
                                        #    $Z                                 R=$_____images.$NPremiere$ROUGE                    \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 niveau=$NOIR                                       \  #
                                        #    $Z                                 R=$_____images.$NPremiere$BLEUE                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       NDerniere=`$xci/nombres$X p=$Derniere d=$Derniere`              #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 niveau=$NOIR                                       \  #
                                        #    $Z                                 R=$_____images.$NDerniere$VERTE                    \  #
                                        #    $Z                                                               $formatI                #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 niveau=$NOIR                                       \  #
                                        #    $Z                                 R=$_____images.$NDerniere$BLEUE                    \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set                 _____animation=$xiac/VONK.61                          #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_61:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.62$R16
                                        # Generee (sur '$LACT19') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_62:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        # On notera le 20180129115559 que 'v $xrc/Cfract_2D.01$K store_point_valide' utilise          #
                                        # donc 'store_point_valide(...)' pour marquer les points et donc si l'on passe de 'Pal'       #
                                        # a 'Pdu', les points restent des points. Si ensuite une reduction est faite (par exemple     #
                                        # avec "//2" dans 'x $xiMo/creation$Z RapportXY', l'image resultant sera alors moins          #
                                        # "lisible"...                                                                                #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/VONK.6                                         #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=16                                                     #
                                        #                                                                                             #
                                        #    $m4            _____include(_____xiirc/.VONK.62.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.VONK.62.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set                 _____animation=$xiac/VONK.62                          #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_62:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.63$MPEG
v         $xiac/VONK.63$R16
v         $xiac/VONK.63$R64
                                        # Generee (sur '$LACT1A', puis sur '$LACT19', puis sur '$LACT1B' -a cause du '$MPEG'-) par :  #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_63:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$xTV/VONK.6                                         #
                                        #                                                                                             #
                                        #    $Z             SET       Premiere=1                                                      #
                                        #    $Z             SET       Derniere=128                                                    #
                                        #                                                                                             #
                                        #    $Z             set       _____TranslationY=0                                             #
                                        #    $m4            _____include(_____xiirc/.VONK.62.1._____U)                 #
                                        #    $m4            _____include(_____xiirc/.VONK.63.2._____U)                 #
                                        #                                                                                             #
                                        #    $Z             set                 _____animation=$xiac/VONK.63                          #
                                        #    $m4            _____include(_____xivPdf_09_2/.REFL.c.14._____U)           #
                                        #                                                                                             #
                                        #    $Z             set       _____ImageT=$_____images.                                       #
                                        #    $Z             set       _____Animation=$_____animation                                  #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             SET       _____PaletteMPEG=RVB                                            #
                                        #    $Z             set       _____PostFixeMP=$MPEG                                           #
                                        #    $m4            _____include(_____xiirs/.MOBI.13.1._____U)                 #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_63:                                                                      #
                                        #                                                                                             #
v         $xiac/VONK.81$MPEG
v         $xiac/VONK.81$R04
                                        # Generee (sur '$CMAP28' -ex "porte-brancion"- puis sur '$LACT1A' pour le '$MPEG') par :      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_81:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             set       _____ImagesA1=$xTV/VONK.1                                       #
                                        #    $Z             set       _____ImagesA3=$xTV/VONK.3                                       #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $_____ImagesA1.*                                  >& $nul       #
                                        #    $Z             $DELETE   $_____ImagesA3.*                                  >& $nul       #
                                        #                                                                                             #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0001$ROUGE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0001$VERTE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.10$BLEUE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=-0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesA1.0001$BLEUE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.12$ROUGE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=0                                              \  #
                                        #    $Z                                 R=$_____ImagesA1.0002$ROUGE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0002$VERTE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0002$BLEUE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.20$ROUGE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=0                                              \  #
                                        #    $Z                                 R=$_____ImagesA1.0003$ROUGE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0003$VERTE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0003$BLEUE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.23$ROUGE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesA1.0004$ROUGE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0004$VERTE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.23$BLEUE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesA1.0004$BLEUE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.30$ROUGE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesA1.0005$ROUGE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/init$X                                                            \  #
                                        #    $Z                                 n=$NOIR                                            \  #
                                        #    $Z                                 R=$_____ImagesA1.0005$VERTE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #    $Z             $xci/scroll$X                                                          \  #
                                        #    $Z                                 A=$xiirc/VONK.81.30$BLEUE                          \  #
                                        #    $Z                                 toreY=FAUX                                         \  #
                                        #    $Z                                 trY=+0.20                                          \  #
                                        #    $Z                                 R=$_____ImagesA1.0005$BLEUE                        \  #
                                        #    $Z                                                                         $formatI      #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$NOIR                                           \  #
                                        #    $Z                                 A2=$_____ImagesA1.0001%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0001%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0001%s                           \  #
                                        #    $Z                                 A2=$_____ImagesA1.0002%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0002%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0001%s                           \  #
                                        #    $Z                                 A2=$_____ImagesA1.0003%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0003%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0003%s                           \  #
                                        #    $Z                                 A2=$_____ImagesA1.0004%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0004%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z   execRVB   $xci/or_02$X                                                           \  #
                                        #    $Z                                 A1=$_____ImagesA3.0003%s                           \  #
                                        #    $Z                                 A2=$_____ImagesA1.0005%s                           \  #
                                        #    $Z                                 R=$_____ImagesA3.0005%s                            \  #
                                        #    $Z                                                               $formatI                #
                                        #                                                                                             #
                                        #    $Z             set       LImAgEs=$_____ImagesA3                                          #
                                        #    $Z   set       LIm=`ls $LImAgEs.*$ROUGE | $SE -e "s+^$LImAgEs\.0*\(.*\)\$ROUGE"'$+\1+'`  #
                                        #    $Z             unset     LImAgEs                                                         #
                                        #                                                                                             #
                                        #    $Z             set       Premiere=$LIm[1]                                                #
                                        #    $Z             set       Derniere=4                                                      #
                                        #                                                                                             #
                                        #    $Z             set       _____images=$_____ImagesA3                                      #
                                        #    $Z             set       _____animation=$xiac/VONK.81                                    #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_04$Z           $_____images.                            \  #
                                        #    $Z                                           $_____animation                          \  #
                                        #    $Z                                           $Premiere $Derniere                      \  #
                                        #    $Z                                           VRAI FAUX FAUX                              #
                                        #                                                                                             #
                                        #    $Z             set       Derniere=$LIm[$#LIm]                                            #
                                        #                                                                                             #
                                        #    $Z             SET       _____InverserMPEG=$NEXIST                                       #
                                        #    $Z             set       _____PaletteMPEG=RVB                                            #
                                        #    $Z             set       _____LRepetitions=`GenListe $#LIm $Seconde`                     #
                                        #    $m4            _____include(_____xivPdf_06_2/.TUR2.1.11._____U)           #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_81:                                                                      #
v         $xiac/VONK.A1$R16
v         $xiac/VONK.A1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 034585_034712                                                #
                                        #                                                                                             #
v         $xiac/VONK.a1$R16
v         $xiac/VONK.a1$R64
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 9 1 / 034713_034840                                                #
                                        #                                                                                             #
v         $xiac/VONK.b1$R16
v         $xiac/VONK.b1$R64
                                        # Generee (sur '$LACT1A') par :                                                               #
                                        #                                                                                             #
                                        #                                                                                             #
                                        #    :Debut_listG_VONK_b1:                                                                    #
                                        #                                                                                             #
                                        #    $Z             Pal                                                                       #
                                        #                                                                                             #
                                        #    $Z             setenv    xTV       $xTG                                                  #
                                        #                                                                                             #
                                        #    $Z             SET       Nimages=128                                                     #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/ANGLES                                                      #
                                        #                                                                                             #
                                        #    $Z             $xcg/scale$X   multiplicateur=0 nombre=$pi diviseur=3  >   $xT/ANGLES     #
                                        #    $Z             saut                                                   >>! $xT/ANGLES     #
                                        #    $Z             $xcg/scale$X   multiplicateur=1 nombre=$pi diviseur=3  >>! $xT/ANGLES     #
                                        #    $Z             saut                                                   >>! $xT/ANGLES     #
                                        #    $Z             $xcg/scale$X   multiplicateur=4 nombre=$pi diviseur=3  >>! $xT/ANGLES     #
                                        #    $Z             saut                                                   >>! $xT/ANGLES     #
                                        #    $Z             $xcg/scale$X   multiplicateur=1 nombre=$pi diviseur=3  >>! $xT/ANGLES     #
                                        #                                                                                             #
                                        #    $c             #define   N0        1                                                     #
                                        #    $c             #define   N         Nimages                                               #
                                        #                                                                                             #
                                        #    $c             int       main()                                                          #
                                        #    $c                       {                                                               #
                                        #    $c                       int       n;                                                    #
                                        #                                                                                             #
                                        #    $c                       double    rapportD=3.0;                                         #
                                        #    $c                       double    rapportA=2.0;                                         #
                                        #                                                                                             #
                                        #    $c                       double    zoomD=1.30;                                           #
                                        #    $c                       double    zoomA=0.22;                                           #
                                        #                                                                                             #
                                        #    $c                       for       (n=N0 ; n<=N ; n++)                                   #
                                        #    $c                                 {                                                     #
                                        #    $c                                 printf("$xrc/Cfract_4D.11$X            #
                                        #    $c                                                     iterations=4                      #
                                        #    $c                                                     ANGLE_DE_ROTATION_1=$pis2         #
                                        #    $c                                                     ANGLE_DE_ROTATION_2=$pis2         #
                                        #    $c                                                     ANGLE_DE_ROTATION_3=$xT/ANGLES    #
                                        #                                                                                             #
                                        # Voir 'v $xtKg/rotations_HC.02$K' pour comprendre le choix de {$pis2,$pis2,...}...           #
                                        #                                                                                             #
                                        #    $c                                                     rapport=%f                        #
                                        #    $c                                                     yG=-0.6 yD=-0.6                   #
                                        #    $c                                                     aleatoire=FAUX quaternion=VRAI    #
                                        #    $c                                                     recursion=6                       #
                                        #    $c                                                     Lz=1000                           #
                                        #    $c                                                     rayon_de_visualisation=0.01       #
                                        #    $c                                                     ZOOM=%f                           #
                                        #    $c                                                     R=$xT/VONK.b.                     #
                                        #    $c                                                     $formatI\n"                       #
                                        #    $c                                       ,((rapportA*(n-N0))+(rapportD*(N-n)))/(N-N0)    #
                                        #    $c                                       ,((zoomA*(n-N0))+(zoomD*(N-n)))/(N-N0)          #
                                        #    $c                                       ,n                                              #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$MV         $xT/VONK.b.%04d$ROUGE             #
                                        #    $c                                                     $xw1/VONK.b.%04d$ROUGE\n"         #
                                        #    $c                                       ,N0,n                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$MV         $xT/VONK.b.%04d$VERTE             #
                                        #    $c                                                     $xw1/VONK.b.%04d$VERTE\n"         #
                                        #    $c                                       ,N0,n                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 printf("$MV         $xT/VONK.b.%04d$BLEUE             #
                                        #    $c                                                     $xw1/VONK.b.%04d$BLEUE\n"         #
                                        #    $c                                       ,N0,n                                           #
                                        #    $c                                        );                                             #
                                        #    $c                                 }                                                     #
                                        #    $c                       }                                                               #
                                        #                                                                                             #
                                        #    $Z             $DELETE   $xT/ANGLES                                                      #
                                        #                                                                                             #
                                        #    $Z             $xci/reduction_16$Z $xw1/VONK.b.        $xiac/VONK.b1       1 $Nimages    #
                                        #    $Z             $xci/reduction_64$Z $xw1/VONK.b.        $xiac/VONK.b1       1 $Nimages    #
                                        #                                                                                             #
                                        #    :Fin_listG_VONK_b1:                                                                      #
                                        #                                                                                             #
                                        #                                                                                             #
                                        # Ces images correspondent en fait a 'v $xiac/VONK.a1$R16' et 'v $xiac/VONK.a1$R64'           #
                                        # regenerees a cause de la grave erreur 'v $ximcd/operator$FON 20181201121241'...             #

v         $xiac/ZET$Mo.21.1$R16    p=$xiP/cercle.22         t=16      d=4       ralenti=16
v         $xiac/ZET$Mo.21.2$R16    p=$xiP/cercle.22         t=16      d=4       ralenti=16
v         $xiac/ZET$Mo.21.1$R64    p=$xiP/cercle.22         t=64      d=4       ralenti=32
v         $xiac/ZET$Mo.21.2$R64    p=$xiP/cercle.22         t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 010616_010743                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 1, de 2...                                                  #
v         $xiac/ZET$Ph.21.1$R16    p=$xiP/cercle.11         t=16      d=4       ralenti=16
v         $xiac/ZET$Ph.21.2$R16    p=$xiP/cercle.11         t=16      d=4       ralenti=16
v         $xiac/ZET$Ph.21.1$R64    p=$xiP/cercle.11         t=64      d=4       ralenti=32
v         $xiac/ZET$Ph.21.2$R64    p=$xiP/cercle.11         t=64      d=4       ralenti=32
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 010744_010871                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 1, de 2...                                                  #
v         $xiac/ZET$Mo.22.1$R16    p=$xiP/cercle.22         t=16      d=4       ralenti=16
v         $xiac/ZET$Mo.22.2$R16    p=$xiP/cercle.22         t=16      d=4       ralenti=16
                                        # Correspond a la sequence d'images suivantes :                                               #
                                        #                                                                                             #
                                        #                   xivPdf 2 1 / 010872_010903                                                #
                                        #                                                                                             #
                                        # avec respectivement un "pas" de 1, de 2...                                                  #

#######################################################################################################################################
#                                                                                                                                     #
#         I M A G E S   L E S   P L U S   P E R T I N E N T E S  :                                                                    #
#                                                                                                                                     #
#######################################################################################################################################

v         $xiac/JULI.91$R16             p=$xiP/fractal.11
v         $xiac/JULI.22$R16             p=$xiP/fractal.11
                                        # 16 ensembles de Julia dans les complexes lors d'une promenade autour de Mandelbrot...       #

v         $xiac/JU.53$m$R04
v         $xiac/JU.61$m$R16
                                        # Visualisation tridimensionnelle d'ensemble de Julia dans les quaternions.                   #
v         $xiac/JU.53$R16$DROITE                  p=$xiP/arc_ciel.12
v         $xiac/JULI.E1$R16             p=$xiP/trou_noir.14
v         $xiac/JULI.F1$R16             p=$xiP/trou_noir.14
v         $xiac/JULI.G1$R16             p=$xiP/fractal.11
                                        # 16 ensembles de Julia dans les quaternions lors d'une promenade autour de Mandelbrot...     #
v         $xiac/JU.K0$R16$DROITE        p=$xiP/trou_noir.14
v         $xiac/JU.L0$R16$DROITE        p=$xiP/fractal.11
                                        # Zoom sur le plus interessant des ensembles de Julia precedents.                             #
v         $xiac/JU.N1$R16$DROITE
v         $xiac/JU.N2$R16$DROITE
v         $xiac/JU.O0$R16$DROITE
v         $xiac/JU.N1$R16$GAUCHE
v         $xiac/JU.N2$R16$GAUCHE
v         $xiac/JU.O0$R16$GAUCHE
                                        # Un petit tour de l'ensemble de Mandelbrot dans les Quaternions avec zoom sur l'un des       #
                                        # plus beaux ensembles de Julia...                                                            #
v         $xiac/JU.R1$R16
v         $xiac/JU.R1$R64
v         $xiac/JU.R1$R64$ROUGE    p=$xiP/gris.01           t=64 d=0            ralenti=32
                                        # Rotation autour de l'axe 'OY' autour de l'ensemble de Julia precedent...                    #
v         $xiac/JU.b1$R16
                                        # Rotation autour des axes 'OY' et 'OZ' de l'ensemble de Julia precedent...                   #
v         $xiac/JU.g2.0$R16
                                        # Panoramique sur l'ensemble de Julia precedent...                                            #
v         $xiac/JU.j4.0$R16
v         $xiac/JU.j8.0$R16
v         $xiac/JU.jG.0$R16
                                        # Rotation avec "motion blur" autour de l'axe 'OY' autour de l'ensemble de Julia precedent... #
v         $xiac/JU.m1$R16
                                        # La danseuse...                                                                              #
v         $xiac/JU.m1.2$m$R16
                                        # L'ile de Julia...                                                                           #

v         $xiac/JULI.81$R16             p=$xiP/orange.11
v         $xiac/JULI.82$R16             p=$xiP/orange.11
                                        # Exposant de Lyapunov "progressif" sur un ensemble de Julia.                                 #

v         $xiac/MAND.11$R64        p=$xiP/cercle.11
v         $xiac/MAND.11$R64        p=$xiP/fractal.91
v         $xiac/MAND.11$R64        p=$xiP/arc_ciel.01       t=64 d=4            ralenti=32
v         $xiac/MAND.12$R64        p=$xiP/cercle.11
v         $xiac/MAND.12$R64        p=$xiP/fractal.91
v         $xiac/MAND.12$R64        p=$xiP/arc_ciel.01       t=64 d=4            ralenti=32
v         $xiac/MAND$M.2$R16       p=$xiP/enfer.03
v         $xiac/MAND$M.2$R16       p=$xiP/montagnes.01
v         $xiac/MAND$M.2$R64       p=$xiP/montagnes.01      t=64 d=4            ralenti=32
v         $xiac/MAND.12$R64        p=$xiP/cercle.02         t=64 d=4            ralenti=32
v         $xiac/MAND.A2$R16             p=$xiP/fractal.91
v         $xiac/MAND.A2$R64             p=$xiP/fractal.91   t=64      d=4       ralenti=32
v         $xiac/MAND.B1$M$R16           p=$xiP/enfer.02
v         $xiac/MAND.B1$M$R64           p=$xiP/enfer.02     t=64      d=4       ralenti=32
v         $xiac/MAND.C1$R16
                                        # Quelques zooms sur l'ensemble de Mandelbrot.                                                #
v         $xiac/MA.Q0$R16$DROITE
                                        # Zoom sur l'ensemble de Mandelbrot dans les Quaternions.                                     #

v         $xiac/MAND.61.008$R16         p=$xiP/orange.11
v         $xiac/MAND.61.064$R16         p=$xiP/orange.11
v         $xiac/MAND.82$R16             p=$xiP/orange.11
                                        # Exposant de Lyapunov "progressif" sur un ensemble de Mandelbrot.                            #
v         $xiac/TOUR.1$R64         p=$xiP/fractal.21        t=64 d=4            ralenti=32
v         $xiac/TOUR.1$R16         p=$xiP/fractal.21        t=16 d=4            ralenti=32
                                        # Le tour de l'ensemble de Mandelbrot.                                                        #



Copyright © Jean-François COLONNA, 2019-2025.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / École polytechnique, Institut Polytechnique de Paris, 2019-2025.