#!/bin/csh
#######################################################################################################################################
# #
# N O T A : #
# #
# #
# Author of '$xivP/disk.000000011/face.1/$Fnota' : #
# #
# Jean-Francois COLONNA (LACTAMME, AAAAMMJJhhmmss). #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# F A C E R E S E R V E E A U X F R A C T A L E S D E T E R M I N I S T E S E T A U C H A O S #
# F A C E ' xivPdf 11 1 ' #
# F A C E S U I T E D E L A F A C E ' xivPdf 09 1 ' #
# F A C E A S U I V R E S U R L A F A C E ' xivPdf 11 2 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# E N R E G I S T R E M E N T S U R L E ' LVS6000P-LVR6000 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# U T I L I S A T I O N D U G E N E R A T E U R V I D E O D E L ' O P T I O N ' GenLock ' D E ' LACT21 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# E N R E G I S T R E M E N T S U R U N ' LVR4000P ' E N P R E T : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# R E M I S E E N S E R V I C E D U ' LVS6000P-LVR6000 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# C H A N G E M E N T D E G E N E R A T E U R V I D E O G R A C E A U R E M P L A C E M E N T D E #
# L ' O P T I O N ' GenLock ' D E ' LACT21 ' P A R L A C A R T E ' Galileo ' D E ' LACT12 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# C H A N G E M E N T D U " T I M I N G " D E L A V I D E O P R O D U I T E #
# P A R L A C A R T E ' Galileo ' D E ' LACT12 ' L O R S D U #
# P A S S A G E D E L A R E L E A S E 5.2 A L A R E L E A S E 5.3 D U S Y S T E M E : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# C H A N G E M E N T D U " T I M I N G " D E L A V I D E O P R O D U I T E #
# P A R L A C A R T E ' Galileo ' D E ' LACT12 ' A F I N D E C E N T R E R #
# L A V I D E O P A R P A S S A G E D E L A P H A S E H O R I Z O N T A L E D E ' -76 ' A ' -42 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# E N R E G I S T R E M E N T S U R U N ' LVR4000P ' E N L O C A T I O N : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# M I S E E N S E R V I C E D U ' LVR4000P ' : #
# #
#######################################################################################################################################
sequence 000001_002048
# Generee par : #
# #
# On notera que j'ai essaye diverses valeurs pour le pas de temps de l'integration, et #
# en particulier : #
# #
# dct=10 #
# nombre=200000 #
# #
# qui a provoque l'ejection de Jupiter, puis : #
# #
# dct=15000 #
# nombre=250 #
# #
# le 19961016130518 qui donne des instabilites pour les planetes "interieures" (Mercure #
# en particulier), puis : #
# #
# dct=1500 #
# nombre=2500 #
# #
# le 19961025142756 qui donne les memes instabilites, puis : #
# #
# dct=150 #
# nombre=25000 #
# #
# le 19961025153051 qui marche bien, sauf que la trajectoire de Pluton ne se referme pas ; #
# j'ai donc essaye : #
# #
# dct=150 #
# nombre=27500 #
# #
# le 19961028095541. Cette fois, la trajectoire de Pluton ne repasse pas sur ses propres #
# traces ; j'ai donc essaye : #
# #
# dct=75 #
# nombre=54000 #
# #
# le 19961029133246. Ceci donne pour Pluton une trajectoire qui semble ne pas se refermer, #
# je suis donc revenu aux parametres de 'xivPdf 9 1 / 024851_025106', soit : #
# #
# dct=15000 #
# nombre=1000 #
# #
# le 19961104091142. Mais en fait, 'nombre' est 4 fois trop grands, j'ai donc fixe : #
# #
# dct=15000 #
# nombre=250 #
# #
# le 19961107163258. #
# #
# #
# $Z set Nimages=2048 #
# #
# $Z set NcorpsS=10 #
# $Z @ Ncorps = $NcorpsS - 1 #
# #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=1.50 vA=1.50 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/COORDONNEES$COORD_X \ #
# $Z +1e3 +514e+8 +213e+8 \ #
# $Z -203e+8 \ #
# $Z -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 -392e+10 #
# $Z genere $xT/COORDONNEES$COORD_Y \ #
# $Z +1e3 +682e+7 +967e+8 \ #
# $Z +133e+9 \ #
# $Z +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 +307e+10 #
# $Z genere $xT/COORDONNEES$COORD_Z \ #
# $Z +1e3 \ #
# $Z -163e+7 +422e+8 +579e+8 \ #
# $Z +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 +216e+10 #
# $Z genere $xT/VITESSES$COORD_X \ #
# $Z 0 -1.46e+4 -3.44e+4 \ #
# $Z -2.99e+4 \ #
# $Z -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 -2.27e+3 #
# $Z genere $xT/VITESSES$COORD_Y \ #
# $Z 0 +4.43e+4 +5.39e+3 \ #
# $Z -3.88e+3 \ #
# $Z -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 -4.53e+3 #
# $Z genere $xT/VITESSES$COORD_Z \ #
# $Z 0 +2.52e+4 +4.60e+3 \ #
# $Z -1.68e+3 \ #
# $Z -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 -7.39e+2 #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 #
# $Z genere $xT/RAYONS \ #
# $Z +50e10 +30e10 +30e10 \ #
# $Z +30e10 \ #
# $Z +30e10 +40e10 +40e10 +35e10 +35e10 +30e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 #
# #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=1 \ #
# $Z extension=5 \ #
# $Z dct=15000 \ #
# $Z 2_a_2=FAUX source=1 \ #
# $Z nombre=250 \ #
# $Z ensemble=VRAI \ #
# $Z acceptable=0.5 \ #
# $Z Ranterieurs=0.5 \ #
# $Z Canterieurs=0.8 \ #
# $Z trainees=FAUX \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.997 \ #
# $Z mode_des_trainees=1 \ #
# $Z renormaliser=FAUX \ #
# $Z lineaire=FAUX exposant=0.4 \ #
# $Z Lz=1.0e13 \ #
# $Z TRANSLATION_OX=0 \ #
# $Z TRANSLATION_OY=0 \ #
# $Z ZOOM=0.70 \ #
# $Z ROTATION_OX=$xT/ROTATION$COORD_X \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/NCOR.1. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.1. $xiak/NCOR.U1 1 128 #
# $Z $xci/reduction_64$Z $xiim/NCOR.1. $xiak/NCOR.U1 1 32 #
# #
# $Z $CP $xiim/NCOR.1.2048$ROUGE $xiirk/NCOR.U1.2048$ROUGE #
# $Z $CP $xiim/NCOR.1.2048$VERTE $xiirk/NCOR.U1.2048$VERTE #
# $Z $CP $xiim/NCOR.1.2048$BLEUE $xiirk/NCOR.U1.2048$BLEUE #
# #
# $Z ro $xiak/NCOR.U1$R16$ROUGE #
# $Z ro $xiak/NCOR.U1$R16$VERTE #
# $Z ro $xiak/NCOR.U1$R16$BLEUE #
# #
# $Z ro $xiak/NCOR.U1$R64$ROUGE #
# $Z ro $xiak/NCOR.U1$R64$VERTE #
# $Z ro $xiak/NCOR.U1$R64$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.U1$R16$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.U1$R16$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.U1$R16$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.U1$R64$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.U1$R64$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.U1$R64$BLEUE #
# #
# $Z ro $xiirk/NCOR.U1.2048$ROUGE #
# $Z ro $xiirk/NCOR.U1.2048$VERTE #
# $Z ro $xiirk/NCOR.U1.2048$BLEUE #
# #
# $Z $xcg/unite$Z $xiirk/NCOR.U1.2048$ROUGE #
# $Z $xcg/unite$Z $xiirk/NCOR.U1.2048$VERTE #
# $Z $xcg/unite$Z $xiirk/NCOR.U1.2048$BLEUE #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/NCOR.1. 0001 0499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/NCOR.1. 0500 0999 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/NCOR.1. 1000 1499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/NCOR.1. 1500 2048 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.U1$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.U1$R64 RVB rien #
# #
# record.01$Z $xiirk/NCOR.U1.2048 RVB rien #
# #
sequence 002049_004096
# Generee par : #
# #
# $Z set Nimages=2048 #
# #
# $Z set NcorpsS=10 #
# $Z @ Ncorps = $NcorpsS - 1 #
# #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=1.50 vA=1.50 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/COORDONNEES$COORD_X \ #
# $Z +1e3 +514e+8 +213e+8 \ #
# $Z -203e+8 \ #
# $Z -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 -392e+10 #
# $Z genere $xT/COORDONNEES$COORD_Y \ #
# $Z +1e3 +682e+7 +967e+8 \ #
# $Z +133e+9 \ #
# $Z +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 +307e+10 #
# $Z genere $xT/COORDONNEES$COORD_Z \ #
# $Z +1e3 \ #
# $Z -163e+7 +422e+8 +579e+8 \ #
# $Z +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 +216e+10 #
# $Z genere $xT/VITESSES$COORD_X \ #
# $Z 0 -1.46e+4 -3.44e+4 \ #
# $Z -2.99e+4 \ #
# $Z -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 -2.27e+3 #
# $Z genere $xT/VITESSES$COORD_Y \ #
# $Z 0 +4.43e+4 +5.39e+3 \ #
# $Z -3.88e+3 \ #
# $Z -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 -4.53e+3 #
# $Z genere $xT/VITESSES$COORD_Z \ #
# $Z 0 +2.52e+4 +4.60e+3 \ #
# $Z -1.68e+3 \ #
# $Z -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 -7.39e+2 #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 #
# $Z genere $xT/RAYONS \ #
# $Z +50e10 +30e10 +30e10 \ #
# $Z +30e10 \ #
# $Z +30e10 +40e10 +40e10 +35e10 +35e10 +30e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 #
# #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=4 \ #
# $Z extension=5 \ #
# $Z dct=15000 \ #
# $Z 2_a_2=FAUX source=1 \ #
# $Z nombre=250 \ #
# $Z ensemble=VRAI \ #
# $Z acceptable=0.5 \ #
# $Z Ranterieurs=0.5 \ #
# $Z Canterieurs=0.8 \ #
# $Z trainees=FAUX \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.997 \ #
# $Z mode_des_trainees=1 \ #
# $Z renormaliser=FAUX \ #
# $Z lineaire=FAUX exposant=0.4 \ #
# $Z Lz=1.0e13 \ #
# $Z TRANSLATION_OX=0 \ #
# $Z TRANSLATION_OY=0 \ #
# $Z ZOOM=0.70 \ #
# $Z ROTATION_OX=$xT/ROTATION$COORD_X \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/NCOR.2. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.2. $xiak/NCOR.U4 1 128 #
# $Z $xci/reduction_64$Z $xiim/NCOR.2. $xiak/NCOR.U4 1 32 #
# #
# $Z $CP $xiim/NCOR.2.2048$ROUGE $xiirk/NCOR.U4.2048$ROUGE #
# $Z $CP $xiim/NCOR.2.2048$VERTE $xiirk/NCOR.U4.2048$VERTE #
# $Z $CP $xiim/NCOR.2.2048$BLEUE $xiirk/NCOR.U4.2048$BLEUE #
# #
# $Z ro $xiak/NCOR.U4$R16$ROUGE #
# $Z ro $xiak/NCOR.U4$R16$VERTE #
# $Z ro $xiak/NCOR.U4$R16$BLEUE #
# #
# $Z ro $xiak/NCOR.U4$R64$ROUGE #
# $Z ro $xiak/NCOR.U4$R64$VERTE #
# $Z ro $xiak/NCOR.U4$R64$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.U4$R16$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.U4$R16$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.U4$R16$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.U4$R64$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.U4$R64$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.U4$R64$BLEUE #
# #
# $Z ro $xiirk/NCOR.U4.2048$ROUGE #
# $Z ro $xiirk/NCOR.U4.2048$VERTE #
# $Z ro $xiirk/NCOR.U4.2048$BLEUE #
# #
# $Z $xcg/unite$Z $xiirk/NCOR.U4.2048$ROUGE #
# $Z $xcg/unite$Z $xiirk/NCOR.U4.2048$VERTE #
# $Z $xcg/unite$Z $xiirk/NCOR.U4.2048$BLEUE #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/NCOR.2. 0001 0499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.2. 0500 0999 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.2. 1000 1499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.2. 1500 2048 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.U4$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.U4$R64 RVB rien #
# #
# record.01$Z $xiirk/NCOR.U4.2048 RVB rien #
# #
sequence 004097_006144
# Generee par : #
# #
# $Z set Nimages=2048 #
# #
# $Z set NcorpsS=10 #
# $Z @ Ncorps = $NcorpsS - 1 #
# #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=1.50 vA=1.50 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/COORDONNEES$COORD_X \ #
# $Z +1e3 +514e+8 +213e+8 \ #
# $Z -203e+8 \ #
# $Z -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 -392e+10 #
# $Z genere $xT/COORDONNEES$COORD_Y \ #
# $Z +1e3 +682e+7 +967e+8 \ #
# $Z +133e+9 \ #
# $Z +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 +307e+10 #
# $Z genere $xT/COORDONNEES$COORD_Z \ #
# $Z +1e3 \ #
# $Z -163e+7 +422e+8 +579e+8 \ #
# $Z +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 +216e+10 #
# $Z genere $xT/VITESSES$COORD_X \ #
# $Z 0 -1.46e+4 -3.44e+4 \ #
# $Z -2.99e+4 \ #
# $Z -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 -2.27e+3 #
# $Z genere $xT/VITESSES$COORD_Y \ #
# $Z 0 +4.43e+4 +5.39e+3 \ #
# $Z -3.88e+3 \ #
# $Z -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 -4.53e+3 #
# $Z genere $xT/VITESSES$COORD_Z \ #
# $Z 0 +2.52e+4 +4.60e+3 \ #
# $Z -1.68e+3 \ #
# $Z -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 -7.39e+2 #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 #
# $Z genere $xT/RAYONS \ #
# $Z +50e10 +30e10 +30e10 \ #
# $Z +30e10 \ #
# $Z +30e10 +40e10 +40e10 +35e10 +35e10 +30e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 #
# #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=10 \ #
# $Z extension=5 \ #
# $Z dct=15000 \ #
# $Z 2_a_2=FAUX source=1 \ #
# $Z nombre=250 \ #
# $Z ensemble=VRAI \ #
# $Z acceptable=0.5 \ #
# $Z Ranterieurs=0.5 \ #
# $Z Canterieurs=0.8 \ #
# $Z trainees=FAUX \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.997 \ #
# $Z mode_des_trainees=1 \ #
# $Z renormaliser=FAUX \ #
# $Z lineaire=FAUX exposant=0.4 \ #
# $Z Lz=1.0e13 \ #
# $Z TRANSLATION_OX=0 \ #
# $Z TRANSLATION_OY=0 \ #
# $Z ZOOM=0.70 \ #
# $Z ROTATION_OX=$xT/ROTATION$COORD_X \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/NCOR.3. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.3. $xiak/NCOR.UA 1 128 #
# $Z $xci/reduction_64$Z $xiim/NCOR.3. $xiak/NCOR.UA 1 32 #
# #
# $Z $CP $xiim/NCOR.3.2048$ROUGE $xiirk/NCOR.UA.2048$ROUGE #
# $Z $CP $xiim/NCOR.3.2048$VERTE $xiirk/NCOR.UA.2048$VERTE #
# $Z $CP $xiim/NCOR.3.2048$BLEUE $xiirk/NCOR.UA.2048$BLEUE #
# #
# $Z ro $xiak/NCOR.UA$R16$ROUGE #
# $Z ro $xiak/NCOR.UA$R16$VERTE #
# $Z ro $xiak/NCOR.UA$R16$BLEUE #
# #
# $Z ro $xiak/NCOR.UA$R64$ROUGE #
# $Z ro $xiak/NCOR.UA$R64$VERTE #
# $Z ro $xiak/NCOR.UA$R64$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.UA$R16$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.UA$R16$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.UA$R16$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.UA$R64$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.UA$R64$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.UA$R64$BLEUE #
# #
# $Z ro $xiirk/NCOR.UA.2048$ROUGE #
# $Z ro $xiirk/NCOR.UA.2048$VERTE #
# $Z ro $xiirk/NCOR.UA.2048$BLEUE #
# #
# $Z $xcg/unite$Z $xiirk/NCOR.UA.2048$ROUGE #
# $Z $xcg/unite$Z $xiirk/NCOR.UA.2048$VERTE #
# $Z $xcg/unite$Z $xiirk/NCOR.UA.2048$BLEUE #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/NCOR.3. 0001 0499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.3. 0500 0999 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.3. 1000 1499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.3. 1500 2048 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.UA$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.UA$R64 RVB rien #
# #
# record.01$Z $xiirk/NCOR.UA.2048 RVB rien #
# #
sequence 006145_008192
# Generee par : #
# #
# $Z set Nimages=2048 #
# #
# $Z set NcorpsS=10 #
# $Z @ Ncorps = $NcorpsS - 1 #
# #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=1.50 vA=1.50 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/COORDONNEES$COORD_X \ #
# $Z +1e3 +514e+8 +213e+8 \ #
# $Z -203e+8 \ #
# $Z -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 -392e+10 #
# $Z genere $xT/COORDONNEES$COORD_Y \ #
# $Z +1e3 +682e+7 +967e+8 \ #
# $Z +133e+9 \ #
# $Z +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 +307e+10 #
# $Z genere $xT/COORDONNEES$COORD_Z \ #
# $Z +1e3 \ #
# $Z -163e+7 +422e+8 +579e+8 \ #
# $Z +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 +216e+10 #
# $Z genere $xT/VITESSES$COORD_X \ #
# $Z 0 -1.46e+4 -3.44e+4 \ #
# $Z -2.99e+4 \ #
# $Z -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 -2.27e+3 #
# $Z genere $xT/VITESSES$COORD_Y \ #
# $Z 0 +4.43e+4 +5.39e+3 \ #
# $Z -3.88e+3 \ #
# $Z -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 -4.53e+3 #
# $Z genere $xT/VITESSES$COORD_Z \ #
# $Z 0 +2.52e+4 +4.60e+3 \ #
# $Z -1.68e+3 \ #
# $Z -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 -7.39e+2 #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 #
# $Z genere $xT/RAYONS \ #
# $Z +50e10 +30e10 +30e10 \ #
# $Z +30e10 \ #
# $Z +30e10 +40e10 +40e10 +35e10 +35e10 +30e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 #
# #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=9 \ #
# $Z extension=5 \ #
# $Z dct=15000 \ #
# $Z 2_a_2=FAUX source=1 \ #
# $Z nombre=250 \ #
# $Z ensemble=VRAI \ #
# $Z acceptable=0.5 \ #
# $Z Ranterieurs=0.5 \ #
# $Z Canterieurs=0.8 \ #
# $Z trainees=FAUX \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.997 \ #
# $Z mode_des_trainees=1 \ #
# $Z renormaliser=FAUX \ #
# $Z lineaire=FAUX exposant=0.4 \ #
# $Z Lz=1.0e13 \ #
# $Z TRANSLATION_OX=0 \ #
# $Z TRANSLATION_OY=0 \ #
# $Z ZOOM=0.70 \ #
# $Z ROTATION_OX=$xT/ROTATION$COORD_X \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/NCOR.4. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.4. $xiak/NCOR.U9 1 128 #
# $Z $xci/reduction_64$Z $xiim/NCOR.4. $xiak/NCOR.U9 1 32 #
# #
# $Z $CP $xiim/NCOR.4.2048$ROUGE $xiirk/NCOR.U9.2048$ROUGE #
# $Z $CP $xiim/NCOR.4.2048$VERTE $xiirk/NCOR.U9.2048$VERTE #
# $Z $CP $xiim/NCOR.4.2048$BLEUE $xiirk/NCOR.U9.2048$BLEUE #
# #
# $Z ro $xiak/NCOR.U9$R16$ROUGE #
# $Z ro $xiak/NCOR.U9$R16$VERTE #
# $Z ro $xiak/NCOR.U9$R16$BLEUE #
# #
# $Z ro $xiak/NCOR.U9$R64$ROUGE #
# $Z ro $xiak/NCOR.U9$R64$VERTE #
# $Z ro $xiak/NCOR.U9$R64$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.U9$R16$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.U9$R16$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.U9$R16$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.U9$R64$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.U9$R64$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.U9$R64$BLEUE #
# #
# $Z ro $xiirk/NCOR.U9.2048$ROUGE #
# $Z ro $xiirk/NCOR.U9.2048$VERTE #
# $Z ro $xiirk/NCOR.U9.2048$BLEUE #
# #
# $Z $xcg/unite$Z $xiirk/NCOR.U9.2048$ROUGE #
# $Z $xcg/unite$Z $xiirk/NCOR.U9.2048$VERTE #
# $Z $xcg/unite$Z $xiirk/NCOR.U9.2048$BLEUE #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/NCOR.4. 0001 0499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.4. 0500 0999 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.4. 1000 1499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.4. 1500 2048 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.U9$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.U9$R64 RVB rien #
# #
# record.01$Z $xiirk/NCOR.U9.2048 RVB rien #
# #
sequence 008193_008448
# Generee par : #
# #
# $Z SET Nimages=256 #
# #
# $Z Pal #
# #
# $Z $xci/gauss$X \ #
# $Z standard=FAUX \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $c #define N0 1 #
# $c #define N Nimages #
# #
# $c #define ITER 1 #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c printf("$xrk/lorenz.21$X #
# $c A=$xTV/GAUSS #
# $c iterations=%d #
# $c deplacer=FAUX #
# $c standard=FAUX #
# $c $formatI | #
# $c $xci/acces$X #
# $c renormaliser=VRAI #
# $c zero=FAUX #
# $c standard=FAUX #
# $c R=$xiim/LORE.1.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xiim/LORE.1. premiere=1 pas=16 \ #
# $Z R=$xiak/LORE.E1$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xiim/LORE.1. premiere=1 pas=4 \ #
# $Z R=$xiak/LORE.E1$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiak/LORE.E1$R16 #
# $Z ro $xiak/LORE.E1$R64 #
# #
# $Z $xcg/unite$Z $xiak/LORE.E1$R16 #
# $Z $xcg/unite$Z $xiak/LORE.E1$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.1. 1 256 $xiP/orange.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.E1$R16 $xiP/orange.11 Initialisation #
# record.01$Z $xiak/LORE.E1$R64 $xiP/orange.11 rien #
# #
sequence 008449_008704
# Generee par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $Z $xci/gauss$X \ #
# $Z standard=FAUX \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# $Z $xci/init$X \ #
# $Z n=$BLANC \ #
# $Z R=$xTV/TEXTURE \ #
# $Z $formatI #
# #
# $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("$xrk/lorenz.21$X #
# $c A=$xTV/GAUSS #
# $c iterations=%d #
# $c deplacer=FAUX #
# $c standard=FAUX #
# $c $formatI | #
# $c $xci/montagne.01$X #
# $c T=$xTV/TEXTURE #
# $c avion=VRAI #
# $c standard=FAUX #
# $c R=$xiim/LORE$m.1.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xiim/LORE$m.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiak/LORE.E1$m$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xiim/LORE$m.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiak/LORE.E1$m$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiak/LORE.E1$m$R16 #
# $Z ro $xiak/LORE.E1$m$R64 #
# #
# $Z $xcg/unite$Z $xiak/LORE.E1$m$R16 #
# $Z $xcg/unite$Z $xiak/LORE.E1$m$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE$m.1. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.E1$m$R16 $xiP/montagnes.01 Initialisation #
# record.01$Z $xiak/LORE.E1$m$R64 $xiP/montagnes.01 rien #
# #
sequence 008705_008770
sequence 008771_008960
sequence 008961_009216
sequence 009217_009472
sequence 009473_009728
# Sequence generee par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ #
# $X C='$xci/convol.01$X \ #
# $X A=$xw1/LORE.1.%04d \ #
# $X points=81 \ #
# $X R=$xw1/LORE.2.%04d \ #
# $X $formatI' #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE.2. premiere=1 pas=16 \ #
# $Z R=$xiak/LORE.E2$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE.2. premiere=1 pas=4 \ #
# $Z R=$xiak/LORE.E2$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiak/LORE.E2$R16 #
# $Z ro $xiak/LORE.E2$R64 #
# #
# $Z $xcg/unite$Z $xiak/LORE.E2$R16 #
# $Z $xcg/unite$Z $xiak/LORE.E2$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.2. 1 256 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/LORE.2. 1 256 $xiP/orange.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/LORE.2. 1 256 $xiP/random.03 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/LORE.2. 1 256 $xiP/random.06 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX VRAI #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.E2$R16 $xiP/fractal.11 Initialisation #
# record.01$Z $xiak/LORE.E2$R16 $xiP/orange.11 rien #
# record.01$Z $xiak/LORE.E2$R16 $xiP/random.03 rien #
# record.01$Z $xiak/LORE.E2$R16 $xiP/random.06 rien #
# record.01$Z $xiak/LORE.E2$R64 $xiP/fractal.11 rien #
# record.01$Z $xiak/LORE.E2$R64 $xiP/orange.11 rien #
# record.01$Z $xiak/LORE.E2$R64 $xiP/random.03 rien #
# record.01$Z $xiak/LORE.E2$R64 $xiP/random.06 rien #
# #
# ATTENTION, la premiere sequence a ete enregistree en deux fois afin de reintroduire #
# l'ejection apres la derniere sequence... #
sequence 009729_009984
# Generee par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $Z $xci/gauss$X \ #
# $Z standard=FAUX \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# $Z $xci/init$X \ #
# $Z n=$BLANC \ #
# $Z R=$xTV/TEXTURE \ #
# $Z $formatI #
# #
# $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("$xrk/lorenz.21$X #
# $c A=$xTV/GAUSS #
# $c iterations=%d #
# $c deplacer=FAUX #
# $c standard=FAUX #
# $c $formatI | #
# $c $xci/convol.01$X #
# $c points=25 #
# $c standard=FAUX #
# $c $formatI | #
# $c $xci/montagne.01$X #
# $c T=$xTV/TEXTURE #
# $c avion=FAUX #
# $c Ty=0.75 #
# $c perspective=0.25 #
# $c standard=FAUX #
# $c R=$xw1/LORE$M.1.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiak/LORE.E1$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiak/LORE.E1$M$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiak/LORE.E1$M$R16 #
# $Z ro $xiak/LORE.E1$M$R64 #
# #
# $Z $xcg/unite$Z $xiak/LORE.E1$M$R16 #
# $Z $xcg/unite$Z $xiak/LORE.E1$M$R64 #
# #
# $Z $CP $xw1/LORE$M.1.0100 $xiirk/LORE.E1.0100$M #
# $Z $CP $xw1/LORE$M.1.0180 $xiirk/LORE.E1.0180$M #
# $Z $CP $xw1/LORE$M.1.0256 $xiirk/LORE.E1.0256$M #
# #
# $Z ro $xiirk/LORE.E1.0100$M #
# $Z ro $xiirk/LORE.E1.0180$M #
# $Z ro $xiirk/LORE.E1.0256$M #
# #
# $Z $xcg/unite$Z $xiirk/LORE.E1.0100$M #
# $Z $xcg/unite$Z $xiirk/LORE.E1.0180$M #
# $Z $xcg/unite$Z $xiirk/LORE.E1.0256$M #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE$M.1. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX VRAI #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.E1$M$R16 $xiP/montagnes.01 Initialisation #
# record.01$Z $xiak/LORE.E1$M$R64 $xiP/montagnes.01 rien #
# #
# record.01$Z $xiirk/LORE.E1.0100$M $xiP/montagnes.01 rien #
# record.01$Z $xiirk/LORE.E1.0180$M $xiP/montagnes.01 rien #
# record.01$Z $xiirk/LORE.E1.0256$M $xiP/montagnes.01 rien #
# #
sequence 009985_010112
sequence 010113_010624
# Generee par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=128 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=3 #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES +2.0e30 +6.4e23 +60.5e23 #
# $Z genere $xT/RAYONS 1.1e10 0.75e10 0.75e10 #
# $Z genere $xT/COULEURS$ROUGE $GRIS_8 $GRIS_8 $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE $GRIS_8 $GRIS_4 $GRIS_6 #
# $Z genere $xT/COULEURS$BLEUE $GRIS_0 $GRIS_2 $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c double Fcentre=(0.05e11/2.04e+11); #
# #
# $c double XcentreD=-2.04e+11; #
# $c double XcentreA; #
# #
# $c double YcentreD=+1.0e3; #
# $c double YcentreA; #
# #
# $c double ZcentreD=+1.0e3; #
# $c double ZcentreA; #
# #
# $c double XvitessD=0; #
# #
# $c double YvitessD=-2.57e+4; #
# #
# $c double ZvitessD=0; #
# #
# $c int n; #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Xvitess=XvitessD*sqrt(XcentreD/Xcentre); #
# $c Yvitess=YvitessD*sqrt(YcentreD/Ycentre); #
# $c Zvitess=ZvitessD*sqrt(ZcentreD/Zcentre); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c +1.0e3 %+g %+g\n" #
# $c ,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c +1.0e3 %+g %+g\n" #
# $c ,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c +1.0e3 %+g %+g\n" #
# $c ,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 %+g %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 %+g %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 %+g %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=$Npas #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=1 #
# $c dct=100 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ZOOM=4.0 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xw11/NCOR.5. #
# $c $formatI\n" #
# $c ,NPAS #
# $c ); #
# $c printf("$MV $xw11/NCOR.5.%04d$ROUGE #
# $c $xw12/NCOR.5.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.5.%04d$VERTE #
# $c $xw12/NCOR.5.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.5.%04d$BLEUE #
# $c $xw12/NCOR.5.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw12/NCOR.5. $xiak/NCOR.V9 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw12/NCOR.5. $xiak/NCOR.V9 $Npremiere $Nderniere #
# #
# $Z ro $xiak/NCOR.V9$R16$ROUGE #
# $Z ro $xiak/NCOR.V9$R16$VERTE #
# $Z ro $xiak/NCOR.V9$R16$BLEUE #
# #
# $Z ro $xiak/NCOR.V9$R64$ROUGE #
# $Z ro $xiak/NCOR.V9$R64$VERTE #
# $Z ro $xiak/NCOR.V9$R64$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.V9$R16$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.V9$R16$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.V9$R16$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.V9$R64$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.V9$R64$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.V9$R64$BLEUE #
# #
# #
# $Z SET Nderniere=512 #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c double Fcentre=(0.05e11/2.04e+11); #
# #
# $c double XcentreD=-2.04e+11; #
# $c double XcentreA; #
# #
# $c double YcentreD=+1.0e3; #
# $c double YcentreA; #
# #
# $c double ZcentreD=+1.0e3; #
# $c double ZcentreA; #
# #
# $c double XvitessD=0; #
# #
# $c double YvitessD=-2.57e+4; #
# #
# $c double ZvitessD=0; #
# #
# $c int n; #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Xvitess=XvitessD*sqrt(XcentreD/Xcentre); #
# $c Yvitess=YvitessD*sqrt(YcentreD/Ycentre); #
# $c Zvitess=ZvitessD*sqrt(ZcentreD/Zcentre); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c +1.0e3 %+g %+g\n" #
# $c ,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c +1.0e3 %+g %+g\n" #
# $c ,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c +1.0e3 %+g %+g\n" #
# $c ,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 %+g %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 %+g %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 %+g %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=$Npas #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=3 #
# $c dct=100 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ZOOM=4.0 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xw11/NCOR.6. #
# $c $formatI\n" #
# $c ,NPAS #
# $c ); #
# $c printf("$MV $xw11/NCOR.6.%04d$ROUGE #
# $c $xw12/NCOR.6.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.6.%04d$VERTE #
# $c $xw12/NCOR.6.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.6.%04d$BLEUE #
# $c $xw12/NCOR.6.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw12/NCOR.6. $xiak/NCOR.V3 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw12/NCOR.6. $xiak/NCOR.V3 $Npremiere $Nderniere #
# #
# $Z ro $xiak/NCOR.V3$R16$ROUGE #
# $Z ro $xiak/NCOR.V3$R16$VERTE #
# $Z ro $xiak/NCOR.V3$R16$BLEUE #
# #
# $Z ro $xiak/NCOR.V3$R64$ROUGE #
# $Z ro $xiak/NCOR.V3$R64$VERTE #
# $Z ro $xiak/NCOR.V3$R64$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.V3$R16$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.V3$R16$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.V3$R16$BLEUE #
# #
# $Z $xcg/unite$Z $xiak/NCOR.V3$R64$ROUGE #
# $Z $xcg/unite$Z $xiak/NCOR.V3$R64$VERTE #
# $Z $xcg/unite$Z $xiak/NCOR.V3$R64$BLEUE #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw12/NCOR.5. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw12/NCOR.6. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX VRAI #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.V9$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.V9$R64 RVB rien #
# #
# record.01$Z $xiak/NCOR.V3$R16 RVB rien #
# record.01$Z $xiak/NCOR.V3$R64 RVB rien #
# #
sequence 010625_010880
# Generee par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=256 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=11 #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=$Npremiere d=$Npas vD=1.40 vA=1.40 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +30e10 +18e10 +18e10 \ #
# $Z +18e10 \ #
# $Z +18e10 +23e10 +23e10 +21e10 +21e10 +18e10 \ #
# $Z +18e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-392e+10; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+307e+10; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+216e+10; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.27e+3; #
# #
# $c double YvitessD=-4.53e+3; #
# #
# $c double ZvitessD=-7.39e+2; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g +514e+8 +213e+8 #
# $c -203e+8 #
# $c -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 #
# $c %+g %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g +682e+7 +967e+8 #
# $c +133e+9 #
# $c +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 #
# $c %+g %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g -163e+7 +422e+8 #
# $c +579e+8 #
# $c +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 #
# $c %+g %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 -1.46e+4 -3.44e+4 #
# $c -2.99e+4 #
# $c -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 #
# $c %+g %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 +4.43e+4 +5.39e+3 #
# $c -3.88e+3 #
# $c -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 #
# $c %+g %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 +2.52e+4 +4.60e+3 #
# $c -1.68e+3 #
# $c -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 #
# $c %+g %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=1 #
# $c extension=5 #
# $c dct=15000 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=FAUX exposant=0.4 #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=$xT/ROTATION$COORD_X #
# $c ZOOM=0.60 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xw11/NCOR.7. #
# $c $formatI\n" #
# $c ,NPAS,NPAS #
# $c ); #
# $c printf("$MV $xw11/NCOR.7.%04d$ROUGE #
# $c $xiim/NCOR.7.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.7.%04d$VERTE #
# $c $xiim/NCOR.7.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.7.%04d$BLEUE #
# $c $xiim/NCOR.7.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.7. $xiak/NCOR.W9 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xiim/NCOR.7. $xiak/NCOR.W9 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.W9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.W9$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.W9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.W9$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=256 #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=$Npremiere derniere=$Nderniere \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.7.%04d$ROUGE \ #
# $X $xw12/NCOR.7.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.7.%04d$VERTE \ #
# $X $xw12/NCOR.7.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.7.%04d$BLEUE \ #
# $X $xw12/NCOR.7.%04d$BLEUE' #
# #
# $xci/disk_video_P$Z $xw12/NCOR.7. 001 256 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.W9$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.W9$R64 RVB rien #
# #
sequence 010881_011392
# Generee par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=512 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=11 #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=$Npremiere d=$Nderniere vD=0 vA=0 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +30e10 +18e10 +18e10 \ #
# $Z +18e10 \ #
# $Z +18e10 +23e10 +23e10 +21e10 +21e10 +18e10 \ #
# $Z +18e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-392e+10; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+307e+10; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+216e+10; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.27e+3; #
# #
# $c double YvitessD=-4.53e+3; #
# #
# $c double ZvitessD=-7.39e+2; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g +514e+8 +213e+8 #
# $c -203e+8 #
# $c -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 #
# $c %+g %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g +682e+7 +967e+8 #
# $c +133e+9 #
# $c +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 #
# $c %+g %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g -163e+7 +422e+8 #
# $c +579e+8 #
# $c +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 #
# $c %+g %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 -1.46e+4 -3.44e+4 #
# $c -2.99e+4 #
# $c -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 #
# $c %+g %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 +4.43e+4 +5.39e+3 #
# $c -3.88e+3 #
# $c -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 #
# $c %+g %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 +2.52e+4 +4.60e+3 #
# $c -1.68e+3 #
# $c -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 #
# $c %+g %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=11 #
# $c extension=5 #
# $c dct=15000 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=FAUX exposant=0.4 #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=$xT/ROTATION$COORD_X #
# $c ZOOM=0.60 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xw11/NCOR.8. #
# $c $formatI\n" #
# $c ,NPAS,NPAS #
# $c ); #
# $c printf("$MV $xw11/NCOR.8.%04d$ROUGE #
# $c $xiim/NCOR.8.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.8.%04d$VERTE #
# $c $xiim/NCOR.8.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xw11/NCOR.8.%04d$BLEUE #
# $c $xiim/NCOR.8.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.8. $xiak/NCOR.W1 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xiim/NCOR.8. $xiak/NCOR.W1 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.W1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.W1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.W1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.W1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=512 #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=$Npremiere derniere=$Nderniere \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.8.%04d$ROUGE \ #
# $X $xw12/NCOR.8.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.8.%04d$VERTE \ #
# $X $xw12/NCOR.8.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.8.%04d$BLEUE \ #
# $X $xw12/NCOR.8.%04d$BLEUE' #
# #
# $xci/disk_video_P$Z $xw12/NCOR.8. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw12/NCOR.8. 129 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.W1$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.W1$R64 RVB rien #
# #
sequence 011393_013440
# Generee par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=2048 #
# $Z @ Nimages = $Nderniere - $Npremiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set NcorpsS=10 #
# $Z @ Ncorps = $NcorpsS - 1 #
# #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=1.50 vA=1.50 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/COORDONNEES$COORD_X \ #
# $Z +1e3 +514e+8 +213e+8 \ #
# $Z -203e+8 \ #
# $Z -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 -392e+10 #
# $Z genere $xT/COORDONNEES$COORD_Y \ #
# $Z +1e3 +682e+7 +967e+8 \ #
# $Z +133e+9 \ #
# $Z +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 +307e+10 #
# $Z genere $xT/COORDONNEES$COORD_Z \ #
# $Z +1e3 \ #
# $Z -163e+7 +422e+8 +579e+8 \ #
# $Z +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 +216e+10 #
# $Z genere $xT/VITESSES$COORD_X \ #
# $Z 0 -1.46e+4 -3.44e+4 \ #
# $Z -2.99e+4 \ #
# $Z -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 -2.27e+3 #
# $Z genere $xT/VITESSES$COORD_Y \ #
# $Z 0 +4.43e+4 +5.39e+3 \ #
# $Z -3.88e+3 \ #
# $Z -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 -4.53e+3 #
# $Z genere $xT/VITESSES$COORD_Z \ #
# $Z 0 +2.52e+4 +4.60e+3 \ #
# $Z -1.68e+3 \ #
# $Z -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 -7.39e+2 #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 #
# $Z genere $xT/RAYONS \ #
# $Z +50e10 +30e10 +30e10 \ #
# $Z +30e10 \ #
# $Z +30e10 +40e10 +40e10 +35e10 +35e10 +30e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 #
# #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=6 \ #
# $Z extension=5 \ #
# $Z dct=15000 \ #
# $Z 2_a_2=FAUX source=1 \ #
# $Z nombre=250 \ #
# $Z ensemble=VRAI \ #
# $Z acceptable=0.5 \ #
# $Z Ranterieurs=0.5 \ #
# $Z Canterieurs=0.8 \ #
# $Z trainees=FAUX \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.997 \ #
# $Z mode_des_trainees=1 \ #
# $Z renormaliser=FAUX \ #
# $Z lineaire=FAUX exposant=0.4 \ #
# $Z Lz=1.0e13 \ #
# $Z TRANSLATION_OX=0 \ #
# $Z TRANSLATION_OY=0 \ #
# $Z ZOOM=0.70 \ #
# $Z ROTATION_OX=$xT/ROTATION$COORD_X \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/NCOR.9. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.9. $xiak/NCOR.U6 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xiim/NCOR.9. $xiak/NCOR.U6 $Npremiere $Nderniere #
# $X $xci/genere$X c='$CP $xiim/NCOR.9.2048%s $xiirk/NCOR.U6.2048%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.U6$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.U6$R64%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/NCOR.U6.2048%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.U6$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.U6$R64%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/NCOR.U6.2048%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=0001 derniere=0499 \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$ROUGE \ #
# $X $xw1/NCOR.9.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$VERTE \ #
# $X $xw1/NCOR.9.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$BLEUE \ #
# $X $xw1/NCOR.9.%04d$BLEUE' #
# #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=0500 derniere=0999 \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$ROUGE \ #
# $X $xw1/NCOR.9.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$VERTE \ #
# $X $xw1/NCOR.9.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$BLEUE \ #
# $X $xw1/NCOR.9.%04d$BLEUE' #
# #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=1000 derniere=1499 \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$ROUGE \ #
# $X $xw1/NCOR.9.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$VERTE \ #
# $X $xw1/NCOR.9.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$BLEUE \ #
# $X $xw1/NCOR.9.%04d$BLEUE' #
# #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=1500 derniere=2048 \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$ROUGE \ #
# $X $xw1/NCOR.9.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$VERTE \ #
# $X $xw1/NCOR.9.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.9.%04d$BLEUE \ #
# $X $xw1/NCOR.9.%04d$BLEUE' #
# #
# $xci/disk_video_P$Z $xw1/NCOR.9. 0001 0499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI VRAI #
# $xci/disk_video_P$Z $xw1/NCOR.9. 0500 0999 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.9. 1000 1499 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/NCOR.9. 1500 2048 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.U6$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.U6$R64 RVB rien #
# #
# record.01$Z $xiirk/NCOR.U6.2048 RVB rien #
# #
sequence 013441_013696
sequence 013697_013952
# Generee (sur '$LACT28') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $Z $xci/gauss$X \ #
# $Z standard=FAUX \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $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("$xrk/lorenz.21$X #
# $c A=$xTV/GAUSS #
# $c iterations=%d #
# $c deplacer=VRAI #
# $c standard=FAUX #
# $c $formatI | #
# $c $xci/acces$X #
# $c renormaliser=VRAI #
# $c zero=VRAI #
# $c standard=FAUX #
# $c R=$xw1/LORE.3.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE.3. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiak/LORE.F1$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE.3. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiak/LORE.F1$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiak/LORE.F1$R16 #
# $Z ro $xiak/LORE.F1$R64 #
# #
# $Z $xcg/unite$Z $xiak/LORE.F1$R16 #
# $Z $xcg/unite$Z $xiak/LORE.F1$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.3. 1 256 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/LORE.3. 1 256 $xiP/orange.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.F1$R16 $xiP/fractal.11 Initialisation #
# record.01$Z $xiak/LORE.F1$R16 $xiP/orange.11 rien #
# record.01$Z $xiak/LORE.F1$R64 $xiP/fractal.11 rien #
# record.01$Z $xiak/LORE.F1$R64 $xiP/orange.11 rien #
# #
sequence 013953_014080
# Generee (sur '$LACT27') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# $Z @ Nombre = $Derniere - $Premiere #
# $Z @ Nombre = $Nombre + 1 #
# #
# $Z Pal #
# #
# $Z $DELETE $xT/COEFFICIENT_Xxyz #
# $Z $xci/valeurs_inte$X \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z cubique=FAUX \ #
# $Z vD=0.00 vA=0.02 \ #
# $Z > $xT/COEFFICIENT_Xxyz #
# #
# $Z $xrk/lorenz.11$X np=$Nombre \ #
# $Z iterations=5000 \ #
# $Z COEFFICIENT_Xxyz=$xT/COEFFICIENT_Xxyz \ #
# $Z R=$xw1/LORE.4. \ #
# $Z $formatI #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.4. $xiak/LORE.G1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.4. $xiak/LORE.G1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LORE.G1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LORE.G1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.G1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.G1$R64%s' RVB=VRAI #
# #
# $Z $DELETE $xT/COEFFICIENT_Xxyz #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.4. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.G1$R16 RVB Initialisation #
# record.01$Z $xiak/LORE.G1$R64 RVB rien #
# #
sequence 014081_014208
# Generee (sur '$LACT27') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# $Z @ Nombre = $Derniere - $Premiere #
# $Z @ Nombre = $Nombre + 1 #
# #
# $Z Pal #
# #
# $Z $DELETE $xT/COEFFICIENT_Xy #
# $Z $DELETE $xT/COEFFICIENT_Yx #
# $Z $DELETE $xT/COEFFICIENT_Yzx #
# $Z $DELETE $xT/COEFFICIENT_Zxy #
# #
# $Z $xci/valeurs_inte$X \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z cubique=FAUX \ #
# $Z vD=0.10 vA=+10.0 \ #
# $Z > $xT/COEFFICIENT_Xy #
# $Z $xci/valeurs_inte$X \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z cubique=FAUX \ #
# $Z vD=0.10 vA=+28.0 \ #
# $Z > $xT/COEFFICIENT_Yx #
# $Z $xci/valeurs_inte$X \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z cubique=FAUX \ #
# $Z vD=0.10 vA=-1.0 \ #
# $Z > $xT/COEFFICIENT_Yzx #
# $Z $xci/valeurs_inte$X \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z cubique=FAUX \ #
# $Z vD=0.10 vA=+1.0 \ #
# $Z > $xT/COEFFICIENT_Zxy #
# #
# $Z $xrk/lorenz.11$X np=$Nombre \ #
# $Z iterations=5000 \ #
# $Z COEFFICIENT_Xy=$xT/COEFFICIENT_Xy \ #
# $Z COEFFICIENT_Yx=$xT/COEFFICIENT_Yx \ #
# $Z COEFFICIENT_Yzx=$xT/COEFFICIENT_Yzx \ #
# $Z COEFFICIENT_Zxy=$xT/COEFFICIENT_Zxy \ #
# $Z R=$xw1/LORE.5. \ #
# $Z $formatI #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.5. $xiak/LORE.G2 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.5. $xiak/LORE.G2 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LORE.G2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LORE.G2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.G2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.G2$R64%s' RVB=VRAI #
# #
# $Z $DELETE $xT/COEFFICIENT_Xy #
# $Z $DELETE $xT/COEFFICIENT_Yx #
# $Z $DELETE $xT/COEFFICIENT_Yzx #
# $Z $DELETE $xT/COEFFICIENT_Zxy #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.5. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.G2$R16 RVB Initialisation #
# record.01$Z $xiak/LORE.G2$R64 RVB rien #
# #
sequence 014209_014336
# Generee (sur '$LACT27') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# $Z @ Nombre = $Derniere - $Premiere #
# $Z @ Nombre = $Nombre + 1 #
# #
# $Z Pal #
# #
# $Z $DELETE $xT/COEFFICIENT_Zz #
# #
# $Z $xci/valeurs_inte$X \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z cubique=FAUX \ #
# $Z vD=0.00 vA=-9.00 \ #
# $Z > $xT/COEFFICIENT_Zz #
# #
# $Z $xrk/lorenz.11$X np=$Nombre \ #
# $Z iterations=5000 \ #
# $Z COEFFICIENT_Zz=$xT/COEFFICIENT_Zz \ #
# $Z R=$xw1/LORE.6. \ #
# $Z $formatI #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.6. $xiak/LORE.G3 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.6. $xiak/LORE.G3 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LORE.G3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LORE.G3$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.G3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.G3$R64%s' RVB=VRAI #
# #
# $Z $DELETE $xT/COEFFICIENT_Zz #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.6. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.G3$R16 RVB Initialisation #
# record.01$Z $xiak/LORE.G3$R64 RVB rien #
# #
sequence 014337_014592
sequence 014593_014848
sequence 014849_015104
# Generees par (sur '$LACT27') : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $Z $xci/fract_2D.01$X \ #
# $Z standard=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/normalise.01$X \ #
# $Z R=$xTV/FRACTAL \ #
# $Z $formatI #
# $Z $xci/init$X \ #
# $Z n=$BLANC \ #
# $Z R=$xTV/TEXTURE \ #
# $Z $formatI #
# #
# $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("$xrk/lorenz.21$X #
# $c A=$xTV/FRACTAL #
# $c iterations=%d #
# $c deplacer=FAUX #
# $c standard=FAUX #
# $c R=$xTV/LORENZ #
# $c $formatI\n #
# $c $xci/acces$X #
# $c A=$xTV/LORENZ #
# $c renormaliser=VRAI #
# $c zero=FAUX #
# $c standard=FAUX #
# $c R=$xw1/LORE.7.%04d #
# $c $formatI\n #
# $c $xci/montagne.01$X #
# $c A=$xTV/LORENZ #
# $c T=$xTV/TEXTURE #
# $c avion=FAUX #
# $c standard=FAUX #
# $c R=$xw1/LORE$M.7.%04d #
# $c $formatI\n #
# $c $xci/montagne.01$X #
# $c A=$xTV/LORENZ #
# $c T=$xTV/TEXTURE #
# $c avion=VRAI #
# $c standard=FAUX #
# $c R=$xw1/LORE$m.7.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE.7. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.91$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE.7. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.91$R64 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.7. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.91$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.7. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.91$M$R64 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$m.7. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.91$m$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$m.7. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.91$m$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiaf/FRA2.91$R16 #
# $Z ro $xiaf/FRA2.91$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.91$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.91$R64 #
# #
# $Z ro $xiaf/FRA2.91$M$R16 #
# $Z ro $xiaf/FRA2.91$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.91$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.91$M$R64 #
# #
# $Z ro $xiaf/FRA2.91$m$R16 #
# $Z ro $xiaf/FRA2.91$m$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.91$m$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.91$m$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE.7. 1 256 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/LORE$M.7. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/LORE$m.7. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiaf/FRA2.91$R16 $xiP/fractal.11 Initialisation #
# record.01$Z $xiaf/FRA2.91$R64 $xiP/fractal.11 rien #
# record.01$Z $xiaf/FRA2.91$M$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.91$M$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.91$m$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.91$m$R64 $xiP/montagnes.01 rien #
# #
sequence 015105_015360
# Generees par (sur '$LACT27') : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $Z $xci/fract_2D.01$X \ #
# $Z standard=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/normalise.01$X \ #
# $Z R=$xTV/FRACTAL \ #
# $Z $formatI #
# $Z $xci/init$X \ #
# $Z n=$BLANC \ #
# $Z R=$xTV/TEXTURE \ #
# $Z $formatI #
# #
# $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("$xrk/lorenz.21$X #
# $c A=$xTV/FRACTAL #
# $c iterations=%d #
# $c deplacer=FAUX #
# $c standard=FAUX #
# $c R=$xTV/LORENZ #
# $c $formatI\n #
# $c $xci/montagne.01$X #
# $c A=$xTV/LORENZ #
# $c T=$xTV/TEXTURE #
# $c avion=FAUX #
# $c standard=FAUX #
# $c R=$xw1/LORE$M.8.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.8. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.A1$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.8. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.A1$M$R64 \ #
# $Z $formatI #
# #
# $Z @ Derniere = $Derniere / 2 #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.8. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.A2$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.8. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.A2$M$R64 \ #
# $Z $formatI #
# #
# $Z @ Derniere = $Derniere / 2 #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.8. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.A4$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.8. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.A4$M$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiaf/FRA2.A1$M$R16 #
# $Z ro $xiaf/FRA2.A1$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.A1$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.A1$M$R64 #
# #
# $Z ro $xiaf/FRA2.A2$M$R16 #
# $Z ro $xiaf/FRA2.A2$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.A2$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.A2$M$R64 #
# #
# $Z ro $xiaf/FRA2.A4$M$R16 #
# $Z ro $xiaf/FRA2.A4$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.A4$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.A4$M$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE$M.8. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiaf/FRA2.A1$M$R16 $xiP/montagnes.01 Initialisation #
# record.01$Z $xiaf/FRA2.A1$M$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.A2$M$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.A2$M$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.A4$M$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.A4$M$R64 $xiP/montagnes.01 rien #
# #
sequence 015361_015616
sequence 015617_015872
# Generees par (sur '$LACT27') : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# #
# $Z Pal #
# #
# $Z $xci/fract_2D.01$X \ #
# $Z standard=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/normalise.01$X \ #
# $Z R=$xTV/FRACTAL \ #
# $Z $formatI #
# $Z $xci/init$X \ #
# $Z n=$BLANC \ #
# $Z R=$xTV/TEXTURE \ #
# $Z $formatI #
# #
# $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("$xrk/lorenz.21$X #
# $c A=$xTV/FRACTAL #
# $c iterations=%d #
# $c deplacer=FAUX #
# $c standard=FAUX #
# $c R=$xTV/LORENZ #
# $c $formatI\n #
# $c $xci/montagne.01$X #
# $c A=$xTV/LORENZ #
# $c T=$xTV/TEXTURE #
# $c avion=FAUX #
# $c standard=FAUX zero=FAUX #
# $c R=$xw1/LORE$M.9.%04d #
# $c $formatI\n #
# $c $xci/montagne.01$X #
# $c A=$xTV/LORENZ #
# $c T=$xTV/TEXTURE #
# $c avion=VRAI #
# $c standard=FAUX zero=FAUX #
# $c R=$xw1/LORE$m.9.%04d #
# $c $formatI\n" #
# $c ,(n-N0)*ITER,n,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B1$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B1$M$R64 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$m.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B1$m$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$m.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B1$m$R64 \ #
# $Z $formatI #
# #
# $Z @ Derniere = $Derniere / 2 #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B2$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B2$M$R64 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$m.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B2$m$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$m.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B2$m$R64 \ #
# $Z $formatI #
# #
# $Z @ Derniere = $Derniere / 2 #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$M.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B4$M$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$M.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B4$M$R64 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$X A=$xw1/LORE$m.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B4$m$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/LORE$m.9. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiaf/FRA2.B4$m$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiaf/FRA2.B1$M$R16 #
# $Z ro $xiaf/FRA2.B1$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.B1$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.B1$M$R64 #
# #
# $Z ro $xiaf/FRA2.B2$M$R16 #
# $Z ro $xiaf/FRA2.B2$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.B2$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.B2$M$R64 #
# #
# $Z ro $xiaf/FRA2.B4$M$R16 #
# $Z ro $xiaf/FRA2.B4$M$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.B4$M$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.B4$M$R64 #
# $Z ro $xiaf/FRA2.B1$m$R16 #
# $Z ro $xiaf/FRA2.B1$m$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.B1$m$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.B1$m$R64 #
# #
# $Z ro $xiaf/FRA2.B2$m$R16 #
# $Z ro $xiaf/FRA2.B2$m$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.B2$m$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.B2$m$R64 #
# #
# $Z ro $xiaf/FRA2.B4$m$R16 #
# $Z ro $xiaf/FRA2.B4$m$R64 #
# #
# $Z $xcg/unite$Z $xiaf/FRA2.B4$m$R16 #
# $Z $xcg/unite$Z $xiaf/FRA2.B4$m$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/LORE$M.9. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/LORE$m.9. 1 256 $xiP/montagnes.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiaf/FRA2.B1$M$R16 $xiP/montagnes.01 Initialisation #
# record.01$Z $xiaf/FRA2.B1$M$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B2$M$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B2$M$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B4$M$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B4$M$R64 $xiP/montagnes.01 rien #
# #
# record.01$Z $xiaf/FRA2.B1$m$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B1$m$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B2$m$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B2$m$R64 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B4$m$R16 $xiP/montagnes.01 rien #
# record.01$Z $xiaf/FRA2.B4$m$R64 $xiP/montagnes.01 rien #
# #
sequence 015873_016000
# Generees par (sur '$LACT28') : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $Z SET cPremiere=1 #
# $Z SET cDerniere=128 #
# #
# $Z $xci/valeurs_inte$X p=$cPremiere d=$cDerniere \ #
# $Z vD=-1.0 vA=+1.0 \ #
# $Z cubique=FAUX \ #
# $Z > $xT/param11 #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define MILIEU (((N-N0)/2)+N0) #
# #
# $c #define COUCHE0 cPremiere #
# $c #define COUCHES cDerniere #
# #
# $c #define ANGLE0 0.0 #
# $c #define ANGLEN (2*3.1415926535897932) #
# #
# $c #define SEUIL_M 192 #
# $c #define SEUIL_m 100 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c double angle=ANGLE0; #
# $c double seuil=(double)SEUIL_M; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double M_m=(double)(SEUIL_M-SEUIL_m); #
# $c double No_MI=(double)(N0-MILIEU); #
# $c double MI_N=(double)(MILIEU-N); #
# #
# $c if (n < MILIEU) #
# $c { #
# $c seuil = (M_m/No_MI)*n #
# $c + (((SEUIL_m*N0)-(SEUIL_M*MILIEU)) #
# $c / No_MI); #
# $c } #
# $c else #
# $c { #
# $c seuil = (-M_m/MI_N)*n #
# $c + (((SEUIL_M*MILIEU)-(SEUIL_m*N)) #
# $c / MI_N); #
# $c } #
# $c printf("$xrc/julia.41$X #
# $c images=%d #
# $c iterations=32 #
# $c r=-0.5815147625160462 #
# $c i=+0.6358885017421603 #
# $c COMPOSANTE_J=$xT/param11 #
# $c K=0.0 #
# $c ROTATION_OY=%f #
# $c R=$xT/JULIA. #
# $c $formatI\n" #
# $c ,COUCHES #
# $c ,angle #
# $c ); #
# $c printf("$xci/accumule.02$X #
# $c A=$xT/JULIA. #
# $c premiere=%d derniere=%d #
# $c binariser=VRAI seuil=%d #
# $c translation_quelconque=FAUX #
# $c stereo=0.0 #
# $c trx=+0.00195695 try=0 #
# $c R=$xw1/JULI.1.%04d #
# $c $formatI\n" #
# $c ,COUCHE0,COUCHES #
# $c ,(int)seuil #
# $c ,n #
# $c ); #
# #
# $c angle = angle + ((ANGLEN-ANGLE0)/(N-N0)); #
# $c } #
# $c } #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.1. 1 128 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# ATTENTION, on notera que cette sequence a ete en fait enregistree en profitant de la #
# commande '$xci/vraies_C.01$X' qui suit, et donc en mode 'RVB'... #
sequence 016001_016128
sequence 016129_016256
sequence 016257_016384
sequence 016385_016512
sequence 016513_016640
sequence 016641_016768
# Generees par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $Z Pal #
# #
# $Z $xci/vraies_C.01$X A=$xw1/JULI.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z p=$xiP/fractal.11 RVB=VRAI \ #
# $Z R=$xw1/JULI.1. \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 4 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.1.%04d$ROUGE #
# $c $xw1/JULI.1.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$VERTE #
# $c $xw1/JULI.1.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$BLEUE #
# $c $xw1/JULI.1.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.40.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.40.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.40.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.41.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.41.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.41.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.40. $xiac/JU.i4.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.40. $xiac/JU.i4.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.i4.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.i4.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i4.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i4.0$R64%s' RVB=VRAI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.41. $xiac/JU.i4.1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.41. $xiac/JU.i4.1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.i4.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.i4.1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i4.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i4.1$R64%s' RVB=VRAI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 8 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.1.%04d$ROUGE #
# $c $xw1/JULI.1.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$VERTE #
# $c $xw1/JULI.1.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$BLEUE #
# $c $xw1/JULI.1.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.80.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.80.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.80.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.81.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.81.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.81.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.80. $xiac/JU.i8.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.80. $xiac/JU.i8.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.i8.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.i8.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i8.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i8.0$R64%s' RVB=VRAI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.81. $xiac/JU.i8.1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.81. $xiac/JU.i8.1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.i8.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.i8.1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i8.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.i8.1$R64%s' RVB=VRAI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 16 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.1.%04d$ROUGE #
# $c $xw1/JULI.1.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$VERTE #
# $c $xw1/JULI.1.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$BLEUE #
# $c $xw1/JULI.1.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.G0.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.G0.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.G0.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.G1.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.G1.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=1 #
# $c R=$xw1/JULI.G1.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.G0. $xiac/JU.iG.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.G0. $xiac/JU.iG.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.iG.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.iG.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.iG.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.iG.0$R64%s' RVB=VRAI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.G1. $xiac/JU.iG.1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.G1. $xiac/JU.iG.1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.iG.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.iG.1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.iG.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.iG.1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.40. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.41. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# $xci/disk_video_P$Z $xw1/JULI.80. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.81. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# $xci/disk_video_P$Z $xw1/JULI.G0. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.G1. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.i4.0$R16 RVB Initialisation #
# record.01$Z $xiac/JU.i4.0$R64 RVB rien #
# record.01$Z $xiac/JU.i4.1$R16 RVB rien #
# record.01$Z $xiac/JU.i4.1$R64 RVB rien #
# #
# record.01$Z $xiac/JU.i8.0$R16 RVB rien #
# record.01$Z $xiac/JU.i8.0$R64 RVB rien #
# record.01$Z $xiac/JU.i8.1$R16 RVB rien #
# record.01$Z $xiac/JU.i8.1$R64 RVB rien #
# #
# record.01$Z $xiac/JU.iG.0$R16 RVB rien #
# record.01$Z $xiac/JU.iG.0$R64 RVB rien #
# record.01$Z $xiac/JU.iG.1$R16 RVB rien #
# record.01$Z $xiac/JU.iG.1$R64 RVB rien #
# #
sequence 016769_016896
sequence 016897_017024
sequence 017025_017152
# Generees par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 4 #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.40.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.40.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.40.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.40. $xiac/JU.j4.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.40. $xiac/JU.j4.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.j4.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.j4.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.j4.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.j4.0$R64%s' RVB=VRAI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 8 #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.80.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.80.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.80.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.80. $xiac/JU.j8.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.80. $xiac/JU.j8.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.j8.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.j8.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.j8.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.j8.0$R64%s' RVB=VRAI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 16 #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.G0.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.G0.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c inverser=VRAI #
# $c attenuation=0 #
# $c R=$xw1/JULI.G0.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.G0. $xiac/JU.jG.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.G0. $xiac/JU.jG.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.jG.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.jG.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.jG.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.jG.0$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.40. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.80. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.G0. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.j4.0$R16 RVB Initialisation #
# record.01$Z $xiac/JU.j4.0$R64 RVB rien #
# #
# record.01$Z $xiac/JU.j8.0$R16 RVB rien #
# record.01$Z $xiac/JU.j8.0$R64 RVB rien #
# #
# record.01$Z $xiac/JU.jG.0$R16 RVB rien #
# record.01$Z $xiac/JU.jG.0$R64 RVB rien #
# #
sequence 017153_017664
# Generee (sur '$LACT28', qui seule permet '-O1', '-O2' et '-O3', la valeur de #
# l'option d'optimisation "-O" definissant ci-apres le nom de l'executable issu de #
# la compilation de '$xrr/N_corps.11$K) par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=512 #
# #
# $Z @ Nimages = $Nderniere - $Npremiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set NcorpsS=4 #
# #
# $Z alias genere 'set FiLe=\!:1 ; set LiStE=(\!:2*) ; \\ #
# $Z $DELETE $FiLe ; \\ #
# $Z echo "$LiStE" | $SE -e "s/ */ /g" | $R "$K_BLANC" "$K_NL" > $FiLe ; \\ #
# $Z unset FiLe LiStE' #
# #
# $Z genere $xT/COORDONNEES$COORD_X +1.0e3 -800.0e9 -800.0e9 +260.0e9 #
# $Z genere $xT/COORDONNEES$COORD_Y +1.0e3 +1.0e3 +5.0e10 +1.0e3 #
# $Z genere $xT/COORDONNEES$COORD_Z +1.0e3 +1.0e3 +1.0e3 +1.0e3 #
# $Z genere $xT/VITESSES$COORD_X 0 0 -0.96e3 0 #
# $Z genere $xT/VITESSES$COORD_Y 0 5.0e3 5.0e3 -13.3e3 #
# $Z genere $xT/VITESSES$COORD_Z 0 0 0 0 #
# $Z genere $xT/MASSES 1.0e30 2.0e27 7.350e22 1.0e28 #
# $Z genere $xT/RAYONS 8.0e10 4.0e10 3.0e10 5.0e10 #
# $Z genere $xT/COULEURS$ROUGE $GRIS_3 $GRIS_8 $GRIS_3 $GRIS_3 #
# $Z genere $xT/COULEURS$VERTE $GRIS_3 $GRIS_8 $GRIS_3 $GRIS_3 #
# $Z genere $xT/COULEURS$BLEUE $GRIS_3 $GRIS_8 $GRIS_3 $GRIS_3 #
# #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11.O1$X \ #
# $Z corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=1 \ #
# $Z ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z dct=100 \ #
# $Z nombre=40000 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.97 \ #
# $Z renormaliser=FAUX \ #
# $Z TRANSLATION_OX=600e9 \ #
# $Z TRANSLATION_OY=300e9 \ #
# $Z R=$xw1/NCOR.A. \ #
# $Z $formatI #
# #
# $Z $xrr/N_corps.11.O2$X \ #
# $Z corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=1 \ #
# $Z ROUGE=FAUX VERTE=VRAI BLEUE=FAUX \ #
# $Z dct=100 \ #
# $Z nombre=40000 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.97 \ #
# $Z renormaliser=FAUX \ #
# $Z TRANSLATION_OX=600e9 \ #
# $Z TRANSLATION_OY=300e9 \ #
# $Z R=$xw1/NCOR.A. \ #
# $Z $formatI #
# #
# $Z $xrr/N_corps.11.O3$X \ #
# $Z corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=1 \ #
# $Z ROUGE=FAUX VERTE=FAUX BLEUE=VRAI \ #
# $Z dct=100 \ #
# $Z nombre=40000 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.97 \ #
# $Z renormaliser=FAUX \ #
# $Z TRANSLATION_OX=600e9 \ #
# $Z TRANSLATION_OY=300e9 \ #
# $Z R=$xw1/NCOR.A. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.A. $xiak/NCOR.X3 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.A. $xiak/NCOR.X3 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.X3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.X3$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.X3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.X3$R64%s' RVB=VRAI #
# #
# #
# $Z @ Nderniere = $Nderniere / 2 #
# #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.A. $xiak/NCOR.X6 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.A. $xiak/NCOR.X6 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.X6$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.X6$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.X6$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.X6$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/NCOR.A. 0001 0512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX VRAI #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.X3$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.X3$R64 RVB rien #
# #
# record.01$Z $xiak/NCOR.X6$R16 RVB rien #
# record.01$Z $xiak/NCOR.X6$R64 RVB rien #
# #
# #
# On notera que les noms {$xrr/N_corps.11.O1$X,$xrr/N_corps.11.O2$X,$xrr/N_corps.11.O3$X} #
# contiennent les options d'optimisation a la compilation {O1,O2,O3}. #
sequence 017665_017723
sequence 017724_017843
# Generees par (sur '$LACT27') : #
# #
# $Z Pal #
# #
# $Z $xrc/tour.01$X \ #
# $Z R=$xiim/MAND.1. \ #
# $Z RC=$xT/MAND.1.C \ #
# $Z RE=$xT/MAND.1.E \ #
# $Z RM=$xT/MAND.1.M \ #
# $Z RT=$xT/MAND.1.T \ #
# $Z $formatI #
# #
# #
# $X echo 'set Premiere=`ls $xiim/MAND.1.???? | $HEA -1`' #
# $X echo 'set Premiere=`echo $Premiere | $SE -e "s/^.*MAND.1.//"`' #
# $X echo 'set Derniere=`ls $xiim/MAND.1.???? | $TAI -1`' #
# $X echo 'set Derniere=`echo $Derniere | $SE -e "s/^.*MAND.1.//"`' #
# #
# #
# $Z Pal #
# #
# $Z $xci/vraies_C.01$X A=$xiim/MAND.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z p=$xiP/fractal.21 RVB=VRAI \ #
# $Z R=$xw1/MAND.1. \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/MAND.1. $xiac/TOUR.C.11 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/MAND.1. $xiac/TOUR.C.11 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TOUR.C.11$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TOUR.C.11$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TOUR.C.11$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TOUR.C.11$R64%s' RVB=VRAI #
# #
# $Z $CP $xiim/MAND.1.0005 $xiirc/TOUR.C.11.0005 #
# $Z $CP $xiim/MAND.1.0032 $xiirc/TOUR.C.11.0032 #
# $Z $CP $xiim/MAND.1.0042 $xiirc/TOUR.C.11.0042 #
# #
# $Z ro $xiirc/TOUR.C.11.0005 #
# $Z ro $xiirc/TOUR.C.11.0032 #
# $Z ro $xiirc/TOUR.C.11.0042 #
# #
# $Z $xcg/unite$Z $xiirc/TOUR.C.11.0005 #
# $Z $xcg/unite$Z $xiirc/TOUR.C.11.0032 #
# $Z $xcg/unite$Z $xiirc/TOUR.C.11.0042 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/MAND.1. 0000 0119 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TOUR.C.11$R16 RVB Initialisation #
# record.01$Z $xiac/TOUR.C.11$R64 RVB rien #
# #
# record.01$Z $xiirc/TOUR.C.11.0005 $xiP/fractal.21 rien #
# record.01$Z $xiirc/TOUR.C.11.0032 $xiP/fractal.21 rien #
# record.01$Z $xiirc/TOUR.C.11.0042 $xiP/fractal.21 rien #
# #
# ATTENTION, l'enregistrement de '$xw1/MAND.1.' a ete interrompu puis la sequence recalculee #
# car, en effet, la fenetre "loupe" de calcul d'un fragment de l'ensemble de Mandelbrot #
# n'etait pas correctement calculee (en ne prenant pas en compte les proportions 'Pal'...). #
sequence 017844_017963
sequence 017964_017964
sequence 017965_018099
sequence 018100_018234
# Generees par (sur '$LACT27') : #
# #
# $Z Pal #
# #
# $Z $xrc/julia.02$X \ #
# $Z R=$xw1/JULI.2. \ #
# $Z RC=$xT/JULI.2.C \ #
# $Z RE=$xT/JULI.2.E \ #
# $Z RM=$xT/JULI.2.M \ #
# $Z RT=$xT/JULI.2.T \ #
# $Z $formatI #
# #
# #
# $X echo 'set Premiere=`ls $xw1/JULI.2.???? | $HEA -1`' #
# $X echo 'set Premiere=`echo $Premiere | $SE -e "s/^.*JULI.2.//"`' #
# $X echo 'set Derniere=`ls $xw1/JULI.2.???? | $TAI -1`' #
# $X echo 'set Derniere=`echo $Derniere | $SE -e "s/^.*JULI.2.//"`' #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/JULI.2. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiac/TOUR.C.21$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/JULI.2. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiac/TOUR.C.21$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiac/TOUR.C.21$R16 #
# $Z ro $xiac/TOUR.C.21$R64 #
# #
# $Z $xcg/unite$Z $xiac/TOUR.C.21$R16 #
# $Z $xcg/unite$Z $xiac/TOUR.C.21$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.2. 0000 0134 $xiP/cercle.35 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.2. 0000 0134 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TOUR.C.21$R16 $xiP/cercle.35 Initialisation #
# record.01$Z $xiac/TOUR.C.21$R64 $xiP/cercle.35 rien #
# record.01$Z $xiac/TOUR.C.21$R16 $xiP/fractal.11 rien #
# record.01$Z $xiac/TOUR.C.21$R64 $xiP/fractal.11 rien #
# #
# ATTENTION, on notera que les deux sequences '017724_017843' et '017844_017978' n'ont pas #
# le meme nombre d'images (120 et 135 respectivement) ; ceci est du (je crois...) a la #
# valeur du parametre 'PAS_DE_CALCUL' qui differe dans les deux programmes correspondants. #
# #
# ATTENTION, on notera d'autre part que l'enregistrement avec '$xiP/fractal.11' a ete #
# interrompu presque immediatement parce que celui qui concernait '$xiP/cercle.35' avait #
# ete fait, par erreur avec seulement 120 images. Tout a donc du etre refait... #
sequence 018235_018369
sequence 018370_018504
sequence 018505_018639
sequence 018640_018774
# Generees par (sur '$LACT27') : #
# #
# $Z Pal #
# #
# $Z $xrc/julia.02$X \ #
# $Z R=$xw1/JULI.3. \ #
# $Z RC=$xT/JULI.3.C \ #
# $Z RE=$xT/JULI.3.E \ #
# $Z RM=$xT/JULI.3.M \ #
# $Z RT=$xT/JULI.3.T \ #
# $Z arguments=VRAI \ #
# $Z $formatI #
# #
# #
# $X echo 'set Premiere=`ls $xw1/JULI.3.???? | $HEA -1`' #
# $X echo 'set Premiere=`echo $Premiere | $SE -e "s/^.*JULI.3.//"`' #
# $X echo 'set Derniere=`ls $xw1/JULI.3.???? | $TAI -1`' #
# $X echo 'set Derniere=`echo $Derniere | $SE -e "s/^.*JULI.3.//"`' #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/JULI.3. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z moyenne=FAUX \ #
# $Z R=$xiac/TOUR.C.22$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/JULI.3. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z moyenne=FAUX \ #
# $Z R=$xiac/TOUR.C.22$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiac/TOUR.C.22$R16 #
# $Z ro $xiac/TOUR.C.22$R64 #
# #
# $Z $xcg/unite$Z $xiac/TOUR.C.22$R16 #
# $Z $xcg/unite$Z $xiac/TOUR.C.22$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.3. 0000 0134 $xiP/cercle.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.3. 0000 0134 $xiP/fractal.91 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.3. 0000 0134 $xiP/orange.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.3. 0000 0134 $xiP/random.06 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TOUR.C.22$R16 $xiP/cercle.11 Initialisation #
# record.01$Z $xiac/TOUR.C.22$R64 $xiP/cercle.11 rien #
# record.01$Z $xiac/TOUR.C.22$R16 $xiP/fractal.91 rien #
# record.01$Z $xiac/TOUR.C.22$R64 $xiP/fractal.91 rien #
# record.01$Z $xiac/TOUR.C.22$R16 $xiP/orange.11 rien #
# record.01$Z $xiac/TOUR.C.22$R64 $xiP/orange.11 rien #
# record.01$Z $xiac/TOUR.C.22$R16 $xiP/random.06 rien #
# record.01$Z $xiac/TOUR.C.22$R64 $xiP/random.06 rien #
# #
sequence 018775_018909
sequence 018910_019044
# Generee par : #
# #
# $Z SET Premiere=0 #
# $Z SET Derniere=134 #
# #
# $Z Pal #
# #
# #
# $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/vraies_C$X #
# $c A=$xw1/JULI.3.%04d #
# $c p=$xiP/random.83 #
# $c RVB=VRAI #
# $c R=$xT/JULI.3 #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xw1/JULI.2.%04d #
# $c T=$xT/JULI.3$ROUGE #
# $c avion=FAUX #
# $c Ty=1 perspective=0.2 #
# $c R=$xw1/JULI$M.4.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xw1/JULI.2.%04d #
# $c T=$xT/JULI.3$VERTE #
# $c avion=FAUX #
# $c Ty=1 perspective=0.2 #
# $c R=$xw1/JULI$M.4.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xw1/JULI.2.%04d #
# $c T=$xT/JULI.3$BLEUE #
# $c avion=FAUX #
# $c Ty=1 perspective=0.2 #
# $c R=$xw1/JULI$M.4.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xw1/JULI.2.%04d #
# $c T=$xT/JULI.3$ROUGE #
# $c avion=VRAI #
# $c R=$xw1/JULI$m.4.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xw1/JULI.2.%04d #
# $c T=$xT/JULI.3$VERTE #
# $c avion=VRAI #
# $c R=$xw1/JULI$m.4.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xw1/JULI.2.%04d #
# $c T=$xT/JULI.3$BLEUE #
# $c avion=VRAI #
# $c R=$xw1/JULI$m.4.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# #
# $Z $xci/reduction_16$Z $xw1/JULI$M.4. $xiac/TO.C.23$M $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI$M.4. $xiac/TO.C.23$M $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TO.C.23$M$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.C.23$M$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.C.23$M$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.C.23$M$R64%s' RVB=VRAI #
# #
# #
# $Z $xci/reduction_16$Z $xw1/JULI$m.4. $xiac/TO.C.23$m $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI$m.4. $xiac/TO.C.23$m $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TO.C.23$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.C.23$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.C.23$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.C.23$m$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI$M.4. 0000 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/JULI$m.4. 0000 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX VRAI #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TO.C.23$M$R16 RVB Initialisation #
# record.01$Z $xiac/TO.C.23$M$R64 RVB rien #
# #
# record.01$Z $xiac/TO.C.23$m$R16 RVB rien #
# record.01$Z $xiac/TO.C.23$m$R64 RVB rien #
# #
sequence 019045_019178
sequence 019179_019312
sequence 019313_019446
sequence 019447_019580
# Generee par : #
# #
# $Z set Couches=128 #
# #
# $Z $xci/valeurs_inte$X p=1 d=$Couches vD=-1.0 vA=1.0 cubique=FAUX \ #
# $Z > $xT/param11 #
# #
# $Z Pal #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# $Z $xrc/julia.42$X \ #
# $Z couches=$Couches \ #
# $Z iterations=32 \ #
# $Z transparence=FAUX binariser=VRAI seuil=$GRIS_6 \ #
# $Z calculer_le_seuil=VRAI fraction=0.02 \ #
# $Z J_COMPOSANTE_J=$xT/param11 \ #
# $Z JK=0.0 \ #
# $Z translation_quelconque=FAUX stereo=0.0 \ #
# $Z ROTATION_OX=0.0 \ #
# $Z ROTATION_OY=0.0 \ #
# $Z ROTATION_OZ=0.0 \ #
# $Z R=$xTV/JULI.5. \ #
# $Z M=$xT/JULI.5. \ #
# $Z $formatI #
# #
# $X echo 'set Prem=`ls $xTV/JULI.5.???? | $HEA -1`' #
# $X echo 'set Prem=`echo $Prem | $SE -e "s/^.*JULI.5.//"`' #
# $X echo 'set Dern=`ls $xTV/JULI.5.???? | $TAI -1`' #
# $X echo 'set Dern=`echo $Dern | $SE -e "s/^.*JULI.5.//"`' #
# #
# $Z $xci/vraies_C.01$X \ #
# $Z A=$xTV/JULI.5. \ #
# $Z premiere=$Prem derniere=$Dern \ #
# $Z p=$xiP/fractal.11 RVB=VRAI \ #
# $Z R=$xw1/JULI.5. \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.5. $xiac/TO.Q.11.0 $Prem $Dern #
# $Z $xci/reduction_64$Z $xw1/JULI.5. $xiac/TO.Q.11.0 $Prem $Dern #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.0$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# $Z $xrc/julia.42$X \ #
# $Z couches=$Couches \ #
# $Z iterations=32 \ #
# $Z transparence=FAUX binariser=VRAI seuil=$GRIS_6 \ #
# $Z calculer_le_seuil=VRAI fraction=0.02 \ #
# $Z J_COMPOSANTE_J=$xT/param11 \ #
# $Z JK=0.0 \ #
# $Z translation_quelconque=FAUX stereo=0.0 \ #
# $Z ROTATION_OX=0.0 \ #
# $Z ROTATION_OY=0.0 \ #
# $Z ROTATION_OZ=$pis2 \ #
# $Z R=$xTV/JULI.6. \ #
# $Z M=$xT/JULI.6. \ #
# $Z $formatI #
# #
# $X echo 'set Prem=`ls $xTV/JULI.6.???? | $HEA -1`' #
# $X echo 'set Prem=`echo $Prem | $SE -e "s/^.*JULI.6.//"`' #
# $X echo 'set Dern=`ls $xTV/JULI.6.???? | $TAI -1`' #
# $X echo 'set Dern=`echo $Dern | $SE -e "s/^.*JULI.6.//"`' #
# #
# $Z $xci/vraies_C.01$X \ #
# $Z A=$xTV/JULI.6. \ #
# $Z premiere=$Prem derniere=$Dern \ #
# $Z p=$xiP/fractal.11 RVB=VRAI \ #
# $Z R=$xw1/JULI.6. \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.6. $xiac/TO.Q.11.1 $Prem $Dern #
# $Z $xci/reduction_64$Z $xw1/JULI.6. $xiac/TO.Q.11.1 $Prem $Dern #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.1$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# $Z if ("$mHOTE" == "$LACT28") then #
# $Z $xrc/julia.42$X \ #
# $Z couches=$Couches \ #
# $Z iterations=32 \ #
# $Z transparence=FAUX binariser=VRAI seuil=$GRIS_4 \ #
# $Z calculer_le_seuil=VRAI fraction=0.02 \ #
# $Z J_COMPOSANTE_J=$xT/param11 \ #
# $Z JK=0.0 \ #
# $Z translation_quelconque=FAUX stereo=0.0 \ #
# $Z ROTATION_OX=0.0 \ #
# $Z ROTATION_OY=$pis2 \ #
# $Z ROTATION_OZ=0.0 \ #
# $Z R=$xTV/JULI.7. \ #
# $Z M=$xT/JULI.7. \ #
# $Z $formatI #
# #
# $X echo 'set Prem=`ls $xTV/JULI.7.???? | $HEA -1`' #
# $X echo 'set Prem=`echo $Prem | $SE -e "s/^.*JULI.7.//"`' #
# $X echo 'set Dern=`ls $xTV/JULI.7.???? | $TAI -1`' #
# $X echo 'set Dern=`echo $Dern | $SE -e "s/^.*JULI.7.//"`' #
# #
# $Z $xci/vraies_C.01$X \ #
# $Z A=$xTV/JULI.7. \ #
# $Z premiere=$Prem derniere=$Dern \ #
# $Z p=$xiP/fractal.11 RVB=VRAI \ #
# $Z R=$xw1/JULI.7. \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.7. $xiac/TO.Q.11.2 $Prem $Dern #
# $Z $xci/reduction_64$Z $xw1/JULI.7. $xiac/TO.Q.11.2 $Prem $Dern #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.2$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# $Z if ("$mHOTE" == "$LACT28") then #
# $Z $xrc/julia.42$X \ #
# $Z couches=$Couches \ #
# $Z iterations=32 \ #
# $Z transparence=FAUX binariser=VRAI seuil=$GRIS_4 \ #
# $Z calculer_le_seuil=VRAI fraction=0.02 \ #
# $Z J_COMPOSANTE_J=$xT/param11 \ #
# $Z JK=0.0 \ #
# $Z translation_quelconque=FAUX stereo=0.0 \ #
# $Z ROTATION_OX=0.0 \ #
# $Z ROTATION_OY=$pis2 \ #
# $Z ROTATION_OZ=$pis2 \ #
# $Z R=$xTV/JULI.8. \ #
# $Z M=$xT/JULI.8. \ #
# $Z $formatI #
# #
# $X echo 'set Prem=`ls $xTV/JULI.8.???? | $HEA -1`' #
# $X echo 'set Prem=`echo $Prem | $SE -e "s/^.*JULI.8.//"`' #
# $X echo 'set Dern=`ls $xTV/JULI.8.???? | $TAI -1`' #
# $X echo 'set Dern=`echo $Dern | $SE -e "s/^.*JULI.8.//"`' #
# #
# $Z $xci/vraies_C.01$X \ #
# $Z A=$xTV/JULI.8. \ #
# $Z premiere=$Prem derniere=$Dern \ #
# $Z p=$xiP/fractal.11 RVB=VRAI \ #
# $Z R=$xw1/JULI.8. \ #
# $Z $formatI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.8. $xiac/TO.Q.11.3 $Prem $Dern #
# $Z $xci/reduction_64$Z $xw1/JULI.8. $xiac/TO.Q.11.3 $Prem $Dern #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.11.3$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.11.3$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# $Z $DELETE $xT/param11 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.5. 0001 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/JULI.6. 0001 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/JULI.7. 0001 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/JULI.8. 0001 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TO.Q.11.0$R16 RVB Initialisation #
# record.01$Z $xiac/TO.Q.11.0$R64 RVB rien #
# #
# record.01$Z $xiac/TO.Q.11.1$R16 RVB rien #
# record.01$Z $xiac/TO.Q.11.1$R64 RVB rien #
# #
# record.01$Z $xiac/TO.Q.11.2$R16 RVB rien #
# record.01$Z $xiac/TO.Q.11.2$R64 RVB rien #
# #
# record.01$Z $xiac/TO.Q.11.3$R16 RVB rien #
# record.01$Z $xiac/TO.Q.11.3$R64 RVB rien #
# #
sequence 019581_019714
# Generee par : #
# #
# $Z SET Prem=1 #
# $Z SET Dern=134 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Prem #
# $c #define N Dern #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c printf("$CP #
# $c $xw1/JULI.5.%04d$ROUGE #
# $c $xT/JULI.1.0001$ROUGE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.5.%04d$VERTE #
# $c $xT/JULI.1.0001$VERTE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.5.%04d$BLEUE #
# $c $xT/JULI.1.0001$BLEUE\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$CP #
# $c $xw1/JULI.6.%04d$ROUGE #
# $c $xT/JULI.1.0002$ROUGE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.6.%04d$VERTE #
# $c $xT/JULI.1.0002$VERTE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.6.%04d$BLEUE #
# $c $xT/JULI.1.0002$BLEUE\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$CP #
# $c $xw1/JULI.7.%04d$ROUGE #
# $c $xT/JULI.1.0003$ROUGE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.7.%04d$VERTE #
# $c $xT/JULI.1.0003$VERTE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.7.%04d$BLEUE #
# $c $xT/JULI.1.0003$BLEUE\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$CP #
# $c $xw1/JULI.8.%04d$ROUGE #
# $c $xT/JULI.1.0004$ROUGE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.8.%04d$VERTE #
# $c $xT/JULI.1.0004$VERTE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xw1/JULI.8.%04d$BLEUE #
# $c $xT/JULI.1.0004$BLEUE\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/reduction_04$Z #
# $c $xT/JULI.1. #
# $c $xT/JULI.1 #
# $c 1 4\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$CP #
# $c $xT/JULI.1$R04$ROUGE #
# $c $xw1/JULI.9.%04d$ROUGE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xT/JULI.1$R04$VERTE #
# $c $xw1/JULI.9.%04d$VERTE\n" #
# $c ,n #
# $c ); #
# $c printf("$CP #
# $c $xT/JULI.1$R04$BLEUE #
# $c $xw1/JULI.9.%04d$BLEUE\n" #
# $c ,n #
# $c ); #
# #
# $c } #
# $c } #
# #
# #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.9. $xiac/TO.Q.24 $Prem $Dern #
# $Z $xci/reduction_64$Z $xw1/JULI.9. $xiac/TO.Q.24 $Prem $Dern #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.24$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.24$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.24$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.24$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.9. 0001 0134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TO.Q.24$R16 RVB Initialisation #
# record.01$Z $xiac/TO.Q.24$R64 RVB rien #
# #
sequence 019715_019848
sequence 019849_019982
sequence 019983_020116
# Generees par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=134 #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 4 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.5.%04d$ROUGE #
# $c $xw1/JULI.5.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$VERTE #
# $c $xw1/JULI.5.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$BLEUE #
# $c $xw1/JULI.5.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.40.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.40.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.40.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.40. $xiac/TO.Q.340 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.40. $xiac/TO.Q.340 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.340$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.340$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.340$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.340$R64%s' RVB=VRAI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 8 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.5.%04d$ROUGE #
# $c $xw1/JULI.5.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$VERTE #
# $c $xw1/JULI.5.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$BLEUE #
# $c $xw1/JULI.5.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.80.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.80.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.80.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.80. $xiac/TO.Q.380 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.80. $xiac/TO.Q.380 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.380$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.380$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.380$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.380$R64%s' RVB=VRAI #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET 16 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.5.%04d$ROUGE #
# $c $xw1/JULI.5.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$VERTE #
# $c $xw1/JULI.5.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$BLEUE #
# $c $xw1/JULI.5.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.G0.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.G0.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=FAUX #
# $c R=$xw1/JULI.G0.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.G0. $xiac/TO.Q.3G0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.G0. $xiac/TO.Q.3G0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.3G0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.3G0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.3G0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.3G0$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.40. 1 134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.80. 1 134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.G0. 1 134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TO.Q.340$R16 RVB Initialisation #
# record.01$Z $xiac/TO.Q.340$R64 RVB rien #
# #
# record.01$Z $xiac/TO.Q.380$R16 RVB rien #
# record.01$Z $xiac/TO.Q.380$R64 RVB rien #
# #
# record.01$Z $xiac/TO.Q.3G0$R16 RVB rien #
# record.01$Z $xiac/TO.Q.3G0$R64 RVB rien #
# #
sequence 020117_020250
# Generees par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=134 #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET (Derniere-Premiere+1) #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c printf("if (\"$mHOTE\" == \"$LACT27\") then\n"); #
# #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.5.%04d$ROUGE #
# $c $xw1/JULI.5.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$VERTE #
# $c $xw1/JULI.5.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.5.%04d$BLEUE #
# $c $xw1/JULI.5.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c printf("else\nendif\n"); #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("if (`$xcg/parallele.01$X #
# $c verrou=$xw1/JULI.X0.%04d` #
# $c == $EXIST) then\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$ROUGE #
# $c Attendre=VRAI #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=VRAI #
# $c R=$xw1/JULI.X0.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$VERTE #
# $c Attendre=VRAI #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=VRAI #
# $c R=$xw1/JULI.X0.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.5. #
# $c postfixe=$BLEUE #
# $c Attendre=VRAI #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=VRAI #
# $c R=$xw1/JULI.X0.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c printf("else\nendif\n"); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.X0. $xiac/TO.Q.3X0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.X0. $xiac/TO.Q.3X0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/TO.Q.3X0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/TO.Q.3X0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.3X0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/TO.Q.3X0$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# Liste des images et des MACHINEs sur lesquelles elles ont ete calculees : #
# #
# LACT27 0001 LACT27 0002 LACT27 0003 LACT27 0004 LACT27 0005 #
# LACT27 0006 LACT27 0007 LACT27 0008 LACT27 0009 LACT27 0010 #
# LACT27 0011 LACT27 0012 LACT27 0013 LACT27 0014 LACT27 0015 #
# LACT27 0016 LACT27 0017 LACT27 0018 LACT27 0019 LACT27 0020 #
# LACT27 0021 LACT27 0022 LACT27 0023 LACT27 0024 LACT27 0025 #
# LACT28 0026 LACT27 0027 LACT28 0028 LACT27 0029 LACT27 0030 #
# LACT28 0031 LACT27 0032 LACT27 0033 LACT28 0034 LACT27 0035 #
# LACT27 0036 LACT28 0037 LACT27 0038 LACT27 0039 LACT28 0040 #
# LACT27 0041 LACT27 0042 LACT28 0043 LACT27 0044 LACT27 0045 #
# LACT28 0046 LACT27 0047 LACT27 0048 LACT28 0049 LACT27 0050 #
# LACT27 0051 LACT27 0052 LACT28 0053 LACT27 0054 LACT27 0055 #
# LACT28 0056 LACT27 0057 LACT27 0058 LACT28 0059 LACT27 0060 #
# LACT27 0061 LACT28 0062 LACT27 0063 LACT27 0064 LACT28 0065 #
# LACT27 0066 LACT28 0067 LACT27 0068 LACT27 0069 LACT28 0070 #
# LACT27 0071 LACT27 0072 LACT28 0073 LACT27 0074 LACT27 0075 #
# LACT28 0076 LACT27 0077 LACT27 0078 LACT28 0079 LACT27 0080 #
# LACT27 0081 LACT28 0082 LACT27 0083 LACT27 0084 LACT28 0085 #
# LACT27 0086 LACT27 0087 LACT28 0088 LACT27 0089 LACT28 0090 #
# LACT27 0091 LACT27 0092 LACT28 0093 LACT27 0094 LACT27 0095 #
# LACT28 0096 LACT27 0097 LACT27 0098 LACT28 0099 LACT27 0100 #
# LACT27 0101 LACT28 0102 LACT27 0103 LACT27 0104 LACT28 0105 #
# LACT27 0106 LACT27 0107 LACT28 0108 LACT27 0109 LACT28 0110 #
# LACT27 0111 LACT27 0112 LACT28 0113 LACT27 0114 LACT27 0115 #
# LACT28 0116 LACT27 0117 LACT27 0118 LACT28 0119 LACT27 0120 #
# LACT27 0121 LACT28 0122 LACT27 0123 LACT27 0124 LACT28 0125 #
# LACT27 0126 LACT28 0127 LACT27 0128 LACT27 0129 LACT28 0130 #
# LACT27 0131 LACT27 0132 LACT28 0133 LACT27 0134 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.X0. 1 134 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/TO.Q.3X0$R16 RVB Initialisation #
# record.01$Z $xiac/TO.Q.3X0$R64 RVB rien #
# #
sequence 020251_020378
# Generees par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# $Z $xci/vraies_C.01$X \ #
# $Z A=$xw1/JULI.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z p=$xiP/fractal.11 RVB=VRAI \ #
# $Z R=$xw1/JULI.1. \ #
# $Z $formatI #
# $Z else #
# $Z endif #
# #
# #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define PAQUET (Derniere-Premiere+1) #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c printf("if (\"$mHOTE\" == \"$LACT27\") then\n"); #
# #
# $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) #
# $c { #
# $c printf("$CP $xw1/JULI.1.%04d$ROUGE #
# $c $xw1/JULI.1.%04d$ROUGE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$VERTE #
# $c $xw1/JULI.1.%04d$VERTE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c printf("$CP $xw1/JULI.1.%04d$BLEUE #
# $c $xw1/JULI.1.%04d$BLEUE\n" #
# $c ,N0+(n-N)-1,n #
# $c ); #
# $c } #
# #
# $c printf("else\nendif\n"); #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int np=n+PAQUET-1; #
# $c int nr = ((np>N) ? N0+(np-N)-1 : np); #
# #
# $c printf("if (`$xcg/parallele.01$X #
# $c verrou=$xw1/JULI.X0.%04d` #
# $c == $EXIST) then\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$ROUGE #
# $c Attendre=VRAI #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=VRAI #
# $c R=$xw1/JULI.X0.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$VERTE #
# $c Attendre=VRAI #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=VRAI #
# $c R=$xw1/JULI.X0.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# $c printf("$xci/accumule.01$X A=$xw1/JULI.1. #
# $c postfixe=$BLEUE #
# $c Attendre=VRAI #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c renormaliser=VRAI #
# $c R=$xw1/JULI.X0.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,np,n #
# $c ); #
# #
# $c printf("else\nendif\n"); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.X0. $xiac/JU.jX.0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.X0. $xiac/JU.jX.0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.jX.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.jX.0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.jX.0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.jX.0$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# Liste des images et des MACHINEs sur lesquelles elles ont ete calculees : #
# #
# LACT28 0001 LACT27 0002 LACT28 0003 LACT27 0004 LACT27 0005 #
# LACT28 0006 LACT27 0007 LACT27 0008 LACT28 0009 LACT27 0010 #
# LACT27 0011 LACT28 0012 LACT27 0013 LACT28 0014 LACT27 0015 #
# LACT27 0016 LACT28 0017 LACT27 0018 LACT27 0019 LACT28 0020 #
# LACT27 0021 LACT27 0022 LACT28 0023 LACT27 0024 LACT27 0025 #
# LACT28 0026 LACT27 0027 LACT27 0028 LACT28 0029 LACT27 0030 #
# LACT27 0031 LACT28 0032 LACT27 0033 LACT27 0034 LACT28 0035 #
# LACT27 0036 LACT27 0037 LACT28 0038 LACT27 0039 LACT28 0040 #
# LACT27 0041 LACT27 0042 LACT28 0043 LACT27 0044 LACT27 0045 #
# LACT28 0046 LACT27 0047 LACT27 0048 LACT28 0049 LACT27 0050 #
# LACT28 0051 LACT27 0052 LACT27 0053 LACT28 0054 LACT27 0055 #
# LACT27 0056 LACT28 0057 LACT27 0058 LACT27 0059 LACT28 0060 #
# LACT27 0061 LACT27 0062 LACT28 0063 LACT27 0064 LACT27 0065 #
# LACT28 0066 LACT27 0067 LACT27 0068 LACT28 0069 LACT27 0070 #
# LACT27 0071 LACT28 0072 LACT27 0073 LACT27 0074 LACT28 0075 #
# LACT27 0076 LACT27 0077 LACT28 0078 LACT27 0079 LACT28 0080 #
# LACT27 0081 LACT27 0082 LACT28 0083 LACT27 0084 LACT27 0085 #
# LACT28 0086 LACT27 0087 LACT27 0088 LACT28 0089 LACT27 0090 #
# LACT27 0091 LACT28 0092 LACT27 0093 LACT27 0094 LACT28 0095 #
# LACT27 0096 LACT27 0097 LACT28 0098 LACT27 0099 LACT27 0100 #
# LACT28 0101 LACT27 0102 LACT27 0103 LACT28 0104 LACT27 0105 #
# LACT27 0106 LACT28 0107 LACT27 0108 LACT27 0109 LACT28 0110 #
# LACT27 0111 LACT27 0112 LACT28 0113 LACT27 0114 LACT27 0115 #
# LACT28 0116 LACT27 0117 LACT27 0118 LACT28 0119 LACT27 0120 #
# LACT27 0121 LACT28 0122 LACT27 0123 LACT28 0124 LACT27 0125 #
# LACT27 0126 LACT28 0127 LACT27 0128 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.X0. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.jX.0$R16 RVB Initialisation #
# record.01$Z $xiac/JU.jX.0$R64 RVB rien #
# #
sequence 020379_020506
# Generees par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# #
# $Z Pal #
# #
# $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/complement$X A=$xw1/JULI.X0.%04d$ROUGE #
# $c $formatI | #
# $c $xci/montagne.01$X A=$xw1/JULI.X0.%04d$ROUGE #
# $c echelle=-1.0 #
# $c avion=VRAI #
# $c sy=60 #
# $c R=$xw1/JU$m.X0.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n,n #
# $c ); #
# $c printf("$xci/complement$X A=$xw1/JULI.X0.%04d$VERTE #
# $c $formatI | #
# $c $xci/montagne.01$X A=$xw1/JULI.X0.%04d$VERTE #
# $c echelle=-1.0 #
# $c avion=VRAI #
# $c sy=60 #
# $c R=$xw1/JU$m.X0.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n,n #
# $c ); #
# $c printf("$xci/complement$X A=$xw1/JULI.X0.%04d$BLEUE #
# $c $formatI | #
# $c $xci/montagne.01$X A=$xw1/JULI.X0.%04d$BLEUE #
# $c echelle=-1.0 #
# $c avion=VRAI #
# $c sy=60 #
# $c R=$xw1/JU$m.X0.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JU$m.X0. $xiac/JU.jX.0$m $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JU$m.X0. $xiac/JU.jX.0$m $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.jX.0$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.jX.0$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.jX.0$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.jX.0$m$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JU$m.X0. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.jX.0$m$R16 RVB Initialisation #
# record.01$Z $xiac/JU.jX.0$m$R64 RVB rien #
# #
sequence 020507_020762
# Generee par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=256 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set NcorpsS=4 #
# #
# $Z alias genere 'set FiLe=\!:1 ; set LiStE=(\!:2*) ; \\ #
# $Z $DELETE $FiLe ; \\ #
# $Z echo "$LiStE" | $SE -e "s/ */ /g" | $R "$K_BLANC" "$K_NL" > $FiLe ; \\ #
# $Z unset FiLe LiStE' #
# #
# $Z genere $xT/COORDONNEES$COORD_X +1.0e3 -800.0e9 -800.0e9 +260.0e9 #
# $Z genere $xT/COORDONNEES$COORD_Y +1.0e3 +1.0e3 +5.0e10 +1.0e3 #
# $Z genere $xT/COORDONNEES$COORD_Z +1.0e3 +1.0e3 +1.0e3 +1.0e3 #
# $Z genere $xT/VITESSES$COORD_X 0 0 -0.96e3 0 #
# $Z genere $xT/VITESSES$COORD_Y 0 5.0e3 5.0e3 -13.3e3 #
# $Z genere $xT/VITESSES$COORD_Z 0 0 0 0 #
# $Z genere $xT/MASSES 1.0e30 2.0e27 7.350e22 1.0e28 #
# $Z genere $xT/RAYONS 8.0e10 4.0e10 3.0e10 5.0e10 #
# $Z genere $xT/COULEURS$ROUGE $GRIS_3 $GRIS_8 $GRIS_3 $GRIS_3 #
# $Z genere $xT/COULEURS$VERTE $GRIS_3 $GRIS_8 $GRIS_3 $GRIS_3 #
# $Z genere $xT/COULEURS$BLEUE $GRIS_3 $GRIS_8 $GRIS_3 $GRIS_3 #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# $Z set Couleur="ROUGE=VRAI VERTE=FAUX BLEUE=FAUX" #
# $Z set Directory=$xw1 #
# $Z repeat 10000 eval "cd /share/blanche ; sleep 60" & #
# $Z else #
# $Z endif #
# #
# $Z if ("$mHOTE" == "$LACT28") then #
# $Z set Couleur="ROUGE=FAUX VERTE=VRAI BLEUE=FAUX" #
# $Z set Directory=$xw1 #
# $Z else #
# $Z endif #
# #
# $Z if ("$mHOTE" == "$LACT29") then #
# $Z set Couleur="ROUGE=FAUX VERTE=FAUX BLEUE=VRAI" #
# $Z set Directory=$xw1 #
# $Z else #
# $Z endif #
# #
# $Z if ($?Couleur == $NEXIST) then #
# $Z EROR "la machine '$sHOTE' ne supporte pas ce calcul" #
# $Z else #
# $Z endif #
# #
# $Z set Couleur="RVB=FAUX N_et_B=FAUX ""$Couleur" #
# #
# $Z Pal #
# #
# $Z $xrr/N_corps.11$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xT/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xT/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xT/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xT/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xT/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xT/VITESSES$COORD_Z \ #
# $Z LISTE_MASSE=$xT/MASSES \ #
# $Z LISTE_RAYON=$xT/RAYONS \ #
# $Z LISTE_ROUGE=$xT/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xT/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xT/COULEURS$BLEUE \ #
# $Z centrer=FAUX reference=1 \ #
# $Z $Couleur \ #
# $Z dct=100 \ #
# $Z nombre=40000 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.97 \ #
# $Z renormaliser=FAUX \ #
# $Z TRANSLATION_OX=600e9 \ #
# $Z TRANSLATION_OY=300e9 \ #
# $Z R=$Directory/NCOR.B. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/COORDONNEES$COORD_X #
# $Z $DELETE $xT/COORDONNEES$COORD_Y #
# $Z $DELETE $xT/COORDONNEES$COORD_Z #
# $Z $DELETE $xT/VITESSES$COORD_X #
# $Z $DELETE $xT/VITESSES$COORD_Y #
# $Z $DELETE $xT/VITESSES$COORD_Z #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# #
# $Z if ("$mHOTE" == "$LACT27") then #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.B. $xiak/NCOR.Y2 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.B. $xiak/NCOR.Y2 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.Y2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.Y2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.Y2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.Y2$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/NCOR.B. 001 256 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.Y2$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.Y2$R64 RVB rien #
# #
# On notera que l'on obtient le meme resultat avec les trois machines, ce qui est assez #
# etonnant et en contradiction avec la sequence 'xivPdf 11 1 / 017153_017408'... #
sequence 020763_020890
sequence 020891_021018
# Generee par : #
# #
# $Z Pal #
# #
# #
# $Z SET cPremiere=1 #
# $Z SET cDerniere=128 #
# #
# $Z @ Nimages = $cDerniere - $cPremiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z $xci/valeurs_inte$X p=$cPremiere d=$cDerniere \ #
# $Z vD=-1.0 vA=+1.0 \ #
# $Z cubique=FAUX \ #
# $Z > $xT/param11 \ #
# #
# $Z $xrc/julia.41$X \ #
# $Z images=$Nimages \ #
# $Z iterations=128 \ #
# $Z r=-0.5815147625160462 \ #
# $Z i=+0.6358885017421603 \ #
# $Z COMPOSANTE_J=$xT/param11 \ #
# $Z K=0.0 \ #
# $Z R=$xTV/JULI.1. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/param11 #
# #
# $c #define N0 cPremiere #
# $c #define N cDerniere #
# #
# $c #define NOIR 0 #
# $c #define BLANC 255 #
# $c #define COEF_A (BLANC-NOIR)/(N-N0) #
# $c #define COEF_B ((N*NOIR)-(N0*BLANC))/(N-N0) #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c printf("$xci/accumule.02$X #
# $c A=$xTV/JULI.1. #
# $c premiere=$cPremiere #
# $c derniere=$cDerniere #
# $c binariser=VRAI #
# $c seuil=%d #
# $c stereo=0.0 #
# $c trx=+0.00195695 try=0 #
# $c R=$xw1/JULI.2.%04d #
# $c $formatI\n" #
# $c ,(COEF_A*n)+COEF_B,n #
# $c ); #
# $c printf("$xci/vraies_C$X #
# $c A=$xw1/JULI.2.%04d #
# $c p=$xiP/fractal.11 #
# $c RVB=VRAI #
# $c R=$xw1/JULI.2.%04d #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/accumule.02$X #
# $c A=$xTV/JULI.1. #
# $c premiere=$cPremiere #
# $c derniere=$cDerniere #
# $c binariser=FAUX #
# $c seuil=%d #
# $c stereo=0.0 #
# $c trx=+0.00195695 try=0 #
# $c R=$xw1/JULI.3.%04d #
# $c $formatI\n" #
# $c ,(COEF_A*n)+COEF_B,n #
# $c ); #
# $c printf("$xci/vraies_C$X #
# $c A=$xw1/JULI.3.%04d #
# $c p=$xiP/fractal.11 #
# $c RVB=VRAI #
# $c R=$xw1/JULI.3.%04d #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z @ cDerniere = $cDerniere / 2 #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.2. $xiac/JU.k1 $cPremiere $cDerniere #
# $Z $xci/reduction_64$Z $xw1/JULI.2. $xiac/JU.k1 $cPremiere $cDerniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.k1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.k1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.k1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.k1$R64%s' RVB=VRAI #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.3. $xiac/JU.k2 $cPremiere $cDerniere #
# $Z $xci/reduction_64$Z $xw1/JULI.3. $xiac/JU.k2 $cPremiere $cDerniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.k2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.k2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.k2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.k2$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.2. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z $xw1/JULI.3. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.k1$R16 RVB Initialisation #
# record.01$Z $xiac/JU.k1$R64 RVB rien #
# #
# record.01$Z $xiac/JU.k2$R16 RVB rien #
# record.01$Z $xiac/JU.k2$R64 RVB rien #
# #
sequence 021019_021146
# Generee par : #
# #
# $Z Pal #
# #
# #
# $Z SET cPremiere=1 #
# $Z SET cDerniere=128 #
# #
# $Z @ Nimages = $cDerniere - $cPremiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z $xci/valeurs_inte$X p=$cPremiere d=$cDerniere \ #
# $Z vD=-1.0 vA=+1.0 \ #
# $Z cubique=FAUX \ #
# $Z > $xT/param11 \ #
# #
# $Z $xrc/julia.41$X \ #
# $Z images=$Nimages \ #
# $Z iterations=32 \ #
# $Z r=-0.5815147625160462 \ #
# $Z i=+0.6358885017421603 \ #
# $Z COMPOSANTE_J=$xT/param11 \ #
# $Z K=0.0 \ #
# $Z arguments=VRAI \ #
# $Z ponderationT=1 \ #
# $Z ponderationP=0 \ #
# $Z ponderationA=0 \ #
# $Z R=$xw1/JULI.4. \ #
# $Z $formatI #
# #
# $Z $DELETE $xT/param11 #
# #
# $Z $xci/vraies_C.01$X A=$xw1/JULI.4. \ #
# $Z premiere=$cPremiere derniere=$cDerniere \ #
# $Z p=$xiP/fractal.91 RVB=VRAI \ #
# $Z R=$xw1/JULI.4. \ #
# $Z $formatI #
# #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.4. $xiac/JU.l1 $cPremiere $cDerniere #
# $Z $xci/reduction_64$Z $xw1/JULI.4. $xiac/JU.l1 $cPremiere $cDerniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.l1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.l1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.l1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.l1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.4. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.l1$R16 RVB Initialisation #
# record.01$Z $xiac/JU.l1$R64 RVB rien #
# #
sequence 021147_021274
# Generees par (sur '$LACT29') : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $Z SET cPremiere=1 #
# $Z SET cDerniere=64 #
# #
# $Z $xci/valeurs_inte$X p=$cPremiere d=$cDerniere \ #
# $Z vD=0.0 vA=+1.0 \ #
# $Z cubique=FAUX \ #
# $Z > $xT/param11 #
# #
# $Z Pal #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# $c #define MILIEU (((N-N0)/2)+N0) #
# #
# $c #define COUCHE0 cPremiere #
# $c #define COUCHES cDerniere #
# #
# $c #define ANGLE0 0.0 #
# $c #define ANGLEN (2*3.1415926535897932) #
# #
# $c #define SEUIL_M 32 #
# $c #define SEUIL_m 32 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c double angle=ANGLE0; #
# $c double seuil=(double)SEUIL_M; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double M_m=(double)(SEUIL_M-SEUIL_m); #
# $c double No_MI=(double)(N0-MILIEU); #
# $c double MI_N=(double)(MILIEU-N); #
# #
# $c if (n < MILIEU) #
# $c { #
# $c seuil = (M_m/No_MI)*n #
# $c + (((SEUIL_m*N0)-(SEUIL_M*MILIEU)) #
# $c / No_MI); #
# $c } #
# $c else #
# $c { #
# $c seuil = (-M_m/MI_N)*n #
# $c + (((SEUIL_M*MILIEU)-(SEUIL_m*N)) #
# $c / MI_N); #
# $c } #
# $c printf("$xrc/julia.41$X #
# $c images=%d #
# $c iterations=64 #
# $c r=0.0 #
# $c i=1.0 #
# $c COMPOSANTE_J=$xT/param11 #
# $c K=0.0 #
# $c ROTATION_OY=%f #
# $c R=$xT/JULIA. #
# $c $formatI\n" #
# $c ,COUCHES #
# $c ,angle #
# $c ); #
# $c printf("$xci/accumule.02$X #
# $c A=$xT/JULIA. #
# $c premiere=%d derniere=%d #
# $c binariser=FAUX seuil=%d #
# $c translation_quelconque=FAUX #
# $c stereo=0.0 #
# $c trx=+0.00195695 try=0 #
# $c $formatI | #
# $c $xci/acces$X #
# $c renormaliser=VRAI #
# $c $formatI | #
# $c $xci/vraies_C$X #
# $c p=$xiP/sepia.11 #
# $c RVB=VRAI #
# $c R=$xw1/JULI.5.%04d #
# $c $formatI\n" #
# $c ,COUCHE0,COUCHES #
# $c ,(int)seuil #
# $c ,n #
# $c ); #
# $c printf("$xci/substitue$Z #
# $c $xw1/JULI.5.%04d #
# $c $xiP/gris.11 #
# $c $xw1/JULI.5.%04d\n" #
# $c ,n,n #
# $c ); #
# #
# $c angle = angle + ((ANGLEN-ANGLE0)/(N-N0)); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.5. $xiac/JU.m1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.5. $xiac/JU.m1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.m1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.m1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.m1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.m1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.5. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.m1$R16 RVB Initialisation #
# record.01$Z $xiac/JU.m1$R64 RVB rien #
# #
sequence 021275_021402
# Generees par (sur '$LACT29' pour les images '0001' a '0055', puis repris sur '$LACT27') : #
# #
# $Z S #
# #
# $Z Sdu #
# #
# $Z $xci/init$X \ #
# $Z niveau=$BLANC \ #
# $Z R=$xT/TEXTURE \ #
# $Z $formatI #
# $Z $xci/gauss$X \ #
# $Z R=$xT/GAUSS \ #
# $Z $formatI #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $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("Pal\n"); #
# $c printf("$xci/format.01$X #
# $c A=$xw1/JULI.5.%04d$ROUGE #
# $c mode=7 #
# $c $formatI #
# $c R=$xT/JULIA #
# $c $formatR_Sdu\n" #
# $c ,n #
# $c ); #
# #
# $c printf("Sdu\n"); #
# $c printf("$xci/filtre.01$X #
# $c A=$xT/JULIA #
# $c N=$xT/GAUSS #
# $c standard=FAUX #
# $c $formatI | #
# $c $xci/montagne.01$X #
# $c standard=FAUX #
# $c T=$xT/TEXTURE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c mode=7 #
# $c $formatI #
# $c R=$xw1/JU$m.6.%04d #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# #
# $c printf("Pal\n"); #
# $c printf("$xci/vraies_C$X #
# $c A=$xw1/JU$m.6.%04d #
# $c p=$xiP/montagnes.01 #
# $c RVB=VRAI #
# $c R=$xw1/JU$m.6.%04d #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JU$m.6. $xiac/JU.m1.1$m $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JU$m.6. $xiac/JU.m1.1$m $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.m1.1$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.m1.1$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.m1.1$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.m1.1$m$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JU$m.6. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.m1.1$m$R16 RVB Initialisation #
# record.01$Z $xiac/JU.m1.1$m$R64 RVB rien #
# #
sequence 021403_021530
# Generees par (sur '$LACT29') : #
# #
# $Z S #
# #
# $Z Sdu #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xT/GAUSS \ #
# $Z $formatI #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $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("Pal\n"); #
# $c printf("$xci/format.01$X #
# $c A=$xw1/JULI.5.%04d$ROUGE #
# $c mode=7 #
# $c $formatI #
# $c R=$xT/JULIA #
# $c $formatR_Sdu\n" #
# $c ,n #
# $c ); #
# #
# $c printf("Sdu\n"); #
# $c printf("$xci/filtre.01$X #
# $c A=$xT/JULIA #
# $c N=$xT/GAUSS #
# $c standard=FAUX #
# $c R=$xT/JULIA$Fi #
# $c $formatI\n" #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xT/JULIA$Fi #
# $c standard=FAUX zero=FAUX #
# $c $formatI | #
# $c $xci/seuil$X #
# $c seuil=12 #
# $c R=$xT/TEXTURE.11 #
# $c $formatI\n" #
# $c ); #
# $c printf("$CP #
# $c $xT/TEXTURE.11 #
# $c $xT/TEXTURE.11$ROUGE\n" #
# $c ); #
# $c printf("$CP #
# $c $xT/TEXTURE.11 #
# $c $xT/TEXTURE.11$VERTE\n" #
# $c ); #
# $c printf("$CP #
# $c $xT/TEXTURE.11 #
# $c $xT/TEXTURE.11$BLEUE\n" #
# $c ); #
# #
# #
# $c printf("$xci/complement$X #
# $c A=$xT/TEXTURE.11 #
# $c R=$xT/TEXTURE.12$BLEUE #
# $c $formatI\n" #
# $c ); #
# $c printf("$xci/scale$X #
# $c A=$xT/TEXTURE.12$BLEUE #
# $c a=0.7 #
# $c R=$xT/TEXTURE.12$VERTE #
# $c $formatI\n" #
# $c ); #
# $c printf("$xci/scale$X #
# $c A=$xT/TEXTURE.12$BLEUE #
# $c a=0.0 #
# $c R=$xT/TEXTURE.12$ROUGE #
# $c $formatI\n" #
# $c ); #
# #
# $c printf("$xci/or_02$X #
# $c A1=$xT/TEXTURE.11$ROUGE #
# $c A2=$xT/TEXTURE.12$ROUGE #
# $c R=$xT/TEXTURE$ROUGE #
# $c $formatI\n" #
# $c ); #
# $c printf("$xci/or_02$X #
# $c A1=$xT/TEXTURE.11$VERTE #
# $c A2=$xT/TEXTURE.12$VERTE #
# $c R=$xT/TEXTURE$VERTE #
# $c $formatI\n" #
# $c ); #
# $c printf("$xci/or_02$X #
# $c A1=$xT/TEXTURE.11$BLEUE #
# $c A2=$xT/TEXTURE.12$BLEUE #
# $c R=$xT/TEXTURE$BLEUE #
# $c $formatI\n" #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xT/JULIA$Fi #
# $c standard=FAUX zero=FAUX #
# $c T=$xT/TEXTURE$ROUGE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c mode=7 #
# $c $formatI #
# $c R=$xw1/JU$m.7.%04d$ROUGE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xT/JULIA$Fi #
# $c standard=FAUX zero=FAUX #
# $c T=$xT/TEXTURE$VERTE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c mode=7 #
# $c $formatI #
# $c R=$xw1/JU$m.7.%04d$VERTE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xT/JULIA$Fi #
# $c standard=FAUX zero=FAUX #
# $c T=$xT/TEXTURE$BLEUE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c mode=7 #
# $c $formatI #
# $c R=$xw1/JU$m.7.%04d$BLEUE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/JU$m.7. $xiac/JU.m1.2$m $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JU$m.7. $xiac/JU.m1.2$m $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JU.m1.2$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JU.m1.2$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.m1.2$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JU.m1.2$m$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JU$m.7. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JU.m1.2$m$R16 RVB Initialisation #
# record.01$Z $xiac/JU.m1.2$m$R64 RVB rien #
# #
sequence 021531_021658
sequence 021659_021786
sequence 021787_021914
sequence 021915_022042
# Generees par : #
# #
# $Z Pal #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $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("if (`$xcg/parallele.01$X #
# $c verrou=$xw1/JULI.8.%04d` #
# $c == $EXIST) then\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/accumule.01$X #
# $c A=$xw1/JU$m.7. #
# $c postfixe=$ROUGE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.8.%04d$ROUGE #
# $c $formatI\n" #
# $c ,N0,n,n #
# $c ); #
# $c printf("$xci/accumule.01$X #
# $c A=$xw1/JU$m.7. #
# $c postfixe=$VERTE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.8.%04d$VERTE #
# $c $formatI\n" #
# $c ,N0,n,n #
# $c ); #
# $c printf("$xci/accumule.01$X #
# $c A=$xw1/JU$m.7. #
# $c postfixe=$BLEUE #
# $c premiere=%d derniere=%d #
# $c attenuation=0 #
# $c R=$xw1/JULI.8.%04d$BLEUE #
# $c $formatI\n" #
# $c ,N0,n,n #
# $c ); #
# #
# $c printf("else\nendif\n"); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z if ("$mHOTE" == "$LACT29") then #
# #
# $Z $xci/reduction_16$Z $xw1/JULI.8. $xiac/JULI.m2 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/JULI.8. $xiac/JULI.m2 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiac/JULI.m2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiac/JULI.m2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JULI.m2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiac/JULI.m2$R64%s' RVB=VRAI #
# #
# $Z else #
# $Z endif #
# #
# #
# Liste des images et des MACHINEs sur lesquelles elles ont ete calculees : #
# #
# LACT29 0001 LACT29 0002 LACT29 0003 LACT29 0004 LACT29 0005 #
# LACT29 0006 LACT29 0007 LACT29 0008 LACT29 0009 LACT29 0010 #
# LACT29 0011 LACT29 0012 LACT29 0013 LACT29 0014 LACT29 0015 #
# LACT29 0016 LACT29 0017 LACT29 0018 LACT29 0019 LACT29 0020 #
# LACT29 0021 LACT29 0022 LACT29 0023 LACT29 0024 LACT29 0025 #
# LACT29 0026 LACT29 0027 LACT29 0028 LACT29 0029 LACT29 0030 #
# LACT29 0031 LACT29 0032 LACT29 0033 LACT29 0034 LACT29 0035 #
# LACT29 0036 LACT29 0037 LACT29 0038 LACT29 0039 LACT29 0040 #
# LACT29 0041 LACT29 0042 LACT29 0043 LACT29 0044 LACT29 0045 #
# LACT29 0046 LACT29 0047 LACT29 0048 LACT29 0049 LACT29 0050 #
# LACT29 0051 LACT27 0052 LACT29 0053 LACT27 0054 LACT28 0055 #
# LACT27 0056 LACT29 0057 LACT12 0058 LACT28 0059 LACT27 0060 #
# LACT29 0061 LACT27 0062 LACT29 0063 LACT28 0064 LACT12 0065 #
# LACT27 0066 LACT27 0067 LACT29 0068 LACT28 0069 LACT27 0070 #
# LACT12 0071 LACT29 0072 LACT27 0073 LACT28 0074 LACT27 0075 #
# LACT29 0076 LACT12 0077 LACT27 0078 LACT28 0079 LACT29 0080 #
# LACT27 0081 LACT12 0082 LACT27 0083 LACT29 0084 LACT28 0085 #
# LACT27 0086 LACT29 0087 LACT27 0088 LACT28 0089 LACT12 0090 #
# LACT27 0091 LACT29 0092 LACT28 0093 LACT27 0094 LACT12 0095 #
# LACT29 0096 LACT27 0097 LACT28 0098 LACT27 0099 LACT29 0100 #
# LACT27 0101 LACT28 0102 LACT29 0103 LACT27 0104 LACT12 0105 #
# LACT27 0106 LACT29 0107 LACT28 0108 LACT27 0109 LACT12 0110 #
# LACT29 0111 LACT27 0112 LACT28 0113 LACT27 0114 LACT29 0115 #
# LACT27 0116 LACT28 0117 LACT29 0118 LACT27 0119 LACT29 0120 #
# LACT27 0121 LACT28 0122 LACT27 0123 LACT29 0124 LACT28 0125 #
# LACT27 0126 LACT29 0127 LACT27 0128 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/JULI.8. 1 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# $xci/disk_video_P$Z "$xw1/JULI.8. $ROUGE" 1 128 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z "$xw1/JULI.8. $VERTE" 1 128 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# $xci/disk_video_P$Z "$xw1/JULI.8. $BLEUE" 1 128 $xiP/fractal.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/JULI.m2$R16 RVB Initialisation #
# record.01$Z $xiac/JULI.m2$R16$ROUGE $xiP/fractal.11 rien #
# record.01$Z $xiac/JULI.m2$R16$VERTE $xiP/fractal.11 rien #
# record.01$Z $xiac/JULI.m2$R16$BLEUE $xiP/fractal.11 rien #
# record.01$Z $xiac/JULI.m2$R64 RVB rien #
# #
sequence 022043_022298
# Generee (sur '$LACT27') par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=256 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=11 #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=$Npremiere d=$Npas vD=1.40 vA=1.40 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +30e10 +18e10 +18e10 \ #
# $Z +18e10 \ #
# $Z +18e10 +23e10 +23e10 +21e10 +21e10 +18e10 \ #
# $Z +18e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-392e+10; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+307e+10; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+216e+10; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.27e+3; #
# #
# $c double YvitessD=-4.53e+3; #
# #
# $c double ZvitessD=-7.39e+2; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g +514e+8 +213e+8 #
# $c -203e+8 #
# $c -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 #
# $c %+g %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g +682e+7 +967e+8 #
# $c +133e+9 #
# $c +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 #
# $c %+g %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g -163e+7 +422e+8 #
# $c +579e+8 #
# $c +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 #
# $c %+g %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 -1.46e+4 -3.44e+4 #
# $c -2.99e+4 #
# $c -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 #
# $c %+g %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 +4.43e+4 +5.39e+3 #
# $c -3.88e+3 #
# $c -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 #
# $c %+g %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 +2.52e+4 +4.60e+3 #
# $c -1.68e+3 #
# $c -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 #
# $c %+g %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=1 #
# $c extension=5 #
# $c dct=15000 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=VRAI #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=$xT/ROTATION$COORD_X #
# $c ZOOM=0.85 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xiim/NCOR.X. #
# $c $formatI\n" #
# $c ,NPAS,NPAS #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$ROUGE #
# $c $xiim/NCOR.C.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$VERTE #
# $c $xiim/NCOR.C.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$BLEUE #
# $c $xiim/NCOR.C.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.C. $xiak/NCOR.Z9 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xiim/NCOR.C. $xiak/NCOR.Z9 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.Z9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.Z9$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.Z9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.Z9$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=256 #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=$Npremiere derniere=$Nderniere \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.C.%04d$ROUGE \ #
# $X $xw1/NCOR.C.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.C.%04d$VERTE \ #
# $X $xw1/NCOR.C.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.C.%04d$BLEUE \ #
# $X $xw1/NCOR.C.%04d$BLEUE' #
# #
# $xci/disk_video_P$Z $xw1/NCOR.C. 001 256 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.Z9$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.Z9$R64 RVB rien #
# #
sequence 022299_022810
# Generee (sur '$LACT27') par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=512 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=11 #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=$Npremiere d=$Nderniere vD=0 vA=0 cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 +3.3e23 +48.7e23 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 +189.9e25 +56.8e25 +8.6e25 +10.3e25 +6.6e21 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +30e10 +18e10 +18e10 \ #
# $Z +18e10 \ #
# $Z +18e10 +23e10 +23e10 +21e10 +21e10 +18e10 \ #
# $Z +18e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 $GRIS_8 $GRIS_8 $GRIS_4 $GRIS_0 $GRIS_7 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 $GRIS_6 $GRIS_4 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 $GRIS_6 $GRIS_7 $GRIS_8 $GRIS_7 $GRIS_7 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 $GRIS_2 $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 $GRIS_0 $GRIS_0 $GRIS_8 $GRIS_8 $GRIS_8 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-392e+10; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+307e+10; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+216e+10; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.27e+3; #
# #
# $c double YvitessD=-4.53e+3; #
# #
# $c double ZvitessD=-7.39e+2; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g +514e+8 +213e+8 #
# $c -203e+8 #
# $c -204e+9 +501e+9 -134e+10 -150e+9 -436e+10 #
# $c %+g %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g +682e+7 +967e+8 #
# $c +133e+9 #
# $c +126e+9 -519e+9 +341e+9 +259e+10 -115e+10 #
# $c %+g %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g -163e+7 +422e+8 #
# $c +579e+8 #
# $c +634e+8 -235e+9 +199e+9 +113e+10 -363e+9 #
# $c %+g %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 -1.46e+4 -3.44e+4 #
# $c -2.99e+4 #
# $c -1.27e+4 +9.67e+3 -3.21e+3 -6.84e+3 +1.42e+3 #
# $c %+g %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 +4.43e+4 +5.39e+3 #
# $c -3.88e+3 #
# $c -1.64e+4 +8.59e+3 -8.62e+3 -6.50e+2 -4.79e+3 #
# $c %+g %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 +2.52e+4 +4.60e+3 #
# $c -1.68e+3 #
# $c -7.18e+3 +3.44e+3 -3.42e+3 -1.88e+2 -2.00e+3 #
# $c %+g %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=11 #
# $c extension=5 #
# $c dct=15000 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=VRAI #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=$xT/ROTATION$COORD_X #
# $c ZOOM=0.60 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xiim/NCOR.X. #
# $c $formatI\n" #
# $c ,NPAS,NPAS #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$ROUGE #
# $c $xiim/NCOR.D.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$VERTE #
# $c $xiim/NCOR.D.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$BLEUE #
# $c $xiim/NCOR.D.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/NCOR.D. $xiak/NCOR.Z1 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xiim/NCOR.D. $xiak/NCOR.Z1 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.Z1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.Z1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.Z1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.Z1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=512 #
# #
# $Z relatif $xiim #
# #
# $X $xci/genere$X premiere=$Npremiere derniere=$Nderniere \ #
# $X C='$RCP \ #
# $X $R_LACT27/$nomR/NCOR.D.%04d$ROUGE \ #
# $X $xw1/NCOR.D.%04d$ROUGE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.D.%04d$VERTE \ #
# $X $xw1/NCOR.D.%04d$VERTE ; \ #
# $X $RCP \ #
# $X $R_LACT27/$nomR/NCOR.D.%04d$BLEUE \ #
# $X $xw1/NCOR.D.%04d$BLEUE' #
# #
# $xci/disk_video_P$Z $xw1/NCOR.D. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.Z1$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.Z1$R64 RVB rien #
# #
sequence 022811_023322
# Generee (sur '$LACT27') par : #
# #
# $Z SET Nimages=512 #
# $Z SET NimageZ=1 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=1 d=$NcorpsS vD=$vD vA=$vA $ArG > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=1 d=$NcorpsS signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z GenR $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# $Z GenR $xTV/COULEURS$ROUGE $GRIS_2 $GRIS_8 entiers=VRAI g=31 #
# $Z GenR $xTV/COULEURS$VERTE $GRIS_2 $GRIS_8 entiers=VRAI g=32 #
# $Z GenR $xTV/COULEURS$BLEUE $GRIS_2 $GRIS_8 entiers=VRAI g=33 #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/format.01$X mode=0 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.0 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI Mhors=$BLANC \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=1 Zmax=16 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RDNW.1. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI Mhors=$BLANC \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=1 Zmax=16 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RDNW.1. \ #
# $Z R=$xiim/RDNW.1. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/vitre.53$Z \ #
# $X $xiim/RDNW.1.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/RDNW.1.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/RDNW.1. $xiak/REFL.11 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/RDNW.1. $xiak/REFL.11 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.11$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.11$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.11$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.11$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/RDNW.1.0512%s $xiirk/REFL.11.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.11.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.11.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/RDNW.1. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.11.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.11$R16 RVB rien #
# record.01$Z $xiak/REFL.11$R64 RVB rien #
# #
sequence 023323_023834
# Generee (sur '$LACT27') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=1 d=$NcorpsS vD=$vD vA=$vA $ArG > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=1 d=$NcorpsS signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z GenR $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# $Z GenR $xTV/COULEURS$ROUGE $GRIS_2 $GRIS_8 entiers=VRAI g=31 #
# $Z GenR $xTV/COULEURS$VERTE $GRIS_2 $GRIS_8 entiers=VRAI g=32 #
# $Z GenR $xTV/COULEURS$BLEUE $GRIS_2 $GRIS_8 entiers=VRAI g=33 #
# #
# $Z Pal #
# #
# $Z $xrc/mandel.01$X \ #
# $Z images=1 \ #
# $Z xbgd=-1.35 xhdd=+0.35 \ #
# $Z ybgd=-0.85 yhdd=+0.85 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/convol.01$X \ #
# $Z points=81 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_4 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/cadre$X \ #
# $Z niveau=$NOIR \ #
# $Z epaisseur=8 \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatI #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=2 Mprolonger_X=VRAI \ #
# $Z MNpasY=2 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=2 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.1. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=2 Mprolonger_X=VRAI \ #
# $Z MNpasY=2 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=2 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.1. \ #
# $Z R=$xiim/REFL.1. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/vitre.53$Z \ #
# $X $xiim/REFL.1.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.1.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.1. $xiak/REFL.21 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.1. $xiak/REFL.21 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.21$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.21$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.21$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.21$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.1.0512%s $xiirk/REFL.21.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.21.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.21.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.1. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.21.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.21$R16 RVB rien #
# record.01$Z $xiak/REFL.21$R64 RVB rien #
# #
sequence 023835_024346
# Generee (sur '$LACT27') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=1 d=$NcorpsS vD=$vD vA=$vA $ArG cubique=FAUX > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=1 d=$NcorpsS signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# $Z GenR $xTV/COULEURS$ROUGE $GRIS_2 $GRIS_8 entiers=VRAI g=31 #
# $Z GenR $xTV/COULEURS$VERTE $GRIS_2 $GRIS_8 entiers=VRAI g=32 #
# $Z GenR $xTV/COULEURS$BLEUE $GRIS_2 $GRIS_8 entiers=VRAI g=33 #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# #
# $Z $xci/passe_bande$X \ #
# $Z A=$xiio/MIRE \ #
# $Z inf=$GRIS_3 \ #
# $Z sup=$GRIS_5 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/seuil$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z seuil=$GRIS_2 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/and$X \ #
# $Z A1=$xTV/BOITE.5 \ #
# $Z A2=$xTV/BOITE.6 \ #
# $Z R=$xTV/BOITE.7 \ #
# $Z $formatI #
# #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.4 \ #
# $Z A2=$xTV/BOITE.7 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.8 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X mode=0 \ #
# $Z A=$xTV/BOITE.8 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=2 Mprolonger_X=VRAI \ #
# $Z MNpasY=2 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=2 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.2. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=2 Mprolonger_X=VRAI \ #
# $Z MNpasY=2 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=2 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.2. \ #
# $Z R=$xiim/REFL.2. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/vitre.53$Z \ #
# $X $xiim/REFL.2.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.2.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.2. $xiak/REFL.31 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.2. $xiak/REFL.31 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.31$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.31$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.31$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.31$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.2.0512%s $xiirk/REFL.31.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.31.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.31.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.2. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI VRAI #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.31.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.31$R16 RVB rien #
# record.01$Z $xiak/REFL.31$R64 RVB rien #
# #
sequence 024347_024858
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Pal #
# #
# $Z $xrc/mandel.01$X \ #
# $Z images=1 \ #
# $Z xbgd=-1.35 xhdd=+0.35 \ #
# $Z ybgd=-0.85 yhdd=+0.85 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/convol.01$X \ #
# $Z points=81 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_4 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/cadre$X \ #
# $Z niveau=$NOIR \ #
# $Z epaisseur=8 \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatI #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=FAUX \ #
# $Z affiner_M_maillage=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.3. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=FAUX \ #
# $Z affiner_M_maillage=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.3. \ #
# $Z R=$xiim/REFL.3. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/vitre.53$Z \ #
# $X $xiim/REFL.3.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.3.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.3. $xiak/REFL.22 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.3. $xiak/REFL.22 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.22$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.22$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.22$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.22$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.3.0512%s $xiirk/REFL.22.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.22.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.22.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.3. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.22.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.22$R16 RVB rien #
# record.01$Z $xiak/REFL.22$R64 RVB rien #
# #
sequence 024859_025370
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# #
# $Z $xci/passe_bande$X \ #
# $Z A=$xiio/MIRE \ #
# $Z inf=$GRIS_3 \ #
# $Z sup=$GRIS_5 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/seuil$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z seuil=$GRIS_2 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/and$X \ #
# $Z A1=$xTV/BOITE.5 \ #
# $Z A2=$xTV/BOITE.6 \ #
# $Z R=$xTV/BOITE.7 \ #
# $Z $formatI #
# #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.4 \ #
# $Z A2=$xTV/BOITE.7 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.8 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X mode=0 \ #
# $Z A=$xTV/BOITE.8 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=FAUX \ #
# $Z affiner_M_maillage=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.4. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=FAUX \ #
# $Z affiner_M_maillage=VRAI \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.4. \ #
# $Z R=$xiim/REFL.4. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/vitre.53$Z \ #
# $X $xiim/REFL.4.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.4.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.4. $xiak/REFL.32 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.4. $xiak/REFL.32 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.32$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.32$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.32$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.32$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.4.0512%s $xiirk/REFL.32.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.32.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.32.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.4. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.32.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.32$R16 RVB rien #
# record.01$Z $xiak/REFL.32$R64 RVB rien #
# #
sequence 025371_025882
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Pal #
# #
# $Z $xrc/mandel.01$X \ #
# $Z images=1 \ #
# $Z xbgd=-1.35 xhdd=+0.35 \ #
# $Z ybgd=-0.85 yhdd=+0.85 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/convol.01$X \ #
# $Z points=81 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_4 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/cadre$X \ #
# $Z niveau=$NOIR \ #
# $Z epaisseur=8 \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatI #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.5. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.5. \ #
# $Z R=$xiim/REFL.5. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.5.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.5.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.5. $xiak/REFL.22 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.5. $xiak/REFL.22 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.22$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.22$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.22$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.22$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.5.0512%s $xiirk/REFL.22.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.22.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.22.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.5. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.22.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.22$R16 RVB rien #
# record.01$Z $xiak/REFL.22$R64 RVB rien #
# #
sequence 025883_026394
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z set compatibilite_20000202=$EXIST #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# #
# $Z $xci/passe_bande$X \ #
# $Z A=$xiio/MIRE \ #
# $Z inf=$GRIS_3 \ #
# $Z sup=$GRIS_5 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/seuil$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z seuil=$GRIS_2 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/and$X \ #
# $Z A1=$xTV/BOITE.5 \ #
# $Z A2=$xTV/BOITE.6 \ #
# $Z R=$xTV/BOITE.7 \ #
# $Z $formatI #
# #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.4 \ #
# $Z A2=$xTV/BOITE.7 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.8 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X mode=0 \ #
# $Z A=$xTV/BOITE.8 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.6. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.6. \ #
# $Z R=$xiim/REFL.6. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.6.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.6.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.6. $xiak/REFL.32 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.6. $xiak/REFL.32 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.32$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.32$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.32$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.32$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.6.0512%s $xiirk/REFL.32.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.32.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.32.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.6. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.32.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.32$R16 RVB rien #
# record.01$Z $xiak/REFL.32$R64 RVB rien #
# #
sequence 026718_027229
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/format.01$X mode=0 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.7. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.7. \ #
# $Z R=$xiim/REFL.7. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.7.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.7.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.7. $xiak/REFL.12 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.7. $xiak/REFL.12 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.12$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.12$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.12$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.12$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.7.0512%s $xiirk/REFL.12.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.12.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.12.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.7. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.12.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.12$R16 RVB rien #
# record.01$Z $xiak/REFL.12$R64 RVB rien #
# #
sequence 027230_027741
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.9 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# $Z $xci/seuil$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z seuil=$GRIS_6 \ #
# $Z R=$xTV/BOITE.9 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_04$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z chiffres=0 \ #
# $Z moyenne=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/or_02$X \ #
# $Z A2=$xTV/BOITE.9 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_04$X \ #
# $Z A=$xTV/BOITE.5 \ #
# $Z chiffres=0 \ #
# $Z moyenne=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/or_02$X \ #
# $Z A2=$xTV/BOITE.9 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X mode=0 \ #
# $Z A=$xTV/BOITE.6 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.8. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.8. \ #
# $Z R=$xiim/REFL.8. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.8.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.8.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.9 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.8. $xiak/REFL.42 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.8. $xiak/REFL.42 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.42$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.42$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.42$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.42$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.8.0512%s $xiirk/REFL.42.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.42.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.42.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.8. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.42.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.42$R16 RVB rien #
# record.01$Z $xiak/REFL.42$R64 RVB rien #
# #
sequence 027742_028253
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Pal #
# #
# $Z $xrc/mandel.01$X \ #
# $Z images=1 \ #
# $Z xbgd=-1.35 xhdd=+0.35 \ #
# $Z ybgd=-0.85 yhdd=+0.85 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/convol.01$X \ #
# $Z points=81 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_4 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/cadre$X \ #
# $Z niveau=$NOIR \ #
# $Z epaisseur=8 \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatI #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.9. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.9. \ #
# $Z R=$xiim/REFL.9. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.9.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.9.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.9. $xiak/REFL.23 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.9. $xiak/REFL.23 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.23$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.23$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.23$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.23$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.9.0512%s $xiirk/REFL.23.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.23.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.23.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.9. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.23.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.23$R16 RVB rien #
# record.01$Z $xiak/REFL.23$R64 RVB rien #
# #
sequence 028254_028765
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# #
# $Z $xci/passe_bande$X \ #
# $Z A=$xiio/MIRE \ #
# $Z inf=$GRIS_3 \ #
# $Z sup=$GRIS_5 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/seuil$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z seuil=$GRIS_2 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/and$X \ #
# $Z A1=$xTV/BOITE.5 \ #
# $Z A2=$xTV/BOITE.6 \ #
# $Z R=$xTV/BOITE.7 \ #
# $Z $formatI #
# #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.4 \ #
# $Z A2=$xTV/BOITE.7 \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z R=$xTV/BOITE.8 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X mode=0 \ #
# $Z A=$xTV/BOITE.8 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.A. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.A. \ #
# $Z R=$xiim/REFL.A. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.A.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.A.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.7 #
# $Z $DELETE $xTV/BOITE.8 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.A. $xiak/REFL.33 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.A. $xiak/REFL.33 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.33$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.33$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.33$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.33$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.A.0512%s $xiirk/REFL.33.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.33.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.33.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.A. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.33.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.33$R16 RVB rien #
# record.01$Z $xiak/REFL.33$R64 RVB rien #
# #
sequence 028766_029277
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/format.01$X mode=0 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.B. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.B. \ #
# $Z R=$xiim/REFL.B. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.B.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.B.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.B. $xiak/REFL.13 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.B. $xiak/REFL.13 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.13$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.13$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.13$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.13$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.B.0512%s $xiirk/REFL.13.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.13.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.13.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.B. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.13.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.13$R16 RVB rien #
# record.01$Z $xiak/REFL.13$R64 RVB rien #
# #
sequence 029278_029789
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.9 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# $Z $xci/seuil$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z seuil=$GRIS_6 \ #
# $Z R=$xTV/BOITE.9 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_04$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z chiffres=0 \ #
# $Z moyenne=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/or_02$X \ #
# $Z A2=$xTV/BOITE.9 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_04$X \ #
# $Z A=$xTV/BOITE.5 \ #
# $Z chiffres=0 \ #
# $Z moyenne=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/or_02$X \ #
# $Z A2=$xTV/BOITE.9 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X mode=0 \ #
# $Z A=$xTV/BOITE.6 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Pal #
# #
# $Z Pal #
# #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.C. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.C. \ #
# $Z R=$xiim/REFL.C. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.C.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.C.%04d' #
# #
# #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.9 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.C. $xiak/REFL.43 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.C. $xiak/REFL.43 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.43$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.43$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.43$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.43$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.C.0512%s $xiirk/REFL.43.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.43.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.43.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.C. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.43.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.43$R16 RVB rien #
# record.01$Z $xiak/REFL.43$R64 RVB rien #
# #
# #
# ATTENTION, a partir de l'image '029303' il est possible d'observer pour les particules #
# situees en bas et au centre (bleues) des collisions qui se propagent du centre (au niveau #
# d'une barre verticale du billiard) vers la gauche. Cela n'est pas une erreur du programme, #
# mais l'effet suivant : la particule P1 qui rebondit la plus a gauche se rapproche alors #
# de sa voisine immediate de gauche P2 ; se faisant, et les distances diminuant, il y a #
# collision entre-elles. Au pas de temps suivant, c'est P2 qui se rapproche de sa voisine #
# immediate de gauche P3 ; se faisant, et les distances diminuant, il y a collision entre #
# P2 et P3 et ainsi de suite : une vague de collisions se propage donc du centre vers la #
# gauche... #
sequence 029790_030173
sequence 030174_030301
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/format.01$X mode=0 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Sdu #
# #
# $Z Sdu #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RE.D. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RE.D. \ #
# $Z R=$xiim/RE.D. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $c #define N0 NimageZ #
# $c #define N Nimages #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int seuil=252; #
# #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.D.%04d$ROUGE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$ROUGE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.D.%04d$VERTE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$VERTE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.D.%04d$BLEUE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$BLEUE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$ROUGE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$ROUGE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$VERTE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$VERTE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$BLEUE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$BLEUE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/somme_02$X #
# $c A1=$xTV/FILTREE$ROUGE #
# $c A2=$xTV/FILTREE$VERTE #
# $c standard=FAUX #
# $c R=$xTV/SURFACE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/somme_02$X #
# $c A1=$xTV/SURFACE #
# $c A2=$xTV/FILTREE$BLEUE #
# $c standard=FAUX #
# $c R=$xTV/SURFACE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$ROUGE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xw1/RE$m.D.%04d$ROUGE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$VERTE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xw1/RE$m.D.%04d$VERTE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$BLEUE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xw1/RE$m.D.%04d$BLEUE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# #
# $Z $DELETE $xTV/GAUSS #
# $Z $DELETE $xTV/SURFACE #
# $Z $DELETE $xTV/FILTREE$ROUGE #
# $Z $DELETE $xTV/FILTREE$VERTE #
# $Z $DELETE $xTV/FILTREE$BLEUE #
# $Z $DELETE $xTV/TEXTURE$ROUGE #
# $Z $DELETE $xTV/TEXTURE$VERTE #
# $Z $DELETE $xTV/TEXTURE$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/RE$m.D. $xiak/RE.53$m $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xw1/RE$m.D. $xiak/RE.53$m $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/RE.53$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RE.53$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.53$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.53$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xw1/RE$m.D.0512%s $xiirk/RE.53$m.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RE.53$m.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.53$m.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/RE$m.D. 001 384 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/RE$m.D. 385 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/RE.53$m.0512 RVB Initialisation #
# record.01$Z $xiak/RE.53$m$R16 RVB rien #
# record.01$Z $xiak/RE.53$m$R64 RVB rien #
# #
sequence 030302_030429
sequence 030430_030685
sequence 030686_030813
# Generee (sur '$LACT29') par : #
# #
# $Z S #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z $formatI | \ #
# $Z $xci/format.01$X mode=0 \ #
# $Z $formatI \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatR_Sdu #
# #
# $Z Sdu #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RE.D. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RE.D. \ #
# $Z R=$xiim/RE.D. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $c #define N0 NimageZ #
# $c #define N Nimages #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int seuil=252; #
# #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.D.%04d$ROUGE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$ROUGE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.D.%04d$VERTE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$VERTE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.D.%04d$BLEUE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$BLEUE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$ROUGE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$ROUGE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$VERTE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$VERTE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$BLEUE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$BLEUE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/somme_02$X #
# $c A1=$xTV/FILTREE$ROUGE #
# $c A2=$xTV/FILTREE$VERTE #
# $c standard=FAUX #
# $c R=$xTV/SURFACE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/somme_02$X #
# $c A1=$xTV/SURFACE #
# $c A2=$xTV/FILTREE$BLEUE #
# $c standard=FAUX #
# $c R=$xTV/SURFACE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$ROUGE #
# $c avion=FAUX #
# $c Ty=0.90 perspective=0.4 #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xw1/RE$M.D.%04d$ROUGE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$VERTE #
# $c avion=FAUX #
# $c Ty=0.90 perspective=0.4 #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xw1/RE$M.D.%04d$VERTE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$BLEUE #
# $c avion=FAUX #
# $c Ty=0.90 perspective=0.4 #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xw1/RE$M.D.%04d$BLEUE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# #
# $Z $DELETE $xTV/GAUSS #
# $Z $DELETE $xTV/SURFACE #
# $Z $DELETE $xTV/FILTREE$ROUGE #
# $Z $DELETE $xTV/FILTREE$VERTE #
# $Z $DELETE $xTV/FILTREE$BLEUE #
# $Z $DELETE $xTV/TEXTURE$ROUGE #
# $Z $DELETE $xTV/TEXTURE$VERTE #
# $Z $DELETE $xTV/TEXTURE$BLEUE #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/RE$M.D. $xiak/RE.53$M $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xw1/RE$M.D. $xiak/RE.53$M $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/RE.53$M$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RE.53$M$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.53$M$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.53$M$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xw1/RE$M.D.0032%s $xiirk/RE.53$M.0032%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xw1/RE$M.D.0064%s $xiirk/RE.53$M.0064%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xw1/RE$M.D.0128%s $xiirk/RE.53$M.0128%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xw1/RE$M.D.0256%s $xiirk/RE.53$M.0256%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xw1/RE$M.D.0512%s $xiirk/RE.53$M.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RE.53$M.0032%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.53$M.0064%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.53$M.0128%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.53$M.0256%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.53$M.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.53$M.0032%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.53$M.0064%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.53$M.0128%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.53$M.0256%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.53$M.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/RE$M.D. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/RE$M.D. 129 384 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# $xci/disk_video_P$Z $xw1/RE$M.D. 385 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/RE.53$M.0032 RVB Initialisation #
# record.01$Z $xiirk/RE.53$M.0064 RVB rien #
# record.01$Z $xiirk/RE.53$M.0128 RVB rien #
# record.01$Z $xiirk/RE.53$M.0256 RVB rien #
# record.01$Z $xiirk/RE.53$M.0512 RVB rien #
# #
# record.01$Z $xiak/RE.53$M$R16 RVB rien #
# record.01$Z $xiak/RE.53$M$R64 RVB rien #
# #
sequence 030814_031325
sequence 031326_031837
# Generee (sur '$LACT27') par : #
# #
# $Z S #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.9 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Premiere d=$Derniere \\ #
# $Z signe="$K_VIDE" inf=$In sup=$Su $ArG \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.028 0.028 #
# #
# $Z set Angle=`$xcg/MUL2.01$X n1=1.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z set Angle=`$xcg/MUL2.01$X n1=2.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z set Angle=`$xcg/MUL2.01$X n1=3.0 n2=$dpi` #
# $Z $xci/valeurs_trig$X premiere=$Premiere derniere=$Derniere \ #
# $Z aD=0 aA=$Angle \ #
# $Z alpha=0 beta=$GRIS_3 gamma=$GRIS_5 \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xci/complement$X \ #
# $Z A=$xiio/SPIRALE \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# $Z $xci/seuil$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z seuil=$GRIS_6 \ #
# $Z R=$xTV/BOITE.9 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_04$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z chiffres=0 \ #
# $Z moyenne=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/or_02$X \ #
# $Z A2=$xTV/BOITE.9 \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_1 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/reduction_04$X \ #
# $Z A=$xTV/BOITE.5 \ #
# $Z chiffres=0 \ #
# $Z moyenne=FAUX \ #
# $Z $formatI | \ #
# $Z $xci/or_02$X \ #
# $Z A2=$xTV/BOITE.9 \ #
# $Z R=$xTV/BOITE.6 \ #
# $Z $formatI #
# #
# $Z $xci/acces$X \ #
# $Z A=$xTV/BOITE.6 \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatI #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RE.E. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.06 0.06 #
# #
# $Z $xrk/rdn_walk.41$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RE.E. \ #
# $Z R=$xiim/RE.E. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.6 #
# $Z $DELETE $xTV/BOITE.9 #
# #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $c #define N0 NimageZ #
# $c #define N Nimages #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c int seuil=252; #
# #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.E.%04d$ROUGE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$ROUGE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.E.%04d$VERTE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$VERTE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# $c printf("$xci/filtre.01$X #
# $c A=$xiim/RE.E.%04d$BLEUE #
# $c N=$xTV/GAUSS #
# $c renormaliser=FAUX #
# $c tronquer=VRAI #
# $c standard=FAUX #
# $c seuil=%d #
# $c R=$xTV/FILTREE$BLEUE #
# $c $formatI\n" #
# $c ,n,seuil,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$ROUGE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$ROUGE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$VERTE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$VERTE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/FILTREE$BLEUE #
# $c standard=FAUX #
# $c extrema=FAUX #
# $c tronquer=VRAI #
# $c zero=FAUX #
# $c $formatI | #
# $c $xci/substitue$X #
# $c substitution=L_SUBSTITUTION_02 #
# $c R=$xTV/TEXTURE$BLEUE #
# $c $formatI\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/somme_02$X #
# $c A1=$xTV/FILTREE$ROUGE #
# $c A2=$xTV/FILTREE$VERTE #
# $c standard=FAUX #
# $c R=$xTV/SURFACE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/somme_02$X #
# $c A1=$xTV/SURFACE #
# $c A2=$xTV/FILTREE$BLEUE #
# $c standard=FAUX #
# $c R=$xTV/SURFACE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$ROUGE #
# $c avion=FAUX #
# $c Ty=0.90 perspective=0.4 #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xiim/RE$M.E.%04d$ROUGE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$VERTE #
# $c avion=FAUX #
# $c Ty=0.90 perspective=0.4 #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xiim/RE$M.E.%04d$VERTE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$BLEUE #
# $c avion=FAUX #
# $c Ty=0.90 perspective=0.4 #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xiim/RE$M.E.%04d$BLEUE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$ROUGE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xiim/RE$m.E.%04d$ROUGE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$VERTE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xiim/RE$m.E.%04d$VERTE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c printf("$xci/montagne.01$X #
# $c A=$xTV/SURFACE #
# $c standard=FAUX #
# $c extrema=VRAI #
# $c zero=FAUX #
# $c T=$xTV/TEXTURE$BLEUE #
# $c avion=VRAI #
# $c $formatI | #
# $c $xci/format.01$X #
# $c $formatI #
# $c mode=2 #
# $c R=$xiim/RE$m.E.%04d$BLEUE #
# $c $formatR_Pal\n" #
# $c ,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# #
# $Z $DELETE $xTV/GAUSS #
# $Z $DELETE $xTV/SURFACE #
# $Z $DELETE $xTV/FILTREE$ROUGE #
# $Z $DELETE $xTV/FILTREE$VERTE #
# $Z $DELETE $xTV/FILTREE$BLEUE #
# $Z $DELETE $xTV/TEXTURE$ROUGE #
# $Z $DELETE $xTV/TEXTURE$VERTE #
# $Z $DELETE $xTV/TEXTURE$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/RE$M.E. $xiak/RE.83$M $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/RE$M.E. $xiak/RE.83$M $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/RE.83$M$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RE.83$M$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.83$M$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.83$M$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/RE$M.E.0032%s $xiirk/RE.83$M.0032%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$M.E.0064%s $xiirk/RE.83$M.0064%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$M.E.0128%s $xiirk/RE.83$M.0128%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$M.E.0256%s $xiirk/RE.83$M.0256%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$M.E.0512%s $xiirk/RE.83$M.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RE.83$M.0032%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$M.0064%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$M.0128%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$M.0256%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$M.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$M.0032%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$M.0064%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$M.0128%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$M.0256%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$M.0512%s' RVB=VRAI #
# #
# $Z $xci/reduction_16$Z $xiim/RE$m.E. $xiak/RE.83$m $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/RE$m.E. $xiak/RE.83$m $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/RE.83$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RE.83$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.83$m$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RE.83$m$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/RE$m.E.0032%s $xiirk/RE.83$m.0032%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$m.E.0064%s $xiirk/RE.83$m.0064%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$m.E.0128%s $xiirk/RE.83$m.0128%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$m.E.0256%s $xiirk/RE.83$m.0256%s' RVB=VRAI #
# $X $xci/genere$X c='$CP $xiim/RE$m.E.0512%s $xiirk/RE.83$m.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RE.83$m.0032%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$m.0064%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$m.0128%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$m.0256%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiirk/RE.83$m.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$m.0032%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$m.0064%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$m.0128%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$m.0256%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RE.83$m.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/RE$M.E. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# #
# $xci/disk_video_P$Z $xw1/RE$m.E. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX FAUX FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/RE.83$M.0032 RVB Initialisation #
# record.01$Z $xiirk/RE.83$M.0064 RVB rien #
# record.01$Z $xiirk/RE.83$M.0128 RVB rien #
# record.01$Z $xiirk/RE.83$M.0256 RVB rien #
# record.01$Z $xiirk/RE.83$M.0512 RVB rien #
# #
# record.01$Z $xiak/RE.83$M$R16 RVB rien #
# record.01$Z $xiak/RE.83$M$R64 RVB rien #
# #
# record.01$Z $xiirk/RE.83$m.0032 RVB rien #
# record.01$Z $xiirk/RE.83$m.0064 RVB rien #
# record.01$Z $xiirk/RE.83$m.0128 RVB rien #
# record.01$Z $xiirk/RE.83$m.0256 RVB rien #
# record.01$Z $xiirk/RE.83$m.0512 RVB rien #
# #
# record.01$Z $xiak/RE.83$m$R16 RVB rien #
# record.01$Z $xiak/RE.83$m$R64 RVB rien #
# #
sequence 031838_031965
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $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 ); #
# #
# Ne serait-ce pas plutot '(n-N0)+ITER' ('v $xiac/$Fnota Debut_listG_MA_D2_2') ? #
# #
# $c printf("$CP #
# $c $xTV/MAND.1.%04d #
# $c $xw1/MAND.1.%04d\n" #
# $c ,N0-N0,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$X A=$xw1/MAND.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiac/MAND.D1$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/MAND.1. \ #
# $Z premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiac/MAND.D1$R64 \ #
# $Z $formatI #
# #
# $Z ro $xiac/MAND.D1$R16 #
# $Z ro $xiac/MAND.D1$R64 #
# #
# $Z $xcg/unite$Z $xiac/MAND.D1$R16 #
# $Z $xcg/unite$Z $xiac/MAND.D1$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/MAND.1. 1 128 $xiP/orange.11 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/MAND.D1$R16 $xiP/orange.11 Initialisation #
# record.01$Z $xiac/MAND.D1$R64 $xiP/orange.11 rien #
# #
sequence 031966_032477
# Generee (sur '$LACT29') par : #
# #
# $Z SET NimageZ=1 #
# $Z SET Nimages=512 #
# #
# $Z set NcorpsS=64 #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.41 #
# $Z $DELETE $xTV/BOITE.411 #
# $Z $DELETE $xTV/BOITE.412 #
# $Z $DELETE $xTV/BOITE.42 #
# $Z $DELETE $xTV/BOITE.51 #
# $Z $DELETE $xTV/BOITE.511 #
# $Z $DELETE $xTV/BOITE.512 #
# $Z $DELETE $xTV/BOITE.52 #
# #
# $Z set Premiere=1 #
# $Z set Derniere=$NcorpsS #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere \\ #
# $Z vD=$vD vA=$vA $ArG cubique=FAUX \\ #
# $Z > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/MODULE 0.02 0.02 #
# $Z Gen $xTV/THETA 0.0 $dpi #
# #
# $Z $CA $xcs/csh$Y \ #
# $Z > $xTV/XY_RT.1 #
# $Z $PAST $xTV/MODULE $xTV/THETA \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "$xcg/XY_RT$X r=" $1 " t=" $2 " cartesien=FAUX" } ' \ #
# $Z >>! $xTV/XY_RT.1 #
# #
# $Z (source $xTV/XY_RT.1) \ #
# $Z > $xTV/XY_RT.2 #
# #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^x=" \ #
# $Z | $SE -e "s/^x=//" \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/XY_RT.2 \ #
# $Z | $GRE "^y=" \ #
# $Z | $SE -e "s/^y=//" \ #
# $Z > $xTV/VITESSES$COORD_Y #
# #
# $Z Gen $xTV/VITESSES$COORD_Z 0.0 0.0 #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI 0.0 0.0 #
# $Z Gen $xTV/MnPHI 0.0 0.0 #
# $Z Gen $xTV/dPHI 0.0 0.0 #
# $Z Gen $xTV/mnTHETA 0.0 0.0 #
# $Z Gen $xTV/MnTHETA 0.0 0.0 #
# $Z Gen $xTV/dTHETA 0.0 0.0 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 1000000 1000000 #
# $Z Gen $xTV/RAYONS 0.020 0.020 #
# #
# $Z $xci/valeurs_inte$X premiere=$Premiere derniere=$Derniere \ #
# $Z vD=$GRIS_0 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$TEINT #
# $Z $xci/valeurs_inte$X premiere=$Premiere derniere=$Derniere \ #
# $Z vD=$GRIS_6 vA=$GRIS_6 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$LUMIN #
# $Z $xci/valeurs_inte$X premiere=$Premiere derniere=$Derniere \ #
# $Z vD=$GRIS_8 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$SATUR #
# #
# $Z $PAST \ #
# $Z $xTV/COULEURS$TEINT \ #
# $Z $xTV/COULEURS$LUMIN \ #
# $Z $xTV/COULEURS$SATUR \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "H=" $1 " L=" $2 " S=" $3 } ' \ #
# $Z | $SE -e 's+^+$xcg/RVB_HLS$X RVB_HLS=FAUX +' \ #
# $Z | $SE -e 's/$/ eR=VRAI eV=VRAI eB=VRAI/' \ #
# $Z | $SE -e 's/$/ eH=FAUX eL=FAUX eS=FAUX/' \ #
# $Z > $xTV/COULEURS$Y #
# #
# $Z (source $xTV/COULEURS$Y) \ #
# $Z > $xTV/COULEURS #
# #
# $Z $GRE "^R=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^R=//" \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z $GRE "^V=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^V=//" \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z $GRE "^B=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^B=//" \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# $Z Std #
# #
# $Z $xrc/Cfract_2D.01$X \ #
# $Z c00=VRAI a00=0 \ #
# $Z c01=VRAI a01=+$pis2 \ #
# $Z c02=VRAI a02=-$pis2 \ #
# $Z c03=VRAI a03=-$pis2 \ #
# $Z c04=VRAI a04=0 \ #
# $Z c05=VRAI a05=+$pis2 \ #
# $Z c06=VRAI a06=+$pis2 \ #
# $Z c07=VRAI a07=-$pis2 \ #
# $Z rapport=4 \ #
# $Z argument=FAUX \ #
# $Z niveau=$BLANC \ #
# $Z $formatI | \ #
# $Z $xci/dilate.01$X \ #
# $Z points=81 \ #
# $Z R=$xTV/BOITE.4 \ #
# $Z $formatI #
# #
# $Z $xci/rotate$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z angle=$pis2 \ #
# $Z R=$xTV/BOITE.5 \ #
# $Z $formatI #
# #
# $Z $xci/format.01$X \ #
# $Z A=$xTV/BOITE.4 \ #
# $Z $formatI \ #
# $Z mode=7 \ #
# $Z R=$xTV/BOITE.41 \ #
# $Z $formatR_Sdu #
# $Z $xci/format.01$X \ #
# $Z A=$xTV/BOITE.5 \ #
# $Z $formatI \ #
# $Z mode=7 \ #
# $Z R=$xTV/BOITE.51 \ #
# $Z $formatR_Sdu #
# #
# $Z Sdu #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $Z $xci/move$X \ #
# $Z A=$xTV/BOITE.41 \ #
# $Z yR=+0.25 \ #
# $Z R=$xTV/BOITE.411 \ #
# $Z $formatI #
# $Z $xci/move$X \ #
# $Z A=$xTV/BOITE.41 \ #
# $Z yR=-0.25 \ #
# $Z R=$xTV/BOITE.412 \ #
# $Z $formatI #
# #
# $Z $xci/move$X \ #
# $Z A=$xTV/BOITE.51 \ #
# $Z xR=+0.25 \ #
# $Z R=$xTV/BOITE.511 \ #
# $Z $formatI #
# $Z $xci/move$X \ #
# $Z A=$xTV/BOITE.51 \ #
# $Z xR=-0.25 \ #
# $Z R=$xTV/BOITE.512 \ #
# $Z $formatI #
# #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.411 \ #
# $Z A2=$xTV/BOITE.412 \ #
# $Z R=$xTV/BOITE.42 \ #
# $Z $formatI #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.511 \ #
# $Z A2=$xTV/BOITE.512 \ #
# $Z R=$xTV/BOITE.52 \ #
# $Z $formatI #
# #
# $Z $xci/or_02$X \ #
# $Z A1=$xTV/BOITE.42 \ #
# $Z A2=$xTV/BOITE.52 \ #
# $Z $formatI | \ #
# $Z $xci/filtre.01$X \ #
# $Z N=$xTV/GAUSS \ #
# $Z $formatI | \ #
# $Z $xci/complement$X \ #
# $Z $formatI | \ #
# $Z $xci/seuil$X \ #
# $Z seuil=$GRIS_3 \ #
# $Z R=$xTV/BOITE.1 \ #
# $Z $formatI #
# #
# $Z Sdu #
# #
# $Z $xci/scale$X \ #
# $Z A=$xTV/BOITE.1 \ #
# $Z a=1.00 \ #
# $Z R=$xTV/BOITE.2 \ #
# $Z $formatI #
# #
# #
# $Z Sdu #
# #
# $Z $xrk/rdn_walk.52$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.05 nombre=10 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/REFL.F. \ #
# $Z $formatI #
# #
# Gen $xTV/RAYONS 0.04 0.04 #
# #
# $Z $xrk/rdn_walk.52$X corps=$NcorpsS \ #
# $Z np=$Nimages \ #
# $Z collisions=VRAI DLA=FAUX interaction=0.025 \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z milieu=VRAI \ #
# $Z reflexion=VRAI refraction=FAUX \ #
# $Z Mhors=$BLANC \ #
# $Z MNpasX=1 Mprolonger_X=VRAI \ #
# $Z MNpasY=1 Mprolonger_Y=VRAI \ #
# $Z MNpasZ=1 Mprolonger_Z=VRAI \ #
# $Z adapter_M_nPAS=VRAI \ #
# $Z Msimplifier=FAUX affiner_M_maillage=FAUX \ #
# $Z MC=$xTV/BOITE.2 \ #
# $Z MChiffres=0 \ #
# $Z Zmin=0 Zmax=15 \ #
# $Z centrer=VRAI \ #
# $Z dct=0.05 nombre=10 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/REFL.F. \ #
# $Z R=$xiim/REFL.F. \ #
# $Z $formatI #
# #
# $Z $DELETE $xTV/MODULE #
# $Z $DELETE $xTV/THETA #
# $Z $DELETE $xTV/XY_RT.1 #
# $Z $DELETE $xTV/XY_RT.2 #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/supOUVE #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# #
# #
# $Z $xci/complement$X A=$xTV/BOITE.1 \ #
# $Z R=$xTV/BOITE.3 \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/scale$X \\\ #
# $Z A=$xTV/BOITE.3 \\\ #
# $Z a=0.50 \\\ #
# $Z R=$xTV/BOITE.3%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/cache.11$Z \ #
# $X $xiim/REFL.F.%04d \ #
# $X $xTV/BOITE.3 \ #
# $X $xiim/REFL.F.%04d' #
# #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/format.01$X \ #
# $X A=$xiim/REFL.F.%04d$ROUGE \ #
# $X $formatI \ #
# $X mode=7 \ #
# $X R=$xiim/REFL.F.%04d$ROUGE \ #
# $X $formatR_Pal' #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/format.01$X \ #
# $X A=$xiim/REFL.F.%04d$VERTE \ #
# $X $formatI \ #
# $X mode=7 \ #
# $X R=$xiim/REFL.F.%04d$VERTE \ #
# $X $formatR_Pal' #
# $X $xci/genere$X premiere=$NimageZ derniere=$Nimages pas=1 \ #
# $X C='$xci/format.01$X \ #
# $X A=$xiim/REFL.F.%04d$BLEUE \ #
# $X $formatI \ #
# $X mode=7 \ #
# $X R=$xiim/REFL.F.%04d$BLEUE \ #
# $X $formatR_Pal' #
# #
# $Z $DELETE $xTV/BOITE.1 #
# $Z $DELETE $xTV/BOITE.2 #
# $Z $DELETE $xTV/BOITE.3 #
# $Z $DELETE $xTV/BOITE.3$ROUGE #
# $Z $DELETE $xTV/BOITE.3$VERTE #
# $Z $DELETE $xTV/BOITE.3$BLEUE #
# $Z $DELETE $xTV/BOITE.4 #
# $Z $DELETE $xTV/BOITE.5 #
# $Z $DELETE $xTV/BOITE.41 #
# $Z $DELETE $xTV/BOITE.411 #
# $Z $DELETE $xTV/BOITE.412 #
# $Z $DELETE $xTV/BOITE.42 #
# $Z $DELETE $xTV/BOITE.51 #
# $Z $DELETE $xTV/BOITE.511 #
# $Z $DELETE $xTV/BOITE.512 #
# $Z $DELETE $xTV/BOITE.52 #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/REFL.F. $xiak/REFL.91 $NimageZ $Nimages #
# $Z $xci/reduction_64$Z $xiim/REFL.F. $xiak/REFL.91 $NimageZ $Nimages #
# #
# $X $xci/genere$X c='ro $xiak/REFL.91$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/REFL.91$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.91$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/REFL.91$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/REFL.F.0512%s $xiirk/REFL.91.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/REFL.91.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/REFL.91.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/REFL.F. 1 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiirk/REFL.91.0512 RVB Initialisation #
# record.01$Z $xiak/REFL.91$R16 RVB rien #
# record.01$Z $xiak/REFL.91$R64 RVB rien #
# #
sequence 032478_032605
# Generee (sur '$LACT29') par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=128 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=4 #
# #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +3.00e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-203e+8; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+133e+9; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+579e+8; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.99e+4; #
# #
# $c double YvitessD=-3.88e+3; #
# #
# $c double ZvitessD=-1.68e+3; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g #
# $c %+g #
# $c -204e+9 #
# $c %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g #
# $c %+g #
# $c +126e+9 #
# $c %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g #
# $c %+g #
# $c +634e+8 #
# $c %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 #
# $c %+g #
# $c -1.27e+4 #
# $c %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 #
# $c %+g #
# $c -1.64e+4 #
# $c %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 #
# $c %+g #
# $c -7.18e+3 #
# $c %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=1 #
# $c extension=5 #
# $c dct=172 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=VRAI #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=1.40 #
# $c ZOOM=23.0 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xiim/NCOR.X. #
# $c $formatI\n" #
# $c ,NPAS,NPAS #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$ROUGE #
# $c $xw1/NCOR.E.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$VERTE #
# $c $xw1/NCOR.E.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$BLEUE #
# $c $xw1/NCOR.E.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.E. $xiak/NCOR.a9 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.E. $xiak/NCOR.a9 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.a9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.a9$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.a9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.a9$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/NCOR.E. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.a9$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.a9$R64 RVB rien #
# #
sequence 032606_032861
# Generee (sur '$LACT29') par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=256 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=4 #
# #
# $Z set AnglD=1.140 #
# $Z set AnglA=`$xcg/ADD2.01$X n1=$AnglD n2=$pis2` #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=$Npremiere d=$Nderniere vD=$AnglD vA=$AnglA cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# $Z set Rotation=`$CA $xT/ROTATION$COORD_X` #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +3.00e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-203e+8; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+133e+9; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+579e+8; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.99e+4; #
# #
# $c double YvitessD=-3.88e+3; #
# #
# $c double ZvitessD=-1.68e+3; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g #
# $c %+g #
# $c -204e+9 #
# $c %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g #
# $c %+g #
# $c +126e+9 #
# $c %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g #
# $c %+g #
# $c +634e+8 #
# $c %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 #
# $c %+g #
# $c -1.27e+4 #
# $c %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 #
# $c %+g #
# $c -1.64e+4 #
# $c %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 #
# $c %+g #
# $c -7.18e+3 #
# $c %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=4 #
# $c extension=5 #
# $c dct=172 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=VRAI #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=$Rotation[%d] #
# $c ZOOM=23.0 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xiim/NCOR.X. #
# $c $formatI\n" #
# $c ,NPAS,n,NPAS #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$ROUGE #
# $c $xw1/NCOR.F.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$VERTE #
# $c $xw1/NCOR.F.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$BLEUE #
# $c $xw1/NCOR.F.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.F. $xiak/NCOR.a1 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.F. $xiak/NCOR.a1 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.a1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.a1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.a1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.a1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/NCOR.F. 001 256 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.a1$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.a1$R64 RVB rien #
# #
sequence 032862_032989
# Generee (sur '$LACT29') par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=128 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=4 #
# #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 \ #
# $Z +60.5e23 \ #
# $Z +6.4e23 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +1.50e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_6 \ #
# $Z $GRIS_4 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_2 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-203e+8; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+133e+9; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+579e+8; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.99e+4; #
# #
# $c double YvitessD=-3.88e+3; #
# #
# $c double ZvitessD=-1.68e+3; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g #
# $c %+g #
# $c -204e+9 #
# $c %+g\n" #
# $c ,XcentreS,XcentreD,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g #
# $c %+g #
# $c +126e+9 #
# $c %+g\n" #
# $c ,YcentreS,YcentreD,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g #
# $c %+g #
# $c +634e+8 #
# $c %+g\n" #
# $c ,ZcentreS,ZcentreD,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 #
# $c %+g #
# $c -1.27e+4 #
# $c %+g\n" #
# $c ,XvitessD,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 #
# $c %+g #
# $c -1.64e+4 #
# $c %+g\n" #
# $c ,YvitessD,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 #
# $c %+g #
# $c -7.18e+3 #
# $c %+g\n" #
# $c ,ZvitessD,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=1 #
# $c extension=5 #
# $c dct=172 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=VRAI #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=1.40 #
# $c ZOOM=16.0 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xiim/NCOR.X. #
# $c $formatI\n" #
# $c ,NPAS,NPAS #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$ROUGE #
# $c $xw1/NCOR.G.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$VERTE #
# $c $xw1/NCOR.G.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$BLEUE #
# $c $xw1/NCOR.G.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.G. $xiak/NCOR.b9 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.G. $xiak/NCOR.b9 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.b9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.b9$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.b9$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.b9$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/NCOR.G. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.b9$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.b9$R64 RVB rien #
# #
sequence 032990_033245
# Generee (sur '$LACT29') par : #
# #
# $Z SET Npremiere=1 #
# $Z SET Nderniere=256 #
# #
# $Z SET Npas=512 #
# #
# $Z set NcorpsS=3 #
# #
# $Z set AnglD=1.152 #
# $Z set AnglA=`$xcg/ADD2.01$X n1=$AnglD n2=$pis2` #
# $Z $DELETE $xT/ROTATION$COORD_X #
# $Z $xci/valeurs_inte$X p=$Npremiere d=$Nderniere vD=$AnglD vA=$AnglA cubique=VRAI \ #
# $Z > $xT/ROTATION$COORD_X #
# $Z set Rotation=`$CA $xT/ROTATION$COORD_X` #
# #
# $Z alias genere 'set Fl=\!:1 ; set Li=(\!:2*) ; \\ #
# $Z $DELETE $Fl ; \\ #
# $Z echo "$Li" | $SE -e "s/$K_BLANC$K_BLANC*/ /g" | $R "$K_BLANC" "$K_NL" > $Fl ; \\ #
# $Z unset Fl Li' #
# #
# #
# $Z genere $xT/MASSES \ #
# $Z +2.0e30 \ #
# $Z +6.4e23 \ #
# $Z +60.5e23 #
# $Z genere $xT/RAYONS \ #
# $Z +1.50e10 \ #
# $Z +1.00e10 \ #
# $Z +1.00e10 #
# $Z genere $xT/COULEURS$ROUGE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_0 #
# $Z genere $xT/COULEURS$VERTE \ #
# $Z $GRIS_8 \ #
# $Z $GRIS_4 \ #
# $Z $GRIS_4 #
# $Z genere $xT/COULEURS$BLEUE \ #
# $Z $GRIS_0 \ #
# $Z $GRIS_2 \ #
# $Z $GRIS_8 #
# #
# $Z Pal #
# #
# #
# $c #define N0 Npremiere #
# $c #define N Nderniere #
# #
# $c #define NPAS Npas #
# #
# $c extern double sqrt(); #
# #
# $c int main() #
# $c { #
# $c int n; #
# #
# $c double XcentreS=+1e3; #
# $c double XcentreD=-203e+8; #
# $c double XcentreA; #
# #
# $c double YcentreS=+1e3; #
# $c double YcentreD=+133e+9; #
# $c double YcentreA; #
# #
# $c double ZcentreS=+1e3; #
# $c double ZcentreD=+579e+8; #
# $c double ZcentreA; #
# #
# $c double XvitessD=-2.99e+4; #
# #
# $c double YvitessD=-3.88e+3; #
# #
# $c double ZvitessD=-1.68e+3; #
# #
# $c double Fcentre; #
# $c double OdistD; #
# #
# $c OdistD=sqrt(((XcentreD-XcentreS)*(XcentreD-XcentreS))+ #
# $c ((YcentreD-YcentreS)*(YcentreD-YcentreS))+ #
# $c ((ZcentreD-ZcentreS)*(ZcentreD-ZcentreS)) #
# $c ); #
# $c Fcentre=(0.05e11/OdistD); #
# #
# $c XcentreA=Fcentre*XcentreD; #
# $c YcentreA=Fcentre*YcentreD; #
# $c ZcentreA=Fcentre*ZcentreD; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double Xcentre; #
# $c double Ycentre; #
# $c double Zcentre; #
# #
# $c double Xvitess; #
# $c double Yvitess; #
# $c double Zvitess; #
# #
# $c double Odist; #
# #
# $c Xcentre=((XcentreA*(n-N0))+(XcentreD*(N-n)))/(N-N0); #
# $c Ycentre=((YcentreA*(n-N0))+(YcentreD*(N-n)))/(N-N0); #
# $c Zcentre=((ZcentreA*(n-N0))+(ZcentreD*(N-n)))/(N-N0); #
# #
# $c Odist=sqrt(((Xcentre-XcentreS)*(Xcentre-XcentreS))+ #
# $c ((Ycentre-YcentreS)*(Ycentre-YcentreS))+ #
# $c ((Zcentre-ZcentreS)*(Zcentre-ZcentreS)) #
# $c ); #
# #
# $c Xvitess=XvitessD*sqrt(OdistD/Odist); #
# $c Yvitess=YvitessD*sqrt(OdistD/Odist); #
# $c Zvitess=ZvitessD*sqrt(OdistD/Odist); #
# #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_X #
# $c %+g #
# $c -204e+9 #
# $c %+g\n" #
# $c ,XcentreS,Xcentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Y #
# $c %+g #
# $c +126e+9 #
# $c %+g\n" #
# $c ,YcentreS,Ycentre #
# $c ); #
# $c printf("genere #
# $c $xT/COORDONNEES$COORD_Z #
# $c %+g #
# $c +634e+8 #
# $c %+g\n" #
# $c ,ZcentreS,Zcentre #
# $c ); #
# #
# $c printf("genere #
# $c $xT/VITESSES$COORD_X #
# $c 0 #
# $c -1.27e+4 #
# $c %+g\n" #
# $c ,Xvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Y #
# $c 0 #
# $c -1.64e+4 #
# $c %+g\n" #
# $c ,Yvitess #
# $c ); #
# $c printf("genere #
# $c $xT/VITESSES$COORD_Z #
# $c 0 #
# $c -7.18e+3 #
# $c %+g\n" #
# $c ,Zvitess #
# $c ); #
# #
# $c printf("$xrr/N_corps.11$X #
# $c corps=$NcorpsS #
# $c np=%d #
# $c LISTE_X=$xT/COORDONNEES$COORD_X #
# $c LISTE_Y=$xT/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xT/COORDONNEES$COORD_Z #
# $c LISTE_VX=$xT/VITESSES$COORD_X #
# $c LISTE_VY=$xT/VITESSES$COORD_Y #
# $c LISTE_VZ=$xT/VITESSES$COORD_Z #
# $c LISTE_MASSE=$xT/MASSES #
# $c LISTE_RAYON=$xT/RAYONS #
# $c LISTE_ROUGE=$xT/COULEURS$ROUGE #
# $c LISTE_VERTE=$xT/COULEURS$VERTE #
# $c LISTE_BLEUE=$xT/COULEURS$BLEUE #
# $c centrer=FAUX reference=3 #
# $c extension=5 #
# $c dct=172 #
# $c 2_a_2=FAUX source=1 #
# $c nombre=1000 #
# $c ensemble=VRAI #
# $c acceptable=0.5 #
# $c Ranterieurs=1.0 #
# $c trainees=FAUX #
# $c renormaliser=FAUX #
# $c lineaire=VRAI #
# $c Lz=1.0e13 #
# $c TRANSLATION_OX=0 #
# $c TRANSLATION_OY=0 #
# $c ROTATION_OX=$Rotation[%d] #
# $c ZOOM=16.0 #
# $c fond=FAUX #
# $c pV=%d #
# $c R=$xiim/NCOR.X. #
# $c $formatI\n" #
# $c ,NPAS,n,NPAS #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$ROUGE #
# $c $xw1/NCOR.H.%04d$ROUGE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$VERTE #
# $c $xw1/NCOR.H.%04d$VERTE\n" #
# $c ,NPAS,n #
# $c ); #
# $c printf("$MV $xiim/NCOR.X.%04d$BLEUE #
# $c $xw1/NCOR.H.%04d$BLEUE\n" #
# $c ,NPAS,n #
# $c ); #
# #
# $c printf("$DELETE $xT/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xT/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xT/VITESSES$COORD_X\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Y\n"); #
# $c printf("$DELETE $xT/VITESSES$COORD_Z\n"); #
# $c } #
# $c } #
# #
# $Z $DELETE $xT/MASSES #
# $Z $DELETE $xT/RAYONS #
# $Z $DELETE $xT/COULEURS$ROUGE #
# $Z $DELETE $xT/COULEURS$VERTE #
# $Z $DELETE $xT/COULEURS$BLEUE #
# #
# $Z $DELETE $xT/ROTATION$COORD_X #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/NCOR.H. $xiak/NCOR.b1 $Npremiere $Nderniere #
# $Z $xci/reduction_64$Z $xw1/NCOR.H. $xiak/NCOR.b1 $Npremiere $Nderniere #
# #
# $X $xci/genere$X c='ro $xiak/NCOR.b1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/NCOR.b1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.b1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/NCOR.b1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/NCOR.H. 001 256 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/NCOR.b1$R16 RVB Initialisation #
# record.01$Z $xiak/NCOR.b1$R64 RVB rien #
# #
sequence 033246_033373
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $Z Pal #
# #
# $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=$xw1/VONK.1.%04d #
# $c $formatI\n" #
# $c ,((xDA*(n-N0))+(xDD*(N-n)))/(N-N0) #
# $c ,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z Pal #
# #
# #
# $Z $xci/reduction_16$X A=$xw1/VONK.1. premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiac/VONK.31$R16 \ #
# $Z $formatI #
# $Z $xci/reduction_64$X A=$xw1/VONK.1. premiere=$Premiere derniere=$Derniere \ #
# $Z calculer=VRAI \ #
# $Z R=$xiac/VONK.31$R64 \ #
# $Z $formatI #
# #
# #
# $Z ro $xiac/VONK.31$R16 #
# $Z ro $xiac/VONK.31$R64 #
# #
# $Z $xcg/unite$Z $xiac/VONK.31$R16 #
# $Z $xcg/unite$Z $xiac/VONK.31$R64 #
# #
# #
# Pal #
# #
# $xci/disk_video_P$Z $xw1/VONK.1. 1 128 $xiP/gris.01 \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiac/VONK.31$R16 $xiP/gris.01 Initialisation #
# record.01$Z $xiac/VONK.31$R64 $xiP/gris.01 rien #
# #
sequence 033374_033501
# Generee (sur '$LACT29') [cette sequence montre simultanement la sensibilite a la #
# methode d'integration et la sensibilite aux erreurs d'arrondi (via l'option d'optimisation) #
# suivant le code de couleur suivant] par : #
# #
# | | | | #
# | ordre=1 | ordre=2 | ordre=4 | #
# | | | | #
# ----------+---------+---------+---------| #
# | | | | #
# -O0 | R | V | R+V | #
# | | | | #
# ----------+---------+---------+---------| #
# | | | | #
# -O3 | R+B | V+B | R+V+B | #
# | | | | #
# mais malheureusement, contrairement a 'v $xiak/NCOR.X6$R16', ici on ne voit pas ici le #
# probleme des options d'optimisation. Ce phenomene est compris grace a 'v $xtc/lorenz.11$c' #
# ou l'on voit avec la methode d'Euler qu'il est imperatif de ne pas mettre 'dt' en facteur #
# commun et ce afin d'avoir des produits a 3 termes. Or, malheureusement, cela ne peut etre #
# fait dans 'v $xrk/lorenz.11$K' a cause de la procedure 'v ''$xrk/attractor.1B$I INTEGRE.v' #
# qui multiplie "brutalement" la valeur de la fonction 'fonction' par le pas 'h' sans pouvoir #
# distribuer '*h' sur les eventuelles termes composant cette fonction... #
# #
# #
# Pour les trois calculs suivants, 'v $xrk/lorenz.11$K' est compile avec l'option '-O0' : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z Pal #
# #
# $Z $xci/valeurs_inte$X cubique=FAUX \ #
# $Z p=$Premiere d=$Derniere vD=1 vA=63501 \ #
# $Z > $xT/param11 #
# #
# $Z $xrk/lorenz.11$X np=$Derniere \ #
# $Z premiere=0.05 visualisees=1000 fantome=FAUX \ #
# $Z r=1.5 \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=1 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z Lz=100 \ #
# $Z R=$xiim/LORE.01. \ #
# $Z $formatI #
# #
# $Z $xrk/lorenz.11$X np=$Derniere \ #
# $Z premiere=0.05 visualisees=1000 fantome=FAUX \ #
# $Z r=1.5 \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=2 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z Lz=100 \ #
# $Z R=$xiim/LORE.02. \ #
# $Z $formatI #
# #
# $Z $xrk/lorenz.11$X np=$Derniere \ #
# $Z premiere=0.05 visualisees=1000 fantome=FAUX \ #
# $Z r=1.5 \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=4 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z Lz=100 \ #
# $Z R=$xiim/LORE.04. \ #
# $Z $formatI #
# #
# #
# Pour les trois calculs suivants, 'v $xrk/lorenz.11$K' est compile avec l'option '-O3' : #
# #
# $Z $xrk/lorenz.11$X np=$Derniere \ #
# $Z premiere=0.05 visualisees=1000 fantome=FAUX \ #
# $Z r=1.5 \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=1 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z Lz=100 \ #
# $Z R=$xiim/LORE.31. \ #
# $Z $formatI #
# #
# $Z $xrk/lorenz.11$X np=$Derniere \ #
# $Z premiere=0.05 visualisees=1000 fantome=FAUX \ #
# $Z r=1.5 \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=2 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z Lz=100 \ #
# $Z R=$xiim/LORE.32. \ #
# $Z $formatI #
# #
# $Z $xrk/lorenz.11$X np=$Derniere \ #
# $Z premiere=0.05 visualisees=1000 fantome=FAUX \ #
# $Z r=1.5 \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=4 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z Lz=100 \ #
# $Z R=$xiim/LORE.34. \ #
# $Z $formatI #
# #
# $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/maximum$X #
# $c A1=$xiim/LORE.01.%04d$ROUGE #
# $c A2=$xiim/LORE.04.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.31.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.A.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n,n,n,n #
# $c ); #
# $c printf("$xci/maximum$X #
# $c A1=$xiim/LORE.02.%04d$ROUGE #
# $c A2=$xiim/LORE.04.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.32.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.A.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n,n,n,n #
# $c ); #
# $c printf("$xci/maximum$X #
# $c A1=$xiim/LORE.31.%04d$ROUGE #
# $c A2=$xiim/LORE.32.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.A.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xT/param11 #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.A. $xiak/LORE.H1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.A. $xiak/LORE.H1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LORE.H1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LORE.H1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.H1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.H1$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/LORE.A. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.H1$R16 RVB Initialisation #
# record.01$Z $xiak/LORE.H1$R64 RVB rien #
# #
sequence 033502_033629
# Generee (sur '$LACT29') [cette sequence montre simultanement la sensibilite a la #
# methode d'integration et la sensibilite aux erreurs d'arrondi (via l'option d'optimisation) #
# suivant le code de couleur suivant] par : #
# #
# | | | | #
# | ordre=1 | ordre=2 | ordre=4 | #
# | | | | #
# ----------+---------+---------+---------| #
# | | | | #
# -O0 | R | V | R+V | #
# | | | | #
# ----------+---------+---------+---------| #
# | | | | #
# -O3 | R+B | V+B | R+V+B | #
# | | | | #
# ou par rapport a 'v $xiak/LORE.H1$R16' ont ete rajoute trois termes en 'x*y*z' dans la #
# definition de l'attracteur de Lorenz... #
# #
# #
# Pour les trois calculs suivants, 'v $xrk/lorenz.11$K' est compile avec l'option #
# d'optimisation '-O0' : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z Pal #
# #
# $Z $xci/valeurs_inte$X cubique=FAUX \ #
# $Z p=$Premiere d=$Derniere vD=1 vA=8256 \ #
# $Z > $xT/param11 #
# #
# $Z set ParamC="COEFFICIENT_Xxyz=-0.01 COEFFICIENT_Yxyz=+0.005 COEFFICIENT_Zxyz=+0.01" #
# $Z set ParamG="premiere=0.20 visualisees=400 fantome=FAUX r=1.5 Lz=200" #
# #
# $Z $xTV/lorenz.11.O0$X np=$Nimages \ #
# $Z $ParamC \ #
# $Z $ParamG \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=1 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z R=$xiim/LORE.01. \ #
# $Z $formatI #
# #
# $Z $xTV/lorenz.11.O0$X np=$Nimages \ #
# $Z $ParamC \ #
# $Z $ParamG \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=2 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z R=$xiim/LORE.02. \ #
# $Z $formatI #
# #
# $Z $xTV/lorenz.11.O0$X np=$Nimages \ #
# $Z $ParamC \ #
# $Z $ParamG \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=4 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z R=$xiim/LORE.04. \ #
# $Z $formatI #
# #
# #
# Pour les trois calculs suivants, 'v $xrk/lorenz.11$K' est compile avec l'option #
# d'optimisation '-O3 -OPT:roundoff=3' : #
# #
# $Z $xTV/lorenz.11.O3$X np=$Nimages \ #
# $Z $ParamC \ #
# $Z $ParamG \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=1 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z R=$xiim/LORE.31. \ #
# $Z $formatI #
# #
# $Z $xTV/lorenz.11.O3$X np=$Nimages \ #
# $Z $ParamC \ #
# $Z $ParamG \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=2 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z R=$xiim/LORE.32. \ #
# $Z $formatI #
# #
# $Z $xTV/lorenz.11.O3$X np=$Nimages \ #
# $Z $ParamC \ #
# $Z $ParamG \ #
# $Z NOMBRE_D_ITERATIONS=$xT/param11 ordre=4 \ #
# $Z RVB=FAUX ROUGE=VRAI VERTE=FAUX BLEUE=FAUX \ #
# $Z R=$xiim/LORE.34. \ #
# $Z $formatI #
# #
# $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/maximum$X #
# $c A1=$xiim/LORE.01.%04d$ROUGE #
# $c A2=$xiim/LORE.04.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.31.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.B.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n,n,n,n #
# $c ); #
# $c printf("$xci/maximum$X #
# $c A1=$xiim/LORE.02.%04d$ROUGE #
# $c A2=$xiim/LORE.04.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.32.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.B.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n,n,n,n #
# $c ); #
# $c printf("$xci/maximum$X #
# $c A1=$xiim/LORE.31.%04d$ROUGE #
# $c A2=$xiim/LORE.32.%04d$ROUGE #
# $c $formatI | #
# $c $xci/maximum$X #
# $c A2=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.B.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xT/param11 #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.B. $xiak/LORE.H2 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.B. $xiak/LORE.H2 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LORE.H2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LORE.H2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.H2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LORE.H2$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/LORE.B. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LORE.H2$R16 RVB Initialisation #
# record.01$Z $xiak/LORE.H2$R64 RVB rien #
# #
sequence 033630_033757
sequence 033758_033885
sequence 033886_034013
sequence 034014_034141
sequence 034142_034269
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z Pal #
# #
# $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/acces$X #
# $c A=$xiim/LORE.01.%04d$ROUGE #
# $c R=$xw1/LORE.C.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.31.%04d$ROUGE #
# $c R=$xw1/LORE.C.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/init$X #
# $c niveau=$NOIR #
# $c R=$xw1/LORE.C.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.02.%04d$ROUGE #
# $c R=$xw1/LORE.D.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.32.%04d$ROUGE #
# $c R=$xw1/LORE.D.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/init$X #
# $c niveau=$NOIR #
# $c R=$xw1/LORE.D.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.04.%04d$ROUGE #
# $c R=$xw1/LORE.E.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.E.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/init$X #
# $c niveau=$NOIR #
# $c R=$xw1/LORE.E.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.01.%04d$ROUGE #
# $c R=$xw1/LORE.F.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.02.%04d$ROUGE #
# $c R=$xw1/LORE.F.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.04.%04d$ROUGE #
# $c R=$xw1/LORE.F.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.31.%04d$ROUGE #
# $c R=$xw1/LORE.G.%04d$ROUGE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.32.%04d$ROUGE #
# $c R=$xw1/LORE.G.%04d$VERTE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xiim/LORE.34.%04d$ROUGE #
# $c R=$xw1/LORE.G.%04d$BLEUE #
# $c $formatI\n" #
# $c ,n,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xT/param11 #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.C. $xiak/LO.H2.1 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.C. $xiak/LO.H2.1 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LO.H2.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LO.H2.1$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.1$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.1$R64%s' RVB=VRAI #
# #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.D. $xiak/LO.H2.2 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.D. $xiak/LO.H2.2 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LO.H2.2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LO.H2.2$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.2$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.2$R64%s' RVB=VRAI #
# #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.E. $xiak/LO.H2.4 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.E. $xiak/LO.H2.4 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LO.H2.4$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LO.H2.4$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.4$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.4$R64%s' RVB=VRAI #
# #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.F. $xiak/LO.H2.O0 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.F. $xiak/LO.H2.O0 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LO.H2.O0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LO.H2.O0$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.O0$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.O0$R64%s' RVB=VRAI #
# #
# #
# $Z $xci/reduction_16$Z $xw1/LORE.G. $xiak/LO.H2.O3 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/LORE.G. $xiak/LO.H2.O3 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/LO.H2.O3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/LO.H2.O3$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.O3$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/LO.H2.O3$R64%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/LORE.C. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/LORE.D. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/LORE.E. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/LORE.F. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# $xci/disk_video_P$Z $xw1/LORE.G. 001 128 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz FAUX VRAI FAUX #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/LO.H2.1$R16 RVB Initialisation #
# record.01$Z $xiak/LO.H2.1$R64 RVB rien #
# record.01$Z $xiak/LO.H2.2$R16 RVB rien #
# record.01$Z $xiak/LO.H2.2$R64 RVB rien #
# record.01$Z $xiak/LO.H2.4$R16 RVB rien #
# record.01$Z $xiak/LO.H2.4$R64 RVB rien #
# record.01$Z $xiak/LO.H2.O0$R16 RVB rien #
# record.01$Z $xiak/LO.H2.O0$R64 RVB rien #
# record.01$Z $xiak/LO.H2.O3$R16 RVB rien #
# record.01$Z $xiak/LO.H2.O3$R64 RVB rien #
# #
sequence 034270_034781
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=512 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set Part0=1 #
# $Z set PartN=4 #
# $Z @ Npart = $PartN - $Part0 #
# $Z @ Npart = $Npart + 1 #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Part0 d=$PartN vD=$vD vA=$vA $ArG > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Part0 d=$PartN signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z GenR $xTV/VITESSES 1 5 entiers=VRAI g=21 #
# #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/+0.02/' -e 's/^2$/0/' -e 's/^3$/-0.02/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/+0.02/' -e 's/^3$/0/' -e 's/^4$/-0.02/' \ #
# $Z > $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/0/' -e 's/^3$/0/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_Z #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI -2 -2 #
# $Z Gen $xTV/MnPHI +2 +2 #
# $Z Gen $xTV/dPHI $pis2 $pis2 #
# $Z Gen $xTV/mnTHETA 0 0 #
# $Z Gen $xTV/MnTHETA 0 0 #
# $Z Gen $xTV/dTHETA $pis2 $pis2 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 4 4 #
# $Z Gen $xTV/RAYONS 0.014 0.014 #
# #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_0 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$TEINT #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_7 vA=$GRIS_7 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$LUMIN #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_8 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$SATUR #
# #
# $Z $PAST \ #
# $Z $xTV/COULEURS$TEINT \ #
# $Z $xTV/COULEURS$LUMIN \ #
# $Z $xTV/COULEURS$SATUR \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "H=" $1 " L=" $2 " S=" $3 } ' \ #
# $Z | $SE -e 's+^+$xcg/RVB_HLS$X RVB_HLS=FAUX +' \ #
# $Z | $SE -e 's/$/ eR=VRAI eV=VRAI eB=VRAI/' \ #
# $Z | $SE -e 's/$/ eH=FAUX eL=FAUX eS=FAUX/' \ #
# $Z > $xTV/COULEURS$Y #
# #
# $Z (source $xTV/COULEURS$Y) \ #
# $Z > $xTV/COULEURS #
# #
# $Z $GRE "^R=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^R=//" \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z $GRE "^V=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^V=//" \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z $GRE "^B=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^B=//" \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=FAUX \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RDNW.1. \ #
# $Z $formatI #
# #
# $Z Gen $xTV/RAYONS 0.03 0.03 #
# #
# $Z $DELETE $xTV/GRAVITE #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RDNW.1. \ #
# $Z R=$xiim/RDNW.1. \ #
# $Z $formatI \ #
# $Z > $xTV/GRAVITE #
# #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $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("$DELETE $xTV/COORDONNEES\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xTV/COULEURS$ROUGE\n"); #
# $c printf("$DELETE $xTV/COULEURS$VERTE\n"); #
# $c printf("$DELETE $xTV/COULEURS$BLEUE\n"); #
# #
# $c printf("listMN $xTV/GRAVITE #
# $c %d %d #
# $c > $xTV/COORDONNEES\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*XG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_X\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*YG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_Y\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*ZG=//%c #
# $c > $xTV/COORDONNEES$COORD_Z\n" #
# $c ,'"','"','"','"' #
# $c ); #
# #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$ROUGE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$VERTE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$BLEUE\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$xrv/particule.10$X #
# $c np=1 #
# $c iterations=%d #
# $c LISTE_X=$xTV/COORDONNEES$COORD_X #
# $c LISTE_Y=$xTV/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xTV/COORDONNEES$COORD_Z #
# $c LISTE_ROUGE=$xTV/COULEURS$ROUGE #
# $c LISTE_VERTE=$xTV/COULEURS$VERTE #
# $c LISTE_BLEUE=$xTV/COULEURS$BLEUE #
# $c LISTE_RAYON=0.005 #
# $c zoom_automatique=FAUX ZOOM=1.0 #
# $c coordonnees_dans_0_1=FAUX #
# $c AXYZ=1 BXYZ=0 #
# $c fond=VRAI #
# $c fond_dynamique=FAUX #
# $c F=$xiim/RDNW.1.%04d #
# $c R=$xTV/RDNW.1. #
# $c $formatI\n" #
# $c ,(n-N0)+1,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.1.%04d$ROUGE #
# $c R=$xw1/RDNW.1.%04d$ROUGE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.1.%04d$VERTE #
# $c R=$xw1/RDNW.1.%04d$VERTE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.1.%04d$BLEUE #
# $c R=$xw1/RDNW.1.%04d$BLEUE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xTV/COORDONNEES #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xw1/RDNW.1. $xiak/RDNW.92 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xw1/RDNW.1. $xiak/RDNW.92 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/RDNW.92$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RDNW.92$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.92$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.92$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xw1/RDNW.1.0512%s $xiirk/RDNW.92.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RDNW.92.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RDNW.92.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xw1/RDNW.1. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/RDNW.92$R16 RVB Initialisation #
# record.01$Z $xiak/RDNW.92$R64 RVB rien #
# record.01$Z $xiirk/RDNW.92.0512 RVB rien #
# #
sequence 034843_035354
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=512 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set Part0=1 #
# $Z set PartN=16 #
# $Z @ Npart = $PartN - $Part0 #
# $Z @ Npart = $Npart + 1 #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Part0 d=$PartN vD=$vD vA=$vA $ArG > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Part0 d=$PartN signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z GenR $xTV/VITESSES 1 5 entiers=VRAI g=21 #
# #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/+0.02/' -e 's/^2$/0/' -e 's/^3$/-0.02/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/+0.02/' -e 's/^3$/0/' -e 's/^4$/-0.02/' \ #
# $Z > $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/0/' -e 's/^3$/0/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_Z #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI -2 -2 #
# $Z Gen $xTV/MnPHI +2 +2 #
# $Z Gen $xTV/dPHI $pis2 $pis2 #
# $Z Gen $xTV/mnTHETA 0 0 #
# $Z Gen $xTV/MnTHETA 0 0 #
# $Z Gen $xTV/dTHETA $pis2 $pis2 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 4 4 #
# $Z Gen $xTV/RAYONS 0.014 0.014 #
# #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_0 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$TEINT #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_7 vA=$GRIS_7 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$LUMIN #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_8 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$SATUR #
# #
# $Z $PAST \ #
# $Z $xTV/COULEURS$TEINT \ #
# $Z $xTV/COULEURS$LUMIN \ #
# $Z $xTV/COULEURS$SATUR \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "H=" $1 " L=" $2 " S=" $3 } ' \ #
# $Z | $SE -e 's+^+$xcg/RVB_HLS$X RVB_HLS=FAUX +' \ #
# $Z | $SE -e 's/$/ eR=VRAI eV=VRAI eB=VRAI/' \ #
# $Z | $SE -e 's/$/ eH=FAUX eL=FAUX eS=FAUX/' \ #
# $Z > $xTV/COULEURS$Y #
# #
# $Z (source $xTV/COULEURS$Y) \ #
# $Z > $xTV/COULEURS #
# #
# $Z $GRE "^R=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^R=//" \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z $GRE "^V=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^V=//" \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z $GRE "^B=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^B=//" \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=FAUX \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RDNW.W. \ #
# $Z $formatI #
# #
# $Z Gen $xTV/RAYONS 0.03 0.03 #
# #
# $Z $DELETE $xTV/GRAVITE #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RDNW.W. \ #
# $Z R=$xiim/RDNW.W. \ #
# $Z $formatI \ #
# $Z > $xTV/GRAVITE #
# #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $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("$DELETE $xTV/COORDONNEES\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xTV/COULEURS$ROUGE\n"); #
# $c printf("$DELETE $xTV/COULEURS$VERTE\n"); #
# $c printf("$DELETE $xTV/COULEURS$BLEUE\n"); #
# #
# $c printf("listMN $xTV/GRAVITE #
# $c %d %d #
# $c > $xTV/COORDONNEES\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*XG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_X\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*YG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_Y\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*ZG=//%c #
# $c > $xTV/COORDONNEES$COORD_Z\n" #
# $c ,'"','"','"','"' #
# $c ); #
# #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$ROUGE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$VERTE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$BLEUE\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$xrv/particule.10$X #
# $c np=1 #
# $c iterations=%d #
# $c LISTE_X=$xTV/COORDONNEES$COORD_X #
# $c LISTE_Y=$xTV/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xTV/COORDONNEES$COORD_Z #
# $c LISTE_ROUGE=$xTV/COULEURS$ROUGE #
# $c LISTE_VERTE=$xTV/COULEURS$VERTE #
# $c LISTE_BLEUE=$xTV/COULEURS$BLEUE #
# $c LISTE_RAYON=0.005 #
# $c zoom_automatique=FAUX ZOOM=1.0 #
# $c coordonnees_dans_0_1=FAUX #
# $c AXYZ=1 BXYZ=0 #
# $c fond=VRAI #
# $c fond_dynamique=FAUX #
# $c F=$xiim/RDNW.W.%04d #
# $c R=$xTV/RDNW.2. #
# $c $formatI\n" #
# $c ,(n-N0)+1,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.2.%04d$ROUGE #
# $c R=$xiim/RDNW.2.%04d$ROUGE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.2.%04d$VERTE #
# $c R=$xiim/RDNW.2.%04d$VERTE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.2.%04d$BLEUE #
# $c R=$xiim/RDNW.2.%04d$BLEUE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xTV/COORDONNEES #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/RDNW.2. $xiak/RDNW.94 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xiim/RDNW.2. $xiak/RDNW.94 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/RDNW.94$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RDNW.94$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.94$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.94$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/RDNW.2.0512%s $xiirk/RDNW.94.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RDNW.94.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RDNW.94.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xiim_LACT29/RDNW.2. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/RDNW.94$R16 RVB Initialisation #
# record.01$Z $xiak/RDNW.94$R64 RVB rien #
# record.01$Z $xiirk/RDNW.94.0512 RVB rien #
# #
sequence 035355_035866
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=512 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set Part0=1 #
# $Z set PartN=64 #
# $Z @ Npart = $PartN - $Part0 #
# $Z @ Npart = $Npart + 1 #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Part0 d=$PartN vD=$vD vA=$vA $ArG > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Part0 d=$PartN signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z GenR $xTV/VITESSES 1 5 entiers=VRAI g=21 #
# #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/+0.02/' -e 's/^2$/0/' -e 's/^3$/-0.02/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/+0.02/' -e 's/^3$/0/' -e 's/^4$/-0.02/' \ #
# $Z > $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/0/' -e 's/^3$/0/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_Z #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI -2 -2 #
# $Z Gen $xTV/MnPHI +2 +2 #
# $Z Gen $xTV/dPHI $pis2 $pis2 #
# $Z Gen $xTV/mnTHETA 0 0 #
# $Z Gen $xTV/MnTHETA 0 0 #
# $Z Gen $xTV/dTHETA $pis2 $pis2 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 4 4 #
# $Z Gen $xTV/RAYONS 0.014 0.014 #
# #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_0 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$TEINT #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_7 vA=$GRIS_7 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$LUMIN #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_8 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$SATUR #
# #
# $Z $PAST \ #
# $Z $xTV/COULEURS$TEINT \ #
# $Z $xTV/COULEURS$LUMIN \ #
# $Z $xTV/COULEURS$SATUR \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "H=" $1 " L=" $2 " S=" $3 } ' \ #
# $Z | $SE -e 's+^+$xcg/RVB_HLS$X RVB_HLS=FAUX +' \ #
# $Z | $SE -e 's/$/ eR=VRAI eV=VRAI eB=VRAI/' \ #
# $Z | $SE -e 's/$/ eH=FAUX eL=FAUX eS=FAUX/' \ #
# $Z > $xTV/COULEURS$Y #
# #
# $Z (source $xTV/COULEURS$Y) \ #
# $Z > $xTV/COULEURS #
# #
# $Z $GRE "^R=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^R=//" \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z $GRE "^V=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^V=//" \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z $GRE "^B=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^B=//" \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=FAUX \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RDNW.W. \ #
# $Z $formatI #
# #
# $Z Gen $xTV/RAYONS 0.03 0.03 #
# #
# $Z $DELETE $xTV/GRAVITE #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RDNW.W. \ #
# $Z R=$xiim/RDNW.W. \ #
# $Z $formatI \ #
# $Z > $xTV/GRAVITE #
# #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $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("$DELETE $xTV/COORDONNEES\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xTV/COULEURS$ROUGE\n"); #
# $c printf("$DELETE $xTV/COULEURS$VERTE\n"); #
# $c printf("$DELETE $xTV/COULEURS$BLEUE\n"); #
# #
# $c printf("listMN $xTV/GRAVITE #
# $c %d %d #
# $c > $xTV/COORDONNEES\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*XG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_X\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*YG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_Y\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*ZG=//%c #
# $c > $xTV/COORDONNEES$COORD_Z\n" #
# $c ,'"','"','"','"' #
# $c ); #
# #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$ROUGE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$VERTE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$BLEUE\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$xrv/particule.10$X #
# $c np=1 #
# $c iterations=%d #
# $c LISTE_X=$xTV/COORDONNEES$COORD_X #
# $c LISTE_Y=$xTV/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xTV/COORDONNEES$COORD_Z #
# $c LISTE_ROUGE=$xTV/COULEURS$ROUGE #
# $c LISTE_VERTE=$xTV/COULEURS$VERTE #
# $c LISTE_BLEUE=$xTV/COULEURS$BLEUE #
# $c LISTE_RAYON=0.005 #
# $c zoom_automatique=FAUX ZOOM=1.0 #
# $c coordonnees_dans_0_1=FAUX #
# $c AXYZ=1 BXYZ=0 #
# $c fond=VRAI #
# $c fond_dynamique=FAUX #
# $c F=$xiim/RDNW.W.%04d #
# $c R=$xTV/RDNW.3. #
# $c $formatI\n" #
# $c ,(n-N0)+1,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.3.%04d$ROUGE #
# $c R=$xiim/RDNW.3.%04d$ROUGE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.3.%04d$VERTE #
# $c R=$xiim/RDNW.3.%04d$VERTE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.3.%04d$BLEUE #
# $c R=$xiim/RDNW.3.%04d$BLEUE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xTV/COORDONNEES #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/RDNW.3. $xiak/RDNW.96 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xiim/RDNW.3. $xiak/RDNW.96 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/RDNW.96$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RDNW.96$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.96$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.96$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/RDNW.3.0512%s $xiirk/RDNW.96.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RDNW.96.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RDNW.96.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xiim_LACT29/RDNW.3. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/RDNW.96$R16 RVB Initialisation #
# record.01$Z $xiak/RDNW.96$R64 RVB rien #
# record.01$Z $xiirk/RDNW.96.0512 RVB rien #
# #
sequence 035867_036250
# Generee (sur '$LACT29') par : #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=512 #
# $Z @ Nimages = $Derniere - $Premiere #
# $Z @ Nimages = $Nimages + 1 #
# #
# $Z set Part0=1 #
# $Z set PartN=256 #
# $Z @ Npart = $PartN - $Part0 #
# $Z @ Npart = $Npart + 1 #
# #
# $Z alias Gen 'set Fi=\!:1 ; set vD=\!:2 ; set vA=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_inte$X p=$Part0 d=$PartN vD=$vD vA=$vA $ArG > $Fi ; \\ #
# $Z unset Fi vD vA ArG' #
# #
# $Z alias GenR 'set Fi=\!:1 ; set In=\!:2 ; set Su=\!:3 ; set ArG=(\!:4*) ; \\ #
# $Z $DELETE $Fi ; \\ #
# $Z $xci/valeurs_alea$X p=$Part0 d=$PartN signe="$KV" inf=$In sup=$Su $ArG > $Fi ; \\ #
# $Z unset Fi In Su ArG' #
# #
# $Z Gen $xTV/COORDONNEES$COORD_X 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Y 0.0 0.0 #
# $Z Gen $xTV/COORDONNEES$COORD_Z 0.0 0.0 #
# #
# $Z GenR $xTV/VITESSES 1 5 entiers=VRAI g=21 #
# #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/+0.02/' -e 's/^2$/0/' -e 's/^3$/-0.02/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/+0.02/' -e 's/^3$/0/' -e 's/^4$/-0.02/' \ #
# $Z > $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $CA $xTV/VITESSES \ #
# $Z | $SE -e 's/^1$/0/' -e 's/^2$/0/' -e 's/^3$/0/' -e 's/^4$/0/' \ #
# $Z > $xTV/VITESSES$COORD_Z #
# #
# $Z Gen $xTV/mdRHO 0.0 0.0 #
# $Z Gen $xTV/MdRHO 0.0 0.0 #
# $Z Gen $xTV/mnPHI -2 -2 #
# $Z Gen $xTV/MnPHI +2 +2 #
# $Z Gen $xTV/dPHI $pis2 $pis2 #
# $Z Gen $xTV/mnTHETA 0 0 #
# $Z Gen $xTV/MnTHETA 0 0 #
# $Z Gen $xTV/dTHETA $pis2 $pis2 #
# $Z Gen $xTV/DISTANCE 1000000 1000000 #
# $Z Gen $xTV/STABILITE 4 4 #
# $Z Gen $xTV/RAYONS 0.014 0.014 #
# #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_0 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$TEINT #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_7 vA=$GRIS_7 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$LUMIN #
# $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ #
# $Z vD=$GRIS_8 vA=$GRIS_8 \ #
# $Z cubique=FAUX \ #
# $Z entiers=VRAI \ #
# $Z > $xTV/COULEURS$SATUR #
# #
# $Z $PAST \ #
# $Z $xTV/COULEURS$TEINT \ #
# $Z $xTV/COULEURS$LUMIN \ #
# $Z $xTV/COULEURS$SATUR \ #
# $Z | $R "$K_TAB" "$K_BLANC" \ #
# $Z | $AW ' { print "H=" $1 " L=" $2 " S=" $3 } ' \ #
# $Z | $SE -e 's+^+$xcg/RVB_HLS$X RVB_HLS=FAUX +' \ #
# $Z | $SE -e 's/$/ eR=VRAI eV=VRAI eB=VRAI/' \ #
# $Z | $SE -e 's/$/ eH=FAUX eL=FAUX eS=FAUX/' \ #
# $Z > $xTV/COULEURS$Y #
# #
# $Z (source $xTV/COULEURS$Y) \ #
# $Z > $xTV/COULEURS #
# #
# $Z $GRE "^R=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^R=//" \ #
# $Z > $xTV/COULEURS$ROUGE #
# $Z $GRE "^V=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^V=//" \ #
# $Z > $xTV/COULEURS$VERTE #
# $Z $GRE "^B=" $xTV/COULEURS \ #
# $Z | $SE -e "s/^B=//" \ #
# $Z > $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=0.5 \ #
# $Z attenuation_des_trainees=1.00 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=FAUX \ #
# $Z fond=FAUX \ #
# $Z R=$xiim/RDNW.W. \ #
# $Z $formatI #
# #
# $Z Gen $xTV/RAYONS 0.03 0.03 #
# #
# $Z $DELETE $xTV/GRAVITE #
# $Z $xrk/rdn_walk.41$X corps=$Npart \ #
# $Z np=$Nimages \ #
# $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ #
# $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ #
# $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ #
# $Z LISTE_VX=$xTV/VITESSES$COORD_X \ #
# $Z LISTE_VY=$xTV/VITESSES$COORD_Y \ #
# $Z LISTE_VZ=$xTV/VITESSES$COORD_Z \ #
# $Z LISTE_MINIMUM_DELTA_RHO=$xTV/mdRHO \ #
# $Z LISTE_MAXIMUM_DELTA_RHO=$xTV/MdRHO \ #
# $Z LISTE_MINIMUM_N_PHI=$xTV/mnPHI \ #
# $Z LISTE_MAXIMUM_N_PHI=$xTV/MnPHI \ #
# $Z LISTE_DELTA_PHI=$xTV/dPHI \ #
# $Z LISTE_MINIMUM_N_THETA=$xTV/mnTHETA \ #
# $Z LISTE_MAXIMUM_N_THETA=$xTV/MnTHETA \ #
# $Z LISTE_DELTA_THETA=$xTV/dTHETA \ #
# $Z LISTE_DISTANCE_MAXIMALE=$xTV/DISTANCE \ #
# $Z LISTE_STABILITE=$xTV/STABILITE \ #
# $Z LISTE_RAYON=$xTV/RAYONS \ #
# $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ #
# $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ #
# $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ #
# $Z centrer=VRAI \ #
# $Z dct=0.5 \ #
# $Z nombre=1 \ #
# $Z trainees=VRAI mode=1 \ #
# $Z attenuation_des_images=1.0 \ #
# $Z attenuation_des_trainees=0.85 \ #
# $Z renormaliser=FAUX \ #
# $Z Lz=100 \ #
# $Z zoom_automatique=VRAI \ #
# $Z centre_de_gravite=VRAI \ #
# $Z fond=VRAI \ #
# $Z dynamique=VRAI \ #
# $Z F=$xiim/RDNW.W. \ #
# $Z R=$xiim/RDNW.W. \ #
# $Z $formatI \ #
# $Z > $xTV/GRAVITE #
# #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/VITESSES #
# $Z $DELETE $xTV/VITESSES$COORD_X #
# $Z $DELETE $xTV/VITESSES$COORD_Y #
# $Z $DELETE $xTV/VITESSES$COORD_Z #
# $Z $DELETE $xTV/mdRHO #
# $Z $DELETE $xTV/MdRHO #
# $Z $DELETE $xTV/mnPHI #
# $Z $DELETE $xTV/MnPHI #
# $Z $DELETE $xTV/dPHI #
# $Z $DELETE $xTV/mnTHETA #
# $Z $DELETE $xTV/MnTHETA #
# $Z $DELETE $xTV/dTHETA #
# $Z $DELETE $xTV/DISTANCE #
# $Z $DELETE $xTV/STABILITE #
# $Z $DELETE $xTV/RAYONS #
# $Z $DELETE $xTV/COULEURS$TEINT #
# $Z $DELETE $xTV/COULEURS$LUMIN #
# $Z $DELETE $xTV/COULEURS$SATUR #
# $Z $DELETE $xTV/COULEURS$Y #
# $Z $DELETE $xTV/COULEURS #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# $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("$DELETE $xTV/COORDONNEES\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_X\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Y\n"); #
# $c printf("$DELETE $xTV/COORDONNEES$COORD_Z\n"); #
# #
# $c printf("$DELETE $xTV/COULEURS$ROUGE\n"); #
# $c printf("$DELETE $xTV/COULEURS$VERTE\n"); #
# $c printf("$DELETE $xTV/COULEURS$BLEUE\n"); #
# #
# $c printf("listMN $xTV/GRAVITE #
# $c %d %d #
# $c > $xTV/COORDONNEES\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*XG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_X\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*YG=//%c #
# $c -e %cs/ .*//%c #
# $c > $xTV/COORDONNEES$COORD_Y\n" #
# $c ,'"','"','"','"' #
# $c ); #
# $c printf("$CA $xTV/COORDONNEES #
# $c | $SE -e %cs/^.*ZG=//%c #
# $c > $xTV/COORDONNEES$COORD_Z\n" #
# $c ,'"','"','"','"' #
# $c ); #
# #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$ROUGE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$VERTE\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/valeurs_inte$X #
# $c premiere=%d derniere=%d #
# $c vD=$GRIS_4 vA=$GRIS_8 #
# $c cubique=FAUX #
# $c entiers=VRAI #
# $c utiliser_la_valeur_de_depart=FAUX #
# $c > $xTV/COULEURS$BLEUE\n" #
# $c ,N0,n #
# $c ); #
# #
# $c printf("$xrv/particule.10$X #
# $c np=1 #
# $c iterations=%d #
# $c LISTE_X=$xTV/COORDONNEES$COORD_X #
# $c LISTE_Y=$xTV/COORDONNEES$COORD_Y #
# $c LISTE_Z=$xTV/COORDONNEES$COORD_Z #
# $c LISTE_ROUGE=$xTV/COULEURS$ROUGE #
# $c LISTE_VERTE=$xTV/COULEURS$VERTE #
# $c LISTE_BLEUE=$xTV/COULEURS$BLEUE #
# $c LISTE_RAYON=0.005 #
# $c zoom_automatique=FAUX ZOOM=1.0 #
# $c coordonnees_dans_0_1=FAUX #
# $c AXYZ=1 BXYZ=0 #
# $c fond=VRAI #
# $c fond_dynamique=FAUX #
# $c F=$xiim/RDNW.W.%04d #
# $c R=$xTV/RDNW.4. #
# $c $formatI\n" #
# $c ,(n-N0)+1,n #
# $c ); #
# #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.4.%04d$ROUGE #
# $c R=$xiim/RDNW.4.%04d$ROUGE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.4.%04d$VERTE #
# $c R=$xiim/RDNW.4.%04d$VERTE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c printf("$xci/acces$X #
# $c A=$xTV/RDNW.4.%04d$BLEUE #
# $c R=$xiim/RDNW.4.%04d$BLEUE #
# $c $formatI\n" #
# $c ,N0,n #
# $c ); #
# $c } #
# $c } #
# #
# #
# $Z $DELETE $xTV/COORDONNEES #
# $Z $DELETE $xTV/COORDONNEES$COORD_X #
# $Z $DELETE $xTV/COORDONNEES$COORD_Y #
# $Z $DELETE $xTV/COORDONNEES$COORD_Z #
# $Z $DELETE $xTV/COULEURS$ROUGE #
# $Z $DELETE $xTV/COULEURS$VERTE #
# $Z $DELETE $xTV/COULEURS$BLEUE #
# #
# #
# $Z Pal #
# #
# $Z $xci/reduction_16$Z $xiim/RDNW.4. $xiak/RDNW.98 $Premiere $Derniere #
# $Z $xci/reduction_64$Z $xiim/RDNW.4. $xiak/RDNW.98 $Premiere $Derniere #
# #
# $X $xci/genere$X c='ro $xiak/RDNW.98$R16%s' RVB=VRAI #
# $X $xci/genere$X c='ro $xiak/RDNW.98$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.98$R16%s' RVB=VRAI #
# $X $xci/genere$X c='$xcg/unite$Z $xiak/RDNW.98$R64%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$CP $xiim/RDNW.4.0512%s $xiirk/RDNW.98.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='ro $xiirk/RDNW.98.0512%s' RVB=VRAI #
# #
# $X $xci/genere$X c='$xcg/unite$Z $xiirk/RDNW.98.0512%s' RVB=VRAI #
# #
# #
# Pal #
# #
# #
# $xci/disk_video_P$Z $xiim_LACT29/RDNW.4. 001 512 RVB \ #
# 11 1 Initialisation Sequence \ #
# "$formatI" $Gamma_lorenz #
# #
# #
# xivPdf 3 2 #
# #
# record.01$Z $xiak/RDNW.98$R16 RVB Initialisation #
# record.01$Z $xiak/RDNW.98$R64 RVB rien #
# record.01$Z $xiirk/RDNW.98.0512 RVB rien #
# #
# ATTENTION, la sequence n'a pu etre enregistree jusqu'au bout faute de place sur le disque #
# elle a ete reenregistree en : #
# #
# xivPdf 11 2 / 000001_000512 #
# #
#######################################################################################################################################
# #
# S E Q U E N C E S M A L P L A C E E S S U R C E T T E F A C E : #
# #
#######################################################################################################################################
#####_____sequence z026395_026635 #
# ATTENTION, ceci est un bouche-trou entre '025883_026394' et '026636_026717'... #
#####_____sequence z026636_026717 #
# ATTENTION, cette sequence a ete enregistree par erreur comme si le disque '6 2' etait #
# monte ; son adresse '026636_026891' est donc incorrecte dans la mesure ou en realite #
# elle aurait du etre '008193_008448'... #
#####_____sequence z034782_034840 #
# ATTENTION, ceci est un bouche-trou entre '034270_034781' et '034841_034842'... #
#####_____sequence z034841_034842 #
# ATTENTION, ces 2 images ont ete enregistrees par erreur lors de l'enregistrement des #
# images '$xw1/NCOR.1.' alors que le disque '9 1' avait ete adresse par erreur au lieu #
# du disque '11 1'... #
# #
# ATTENTION, il faudra donc, lorsque cela sera necessaire "boucher" le trou qui va se #
# creer devant cette sequence a l'aide d'une sequence "bouchon" du type '034???_034840'. #
#######################################################################################################################################
# #
# C H A N G E M E N T L E 20010626104408 D U " T I M I N G " D E L A V I D E O P R O D U I T E #
# P A R L A C A R T E ' Galileo ' D E ' LACT12 ' A F I N D E C E N T R E R #
# L A V I D E O P A R P A S S A G E D E L A P H A S E H O R I Z O N T A L E D E ' -42 ' A ' -58 ' : #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# S E Q U E N C E S L E S P L U S P E R T I N E N T E S ( D E B U T ) : #
# #
#######################################################################################################################################
marqueur bestS : Geometrie Fractale Deterministe, Chaos Deterministe, Mecanique Celeste.
marqueur -------------------------------------------------------------------------------
Sequence 033246_033373
# Zoom sur la courbe de von Koch. #
sequence 031839_031965
# L'ensemble de Mandelbrot avec un nombre variable d'iterations (1 a N) et les arguments. #
sequence 018370_018504 ralenti=2
sequence 018910_019044 ralenti=2
Sequence 017724_017843 ralenti=2
Sequence 018100_018234 ralenti=2
# Le long de la frontiere de l'ensemble de Mandelbrot Complexe avec quelques Julia. #
sequence 017025_017152
# Rotation autour de l'axe 'OY' d'un ensemble de Julia Quaternions avec "motion blur". #
sequence 019983_020116
# Autour de l'ensemble de Mandelbrot Quaternions avec "motion blur". #
Sequence 021147_021274
# La danseuse... #
Sequence 021403_021530
# Julia Island... #
sequence 034270_034781
sequence 034843_035354
sequence 035355_035866
# Marche aleatoire de {4,16,64} particules avec visualisation de leur centre de gravite. #
sequence 026718_027229
sequence 025883_026394
sequence 027230_027741
sequence 025371_025882
# Quelques billiards bidimensionnels (rectangulaire, double, Sierpinski, Mandelbrot) #
# avec 64 particules isotropes et sans collisions. #
sequence 028766_029277
sequence 028254_028765
sequence 029278_029789
sequence 031966_032477
sequence 027742_028253
# Quelques billiards bidimensionnels (rectangulaire, double, Sierpinski, flocon de neige, #
# Mandelbrot) avec 64 particules isotropes et avec collisions. #
sequence 029790_030301
sequence 030302_030813
# Variations artistiques sur le billiard bidimensionnel rectangulaire. #
sequence 031326_031837
sequence 030814_031325
# Variations artistiques sur le billiard bidimensionnel de Sierpinski. #
Sequence 008193_008448
Sequence 009729_009984
Sequence 008449_008704
# L'attracteur de Lorenz pour 448500 conditions initiales simultanees (un champ gaussien). #
Sequence 014337_014592
Sequence 015361_015616
Sequence 015617_015872
# L'attracteur de Lorenz pour 448500 conditions initiales simultanees (un champ fractal). #
sequence 033502_033629
sequence 033630_033757
sequence 033758_033885
sequence 033886_034013
sequence 034014_034141
sequence 034142_034269
# Quelques variations sur les erreurs d'arrondi et l'attracteur de Lorenz (1-tout ensemble, #
# 2-Euler, 3-Runge-Kutta-2, 4-Runge-Kutta-4, 5-optimisation '-O0', 6-optimisation '-O3'). #
sequence 000001_002048
# Notre Systeme Solaire pendant environ 243 annees (version "heliocentrique"). #
sequence 002049_004096
# Notre Systeme Solaire pendant environ 243 annees (version "geocentrique"). #
sequence 011393_013440
# Notre Systeme Solaire pendant environ 243 annees (version "jupitero-centrique"). #
sequence 006145_008192
# Notre Systeme Solaire pendant environ 243 annees (version "neptuno-centrique"). #
sequence 004097_006144
# Notre Systeme Solaire pendant environ 243 annees (version "pluto-centrique"). #
sequence 009985_010112
sequence 010113_010624
sequence 032862_032989
sequence 032990_033245
# De Mars au Soleil. #
SequenceI 022043_022298
SequenceI 022299_022810
# Du Soleil vers Pluton (avec transformation lineaire des coordonnees spheriques). #
# #
# ATTENTION, contrairement aux autres images du systeme solaire pour lesquelles un tel #
# message n'apparait pas, les images de cette sequence montrent les planetes avec la #
# transformation lineaire des coordonnees spheriques (option "lineaire=VRAI" pour #
# '$xrr/N_corps.11$K'). #
SequenceI 010625_010880
SequenceI 010881_011392
# Du Soleil vers Pluton (avec transformation non lineaire des coordonnees spheriques). #
Sequence 017153_017408
# Un seul ordinateur, mais trois options d'optimisation differentes dans le probleme a #
# N corps (avec N=4). #
#######################################################################################################################################
# #
# S E Q U E N C E S L E S P L U S P E R T I N E N T E S ( F I N ) : #
# #
#######################################################################################################################################