#!/bin/csh ####################################################################################################################################### # # # N O T A : # # # # # # Author of '$xivP/disk.000000007/face.2/$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 N O N D E T E R M I N I S T E S # # F A C E ' xivPdf 07 2 ' # # F A C E S U I T E D E L A F A C E ' xivPdf 02 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 ' : # # # ####################################################################################################################################### sequence 000001_000128 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # main() # # { # # double dx,dy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # dx = 0.5; # # dy = 0.5 + ((0.5*(float)n)/(float)N); # # printf("$xci/gauss$X Tx=%g Ty=%g # # R=$xT/GAUSS # # $formatI ; # # $xci/vitre.52$Z $xT/GAUSS# # $xiP/orange.01 # # $xiirf/PAYS.17.001 # # $xiP/sunset.04 # # $xw1/PAYS.5$M.%04d\n" # # ,dx,dy,n # # ); # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.5$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # ####################################################################################################################################### # # # 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 ' : # # # ####################################################################################################################################### sequence 000129_000256 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # main() # # { # # double theta=0; # # int n; # # printf("#\nStd\n\n"); # # for (n=N0 ; n<=N ; n++) # # { # # printf("$xci/substitue$X # # A=$xiio/GAUSS.8110 # # substitution=L_SUBSTITUTION_ROUGE # # p=$xiP/gris.04 # # $formatI | # # $xci/multi_02.01$X # # A2=$xiio/ETOILE.11 # # $formatI | # # $xci/rotate$X # # angle=%f # # $formatI | # # $xci/vraies_C$X # # p=$xiP/orange.01 # # RR=$xT/SOLEIL$ROUGE # # RV=$xT/SOLEIL$VERTE # # RB=$xT/SOLEIL$BLEUE # # $formatI ; # # $xci/vitre.53$Z $xiirf/PAYS.18.6$Fi # # $xT/SOLEIL # # $xw1/PAYS.6$M.%04d\n" # # ,theta,n # # ); # # theta = theta + (3.14159265358979323846/((float)2*N)); # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.6$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, cette sequence est mal cadree en horizontal ; cela vient d'un probleme qui # # subsiste a cette date (1994050400) avec la carte 'Galileo' et sa programmation... # sequence 000257_000257 # Petit test apres avoir supprime la correction de gamma : # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.6$M. 1 1 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, cette sequence est mal cadree en horizontal ; cela vient d'un probleme qui # # subsiste a cette date (1994050400) avec la carte 'Galileo' et sa programmation... # sequence 000258_000385 sequence 000386_000386 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # #define NOIR 0 # # #define BLANC 255 # # #define COULEURS (BLANC-NOIR+1) # # main() # # { # # int n; # # int couleur=NOIR; # # printf("#\nStd\n\n"); # # for (n=N0 ; n<=N ; n++) # # { # # printf("$xci/etoile.01$X # # couleur=%d # # $formatI | # # $xci/vraies_C$X # # p=$xiP/orange.01 # # RR=$xT/SOLEIL$ROUGE # # RV=$xT/SOLEIL$VERTE # # RB=$xT/SOLEIL$BLEUE # # $formatI ; # # $xci/vitre.53$Z $xiirf/PAYS.18.7$Fi # # $xT/SOLEIL # # $xw1/PAYS.7$M.%04d\n" # # ,couleur,n # # ); # # if (n < (N / 2)) # # { # # couleur = couleur + (COULEURS / (N / 2)); # # } # # else # # { # # } # # if (n == (N / 2)) # # { # # couleur = BLANC; # # } # # else # # { # # } # # if (n > (N / 2)) # # { # # couleur = couleur - (COULEURS / (N / 2)); # # } # # else # # { # # } # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.7$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/PAYS.7$M. 1 1 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, cette sequence ne donne pas du tout le resultat attendu, la "croix" faisant # # un mouvement de rotation alternatif... # # # # ATTENTION, cette sequence est mal cadree en horizontal ; cela vient d'un probleme qui # # subsiste a cette date (1994050400) avec la carte 'Galileo' et sa programmation... # sequence 000387_000514 sequence 000515_000515 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # #define NOIR 0 # # #define BLANC 255 # # #define COULEURS (BLANC-NOIR+1) # # main() # # { # # int n; # # double couleur=NOIR; # # int pas=1; # # printf("#\nStd\n\n"); # # for (n=N0 ; n<=N ; n++) # # { # # printf("$xci/etoile.01$X # # couleur=%g # # pas=%d # # $formatI | # # $xci/vraies_C$X # # p=$xiP/orange.01 # # RR=$xT/SOLEIL$ROUGE # # RV=$xT/SOLEIL$VERTE # # RB=$xT/SOLEIL$BLEUE # # $formatI ; # # $xci/vitre.53$Z $xiirf/PAYS.18.7$Fi # # $xT/SOLEIL # # $xw1/PAYS.7$M.%04d\n" # # ,couleur,pas,n # # ); # # if (n < (N / 2)) # # { # # couleur = couleur + (COULEURS / (N / 2)); # # pas = +1; # # } # # else # # { # # } # # if (n == (N / 2)) # # { # # couleur = BLANC; # # pas = -1; # # } # # else # # { # # } # # if (n > (N / 2)) # # { # # couleur = couleur - (COULEURS / (N / 2)); # # pas = -1; # # } # # else # # { # # } # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.7$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/PAYS.7$M. 1 1 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, cette sequence est mal cadree en horizontal ; cela vient d'un probleme qui # # subsiste a cette date (1994050400) avec la carte 'Galileo' et sa programmation... # sequence 000516_000643 # Generee par : # # # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$xci/complement$X \ # # A=$xw1/PAYS.7$M.%04d$ROUGE \ # # R=$xT/SOLARISE \ # # $formatI ; # # $xci/solarise.11$Z \ # # $xT/SOLARISE \ # # $xw1/PAYS.7.%04d \ # # 0' # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.7. 1 128 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, cette sequence est mal cadree en horizontal ; cela vient d'un probleme qui # # subsiste a cette date (1994050500) avec la carte 'Galileo' et sa programmation... # sequence 000644_000771 sequence 000772_000772 sequence 000773_000900 sequence 000901_000901 # Generee par : # # # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$xci/z_carre.01$X \ # # A=$xw1/PAYS.7$M.%04d$ROUGE \ # # $formatI | # # $xci/filtre.01$X \ # # N=$xiio/GAUSS.8110 \ # # R=$xw1/PAYS.8.%04d \ # # $formatI' # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.8. 1 128 $xiP/cercle.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/PAYS.8. 1 1 $xiP/cercle.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # $xci/disk_video_P$Z $xw1/PAYS.8. 1 128 $xiP/orange.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/PAYS.8. 1 1 $xiP/orange.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, cette sequence est mal cadree en horizontal ; cela vient d'un probleme qui # # subsiste a cette date (1994050900) avec la carte 'Galileo' et sa programmation... # sequence 000902_001029 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # main() # # { # # double dx,dy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # dx = 0.5; # # dy = 0.5 + ((0.5*(float)n)/(float)N); # # printf("$xci/gauss$X Tx=%g Ty=%g # # R=$xT/GAUSS # # $formatI\n # # $xci/vitre.52$Z $xT/GAUSS # # $xiP/orange.01 # # $xiirf/PAYS.17.001 # # $xiP/sunset.04 # # $xT/PAYSAGE\n # # $xci/filtre.01$X A=$xT/PAYSAGE$ROUGE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$ROUGE # # $formatI\n # # $xci/filtre.01$X A=$xT/PAYSAGE$VERTE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$VERTE # # $formatI\n # # $xci/filtre.01$X A=$xT/PAYSAGE$BLEUE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$BLEUE # # $formatI\n # # $xci/scale$X A=$xT/PAYSAGE$Fi$BLEUE # # a=0.3 # # R=$xT/PAYSAGE$Fi$BLEUE # # $formatI\n # # $xci/transpose$X A=$xiio/MIRE # # $formatI | # # $xci/Sx$X # # $formatI | # # $xci/multi_02.01$X A1=$xiff/NUAGES$N.3%04d # # $formatI | # # $xci/scale$X a=0.85 # # $formatI | # # $xci/vraies_C$X p=$xiP/orange.01 # # RR=$xT/NUAGES$ROUGE # # RV=$xT/NUAGES$VERTE # # RB=$xT/NUAGES$BLEUE # # $formatI\n # # $xci/vitre.53$Z $xT/PAYSAGE$Fi # # $xT/NUAGES # # $xw1/PAYS.9$M.%04d\n" # # ,dx,dy,n-1,n # # ); # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.9$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # sequence 001030_001157 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # main() # # { # # double dx,dy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # dx = 0.5; # # dy = 0.5 + ((0.5*(float)n)/(float)N); # # printf("$xci/gauss$X Tx=%g Ty=%g # # R=$xT/GAUSS # # $formatI\n # # $xci/vitre.52$Z $xT/GAUSS # # $xiP/orange.01 # # $xiirf/PAYS.17.001 # # $xiP/sunset.04 # # $xT/PAYSAGE\n # # $xci/filtre.01$X A=$xT/PAYSAGE$ROUGE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$ROUGE # # $formatI\n # # $xci/filtre.01$X A=$xT/PAYSAGE$VERTE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$VERTE # # $formatI\n # # $xci/filtre.01$X A=$xT/PAYSAGE$BLEUE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$BLEUE # # $formatI\n # # $xci/scale$X A=$xT/PAYSAGE$Fi$BLEUE # # a=0.3 # # R=$xT/PAYSAGE$Fi$BLEUE # # $formatI\n # # $xci/transpose$X A=$xiio/MIRE # # $formatI | # # $xci/Sx$X # # $formatI | # # $xci/multi_02.01$X A1=$xiff/NUAGES$N.3%04d # # $formatI | # # $xci/scale$X a=0.85 # # $formatI | # # $xci/vraies_C$X p=$xiP/orange.01 # # RR=$xT/NUAGES$ROUGE # # RV=$xT/NUAGES$VERTE # # RB=$xT/NUAGES$BLEUE # # $formatI\n # # $xci/vitre.53$Z $xT/PAYSAGE$Fi # # $xT/NUAGES # # $xT/PAYS.A$M\n # # $xci/luminance.01$X AR=$xT/PAYS.A$M$ROUGE # # AV=$xT/PAYS.A$M$VERTE # # AB=$xT/PAYS.A$M$BLEUE # # R=$xT/LUMINANCE # # $formatI\n # # $xci/interpole.02$X A1=$xT/PAYS.A$M$ROUGE # # A2=$xT/LUMINANCE # # P=$xiio/GAUSS.8110 # # R=$xw1/PAYS.A$M.%04d$ROUGE # # $formatI\n # # $xci/interpole.02$X A1=$xT/PAYS.A$M$VERTE # # A2=$xT/LUMINANCE # # P=$xiio/GAUSS.8110 # # R=$xw1/PAYS.A$M.%04d$VERTE # # $formatI\n # # $xci/interpole.02$X A1=$xT/PAYS.A$M$BLEUE # # A2=$xT/LUMINANCE # # P=$xiio/GAUSS.8110 # # R=$xw1/PAYS.A$M.%04d$BLEUE # # $formatI\n" # # ,dx,dy,n-1,n,n,n # # ); # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.A$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # Cette sequence a ete regeneree ci-apres en : # # # # xivPdf 7 2 / 001158_001285 # # # # car, en effet, ci-dessus '$xci/interpole.02$X' devrait utiliser '$xT/GAUSS' et non pas # # '$xiio/GAUSS.8110'... # sequence 001158_001285 # Generee par : # # # # Std # # # # #define N0 1 # # #define N 128 # # main() # # { # # double dx,dy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # dx = 0.5; # # dy = 0.5 + ((0.5*(float)n)/(float)N); # # printf("$xci/gauss$X Tx=%g Ty=%g # # R=$xT/GAUSS # # $formatI\n # # $xci/vitre.52$Z $xT/GAUSS # # $xiP/orange.01 # # $xiirf/PAYS.17.001 # # $xiP/sunset.04 # # $xT/PAYSAGE\n # # $xci/filtre.01$X A=$xT/PAYSAGE$ROUGE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$ROUGE # # $formatI\n # # $xci/filtre.01$X A=$xT/PAYSAGE$VERTE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$VERTE # # $formatI\n # # $xci/filtre.01$X A=$xT/PAYSAGE$BLEUE # # N=$xiio/GAUSS.8110 # # R=$xT/PAYSAGE$Fi$BLEUE # # $formatI\n # # $xci/scale$X A=$xT/PAYSAGE$Fi$BLEUE # # a=0.3 # # R=$xT/PAYSAGE$Fi$BLEUE # # $formatI\n # # $xci/transpose$X A=$xiio/MIRE # # $formatI | # # $xci/Sx$X # # $formatI | # # $xci/multi_02.01$X A1=$xiff/NUAGES$N.3%04d # # $formatI | # # $xci/scale$X a=0.85 # # $formatI | # # $xci/vraies_C$X p=$xiP/orange.01 # # RR=$xT/NUAGES$ROUGE # # RV=$xT/NUAGES$VERTE # # RB=$xT/NUAGES$BLEUE # # $formatI\n # # $xci/vitre.53$Z $xT/PAYSAGE$Fi # # $xT/NUAGES # # $xT/PAYS.A$M\n # # $xci/luminance.01$X AR=$xT/PAYS.A$M$ROUGE # # AV=$xT/PAYS.A$M$VERTE # # AB=$xT/PAYS.A$M$BLEUE # # R=$xT/LUMINANCE # # $formatI\n # # $xci/interpole.02$X A1=$xT/PAYS.A$M$ROUGE # # A2=$xT/LUMINANCE # # P=$xT/GAUSS # # R=$xw1/PAYS.A$M.%04d$ROUGE # # $formatI\n # # $xci/interpole.02$X A1=$xT/PAYS.A$M$VERTE # # A2=$xT/LUMINANCE # # P=$xT/GAUSS # # R=$xw1/PAYS.A$M.%04d$VERTE # # $formatI\n # # $xci/interpole.02$X A1=$xT/PAYS.A$M$BLEUE # # A2=$xT/LUMINANCE # # P=$xT/GAUSS # # R=$xw1/PAYS.A$M.%04d$BLEUE # # $formatI\n" # # ,dx,dy,n-1,n,n,n # # ); # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.A$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # sequence 001286_001413 # Generee par : # # # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$xci/complement$X \ # # A=$xw1/PAYS.A$M.%04d$ROUGE \ # # R=$xw1/PAYS.B$M.%04d$ROUGE \ # # $formatI' # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$xci/complement$X \ # # A=$xw1/PAYS.A$M.%04d$VERTE \ # # R=$xw1/PAYS.B$M.%04d$VERTE \ # # $formatI' # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$xci/complement$X \ # # A=$xw1/PAYS.A$M.%04d$BLEUE \ # # R=$xw1/PAYS.B$M.%04d$BLEUE \ # # $formatI' # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.B$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # sequence 001414_001541 # Generee par : # # # # Std # # # # $xci/disk_video_P$Z $xiff/NUAGES$N.3 0 127 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # sequence 001542_001669 # Generee par : # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.A$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # sequence 001670_001797 # Sequence identique a : # # # # xivPdf 2 2 / 004064_004191 # # # # mais generee par : # # # # Std # # # # $xci/disk_video_P$Z $xiff/PAYSAGE.4 0 127 $xiP/paysages.67 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # sequence 001798_001925 # Sequence identique a : # # # # xivPdf 7 2 / 001286_001413 # # # # mais generee par : # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.B$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # sequence 001926_002053 sequence 002054_002181 # Generee par : # # # # Std # # # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/vraies_C$X \ # # A=$xiff/PAYSAGE.4%04d \ # # p=$xiP/paysages.67 \ # # RR=$xw1/PAYS.C%04d$ROUGE \ # # RV=$xw1/PAYS.C%04d$VERTE \ # # RB=$xw1/PAYS.C%04d$BLEUE \ # # $formatI' # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/convol.05$X \ # # A=$xw1/PAYS.C%04d$ROUGE \ # # seuil=64 \ # # R=$xw1/PAYS.D%04d$ROUGE \ # # $formatI ; # # $xci/convol.05$X \ # # A=$xw1/PAYS.C%04d$VERTE \ # # seuil=64 \ # # R=$xw1/PAYS.D%04d$VERTE \ # # $formatI ; # # $xci/convol.05$X \ # # A=$xw1/PAYS.C%04d$BLEUE \ # # seuil=64 \ # # R=$xw1/PAYS.D%04d$BLEUE \ # # $formatI' # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/anti_alia.11$Z \ # # $xw1/PAYS.C%04d \ # # $xw1/PAYS.E%04d \ # # $xw1/PAYS.C%04d \ # # 81 25 0.2' # # # # Std # # # # $xci/disk_video_P$Z $xw1/PAYS.D 0 127 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz VRAI # # $xci/disk_video_P$Z $xw1/PAYS.E 0 127 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz VRAI # # # sequence 002182_002309 sequence 002310_002437 sequence 002438_002565 sequence 002566_002693 sequence 002694_002821 # Generee par : # # # # Std # # # # $xci/filtre.01$X A=$xiirf/PAYS.17.001 \ # # N=$xiio/GAUSS.8110 \ # # $formatI | # # $xci/format.01$X $formatR_Pal methode=2 \ # # R=$xT/PAYS.11 \ # # $formatI # # # # $xci/substitue$X A=$xiio/MIRE \ # # p=$xiP/abso.11 substitution=L_SUBSTITUTION_ROUGE \ # # $formatI | # # $xci/complement$X \ # # $formatI | # # $xci/transpose$X \ # # R=$xT/PAYS.15 \ # # $formatI # # # # Std # # # # #define N0 1 # # #define N 128 # # main() # # { # # double dx,dy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # dx = 0.5; # # dy = 0.6 + ((0.5*(float)n)/(float)N); # # printf("Pal\n # # $xci/gauss$X Tx=%g Ty=%g # # R=$xT/GAUSS # # $formatI\n # # $xci/vitre.52$Z $xT/GAUSS $xiP/orange.01 # # $xT/PAYS.11 $xiP/sunset.05 # # $xT/PAYS.12\n # # Std\n # # $xci/multi_02.01$X A1=$xT/PAYS.15 # # A2=$xiff/NUAGES$N.3%04d # # $formatI | # # $xci/affine.01$X myy=0.4 # # $formatI | # # $xci/move$X yR=0.3 # # $formatI | # # $xci/format.01$X $formatR_Pal methode=2 # # R=$xT/PAYS.13 # # $formatI\n # # # # Pal\n # # # # $xci/vraies_C$X A=$xT/PAYS.13 # # p=$xiP/gris.01 RVB=VRAI # # R=$xT/PAYS.13 # # $formatI\n # # $xci/vitre.53$Z $xT/PAYS.12 # # $xT/PAYS.13 # # $xiim/PAYS.F.%04d\n" # # ,dx,dy,n,n # # ); # # } # # } # # # # Pal # # # # $xci/disk_video_P$Z $xiim/PAYS.F. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$CP $xiim/PAYS.F.%04d$ROUGE \ # # $xiim/PAYS.F$ROUGE.%04d' # # $xci/genere$X premiere=1 derniere=128 pas=1 \ # # C='$CP $xiim/PAYS.F.%04d$VERTE \ # # $xiim/PAYS.F$VERTE.%04d' # # # # $xci/disk_video_P$Z $xiim/PAYS.F$ROUGE. 1 128 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xiim/PAYS.F$ROUGE. 1 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xiim/PAYS.F$VERTE. 1 128 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xiim/PAYS.F$VERTE. 1 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # sequence 002822_002949 # Generee par : # # # # Std # # # # $xci/vraies_C.01$X A=$xiff/PAYSAGE.4 \ # # premiere=0 derniere=127 \ # # p=$xiP/paysages.67 RVB=VRAI \ # # R=$xT/PAYS.1. \ # # $formatI # # # # Std # # # # #define N0 0 # # #define N 127 # # #define PAQUET 8 # # # # main() # # { # # int n; # # # # for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) # # { # # printf("$CP $xT/PAYS.1.%04d$ROUGE # # $xT/PAYS.1.%04d$ROUGE\n" # # ,N0+(n-N)-1,n # # ); # # printf("$CP $xT/PAYS.1.%04d$VERTE # # $xT/PAYS.1.%04d$VERTE\n" # # ,N0+(n-N)-1,n # # ); # # printf("$CP $xT/PAYS.1.%04d$BLEUE # # $xT/PAYS.1.%04d$BLEUE\n" # # ,N0+(n-N)-1,n # # ); # # } # # # # for (n=N0 ; n<=N ; n++) # # { # # int np=n+PAQUET-1; # # # # printf("$xci/accumule.01$X A=$xT/PAYS.1. # # postfixe=$ROUGE # # premiere=%d derniere=%d # # R=$xT/PAYS.2.%04d$ROUGE # # $formatI\n" # # ,n,np,n # # ); # # printf("$xci/accumule.01$X A=$xT/PAYS.1. # # postfixe=$VERTE # # premiere=%d derniere=%d # # R=$xT/PAYS.2.%04d$VERTE # # $formatI\n" # # ,n,np,n # # ); # # printf("$xci/accumule.01$X A=$xT/PAYS.1. # # postfixe=$BLEUE # # premiere=%d derniere=%d # # R=$xT/PAYS.2.%04d$BLEUE # # $formatI\n" # # ,n,np,n # # ); # # } # # } # # # # Std # # # # $xci/disk_video_P$Z $xT/PAYS.2. 0 127 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # Cette sequence a ete reenregistree en : # # # # xivPdf 7 2 / 007620_008643 # # # # afin de bien montrer la periodicite... # ####################################################################################################################################### # # # 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 002950_002965 # Generee par : # # # # Std # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/fract_2D.01$X \ # # standard=VRAI \ # # niveau=%04d \ # # R=$xw1/FRA2.1.%04d \ # # $formatI' # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.1. 1 16 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 002966_002981 sequence 002982_002997 # Generee par : # # # # Std # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/fract_2D.01$X \ # # standard=FAUX \ # # niveau=%04d \ # # R=$xw1/FRA2.2.%04d \ # # $formatI' # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.2.%04d \ # # standard=FAUX \ # # T=$xiio/BLANC \ # # avion=FAUX \ # # R=$xw1/FRA2.2$M.%04d \ # # $formatI' # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.2.%04d \ # # standard=FAUX \ # # T=$xiio/BLANC \ # # avion=VRAI \ # # R=$xw1/FRA2.2$m.%04d \ # # $formatI' # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.2$M. 1 16 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.2$m. 1 16 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 002998_003125 sequence 003126_003253 sequence 003254_003381 sequence 003382_003509 sequence 003510_003637 sequence 003638_003698 sequence 003699_003826 # Generee par : # # # # Pal # # # # #define N0 1 # # #define N 128 # # #define Emin 1.0 # # #define Emax 4.0 # # main() # # { # # double fx,fy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # fx = ((Emax*(n-N0))+(Emin*(N-n)))/(N-N0); # # fy = ((Emax*(n-N0))+(Emin*(N-n)))/(N-N0); # # printf("$xci/fract_2D.01$X fx=%g fy=%g # # standard=FAUX # # R=$xT/CHAMP # # $formatI\n" # # ,fx,fy # # ); # # printf("$xci/acces$X A=$xT/CHAMP # # standard=FAUX # # zero=FAUX # # R=$xw1/FRA2.3.%04d # # $formatI\n" # # ,n # # ); # # printf("$xci/init$X n=$BLANC # # $formatI | # # $xci/montagne.01$X A=$xT/CHAMP # # standard=FAUX # # avion=FAUX # # R=$xw1/FRA2.3$M.%04d # # $formatI\n" # # ,n # # ); # # printf("$xci/init$X n=$BLANC # # $formatI | # # $xci/montagne.01$X A=$xT/CHAMP # # standard=FAUX # # avion=VRAI # # R=$xw1/FRA2.3$m.%04d # # $formatI\n" # # ,n # # ); # # } # # } # # # # Pal # # # # $xci/disk_video_P$Z $xw1/FRA2.3. 1 128 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.3. 1 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.3. 1 128 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.3. 1 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.3$M. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.3$m. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, les especes de discontinuites que l'on observe a certains endroits, en # # particulier de la sequence '$xw1/FRA2.3.' sont fort probablement dues au fait que # # la renormalisation est faite pour champ fractal flottant genere, et ce independamment # # des autres... # # # # ATTENTION, les "barres" verticales qui apparaissent tres nettement en particulier dans # # la sequence '$xw1/FRA2.3$M.' dont dues tres certainement au fait que l'option : # # # # niveau=... # # # # n'avait ete utilisee ci-dessus dans '$xci/fract_2D.01$X'. # # # # ATTENTION, le dernier enregistrement a du etre repris integralement a cause du fameux # # probleme relatif au 'vswap', et donnant le message : # # # # WARNING: Frame transfer aborted: analog video input not locked # # # # Notons que le probleme s'est alors complique avec l'introduction de '$X_SHM'... # sequence 003827_003842 sequence 003843_003858 sequence 003859_003874 # Generee par : # # # # Std # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/fract_2D.01$X \ # # standard=FAUX \ # # niveau=%04d \ # # PX=0.7 PY=0.7 \ # # R=$xw1/FRA2.5.%04d \ # # $formatI' # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/acces$X \ # # A=$xw1/FRA2.5.%04d \ # # standard=FAUX \ # # renormaliser=VRAI \ # # zero=FAUX \ # # R=$xw1/FRA2.6.%04d \ # # $formatI' # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.5.%04d \ # # standard=FAUX \ # # T=$xiio/BLANC \ # # avion=FAUX \ # # R=$xw1/FRA2.6$M.%04d \ # # $formatI' # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.5.%04d \ # # standard=FAUX \ # # T=$xiio/BLANC \ # # avion=VRAI \ # # R=$xw1/FRA2.6$m.%04d \ # # $formatI' # # # # $xci/reduction_16$X A=$xw1/FRA2.6. premiere=1 pas=1 \ # # R=$xiaf/FRA2.31$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.6$M. premiere=1 pas=1 \ # # R=$xiaf/FRA2.31$M$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.6$m. premiere=1 pas=1 \ # # R=$xiaf/FRA2.31$m$R16 \ # # $formatI # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.6. 1 16 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.6$M. 1 16 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.6$m. 1 16 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 003875_003890 sequence 003891_003906 sequence 003907_003922 sequence 003923_003938 sequence 003939_003954 # Generee par : # # # # Std # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/fract_2D.01$X \ # # standard=FAUX \ # # niveau=%04d \ # # PX=0.7 PY=0.7 \ # # R=$xw1/FRA2.7.%04d \ # # $formatI' # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/acces$X \ # # A=$xw1/FRA2.7.%04d \ # # standard=FAUX \ # # renormaliser=VRAI \ # # zero=FAUX \ # # R=$xw1/FRA2.8.%04d \ # # $formatI' # # # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.7.%04d \ # # standard=FAUX \ # # T=$xiio/BLANC \ # # avion=FAUX \ # # R=$xw1/FRA2.8$M.%04d \ # # $formatI' # # $xci/genere$X premiere=1 derniere=16 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.7.%04d \ # # standard=FAUX \ # # T=$xiio/BLANC \ # # avion=VRAI \ # # R=$xw1/FRA2.8$m.%04d \ # # $formatI' # # # # $xci/reduction_16$X A=$xw1/FRA2.8. premiere=1 pas=1 \ # # R=$xiaf/FRA2.31$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.8$M. premiere=1 pas=1 \ # # R=$xiaf/FRA2.31$M$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.8$m. premiere=1 pas=1 \ # # R=$xiaf/FRA2.31$m$R16 \ # # $formatI # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.8. 1 16 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.8. 1 16 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.8. 1 16 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.8$M. 1 16 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.8$m. 1 16 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 003955_004082 sequence 004083_004210 sequence 004211_004338 sequence 004339_004466 sequence 004467_004594 sequence 004595_004722 # Generee par : # # # # Pal # # # # #define N0 1 # # #define N 128 # # #define Emin 1.0 # # #define Emax 4.0 # # main() # # { # # double fx,fy; # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # fx = ((Emax*(n-N0))+(Emin*(N-n)))/(N-N0); # # fy = ((Emax*(n-N0))+(Emin*(N-n)))/(N-N0); # # printf("$xci/fract_2D.01$X fx=%g fy=%g # # niveau=64 # # standard=FAUX # # R=$xT/CHAMP # # $formatI\n" # # ,fx,fy # # ); # # printf("$xci/acces$X A=$xT/CHAMP # # standard=FAUX # # zero=FAUX # # R=$xw1/FRA2.9.%04d # # $formatI\n" # # ,n # # ); # # printf("$xci/init$X n=$BLANC # # $formatI | # # $xci/montagne.01$X A=$xT/CHAMP # # standard=FAUX # # avion=FAUX # # R=$xw1/FRA2.9$M.%04d # # $formatI\n" # # ,n # # ); # # printf("$xci/init$X n=$BLANC # # $formatI | # # $xci/montagne.01$X A=$xT/CHAMP # # standard=FAUX # # avion=VRAI # # R=$xw1/FRA2.9$m.%04d # # $formatI\n" # # ,n # # ); # # } # # } # # # # # # Pal # # # # $xci/reduction_16$X A=$xw1/FRA2.9. premiere=1 pas=8 \ # # R=$xiaf/FRA2.41$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.9$M. premiere=1 pas=8 \ # # R=$xiaf/FRA2.41$M$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.9$m. premiere=1 pas=8 \ # # R=$xiaf/FRA2.41$m$R16 \ # # $formatI # # # # $xci/reduction_64$X A=$xw1/FRA2.9. premiere=1 pas=2 \ # # R=$xiaf/FRA2.41$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.9$M. premiere=1 pas=2 \ # # R=$xiaf/FRA2.41$M$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.9$m. premiere=1 pas=2 \ # # R=$xiaf/FRA2.41$m$R64 \ # # $formatI # # # # Pal # # # # $xci/disk_video_P$Z $xw1/FRA2.9. 1 128 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.9. 1 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.9. 1 128 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.9. 1 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.9$M. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.9$m. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # ATTENTION, les images '$xw1/FRA2.9.0001' et '$xw1/FRA2.9.0128' sont tres differentes # # visuellement (de meme que les 'images '$M' et '$m' associees) ; la premiere est assez # # "rugueuse", alors que la seconde est beaucoup plus "lisse". Ce phenomene vient du fait # # qu'il faudrait faire varier simultanement la ponderation "ponder=", par exemple, de sa # # valeur implicite de 0.9 a une valeur plus importante du type 1.0, et ce lorsque les # # facteurs d'echelle augmentent... # sequence 004723_004850 sequence 004851_004978 sequence 004979_005106 sequence 005107_005234 sequence 005235_005362 sequence 005363_005490 # Generee par : # # # # Pal # # # # #define N0 1 # # #define N 128 # # main() # # { # # int n; # # for (n=N0 ; n<=N ; n++) # # { # # printf("$xci/accumule.01$X A=$xw1/FRA2.9. # # premiere=%d # # derniere=%d # # modulo=%d # # attenuation=0 # # R=$xw1/FRA2.A.%04d # # $formatI\n" # # ,N0,N,n-N0,n # # ); # # printf("$xci/init$X n=$BLANC # # $formatI | # # $xci/montagne.01$X A=$xw1/FRA2.A.%04d # # standard=VRAI # # avion=FAUX # # R=$xw1/FRA2.A$M.%04d # # $formatI\n" # # ,n,n # # ); # # printf("$xci/init$X n=$BLANC # # $formatI | # # $xci/montagne.01$X A=$xw1/FRA2.A.%04d # # standard=VRAI # # avion=VRAI # # R=$xw1/FRA2.A$m.%04d # # $formatI\n" # # ,n,n # # ); # # } # # } # # # # # # Pal # # # # $xci/reduction_16$X A=$xw1/FRA2.A. premiere=1 pas=8 \ # # R=$xiaf/FRA2.51$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.A$M. premiere=1 pas=8 \ # # R=$xiaf/FRA2.51$M$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.A$m. premiere=1 pas=8 \ # # R=$xiaf/FRA2.51$m$R16 \ # # $formatI # # # # $xci/reduction_64$X A=$xw1/FRA2.A. premiere=1 pas=2 \ # # R=$xiaf/FRA2.51$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.A$M. premiere=1 pas=2 \ # # R=$xiaf/FRA2.51$M$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.A$m. premiere=1 pas=2 \ # # R=$xiaf/FRA2.51$m$R64 \ # # $formatI # # # # Pal # # # # $xci/disk_video_P$Z $xw1/FRA2.A. 1 128 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.A. 1 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.A. 1 128 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.A. 1 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.A$M. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.A$m. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # sequence 005491_005618 sequence 005619_005746 sequence 005747_005874 sequence 005875_006002 # Generee (sur '$LACT27') par : # # # # Std # # # # $xrf/nuages.03$X \ # # niveau=1 \ # # R=$xw1/FRA2.B. \ # # $formatI # # # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.B.%04d \ # # T=$xiio/BLANC \ # # avion=FAUX \ # # R=$xw1/FRA2.B$M.%04d \ # # $formatI' # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.B.%04d \ # # T=$xiio/BLANC \ # # avion=VRAI \ # # R=$xw1/FRA2.B$m.%04d \ # # $formatI' # # # # Std # # # # $xci/reduction_16$X A=$xw1/FRA2.B. premiere=0 pas=8 \ # # R=$xiaf/FRA2.61$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.B$M. premiere=0 pas=8 \ # # R=$xiaf/FRA2.61$M$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.B$m. premiere=0 pas=8 \ # # R=$xiaf/FRA2.61$m$R16 \ # # $formatI # # # # $xci/reduction_64$X A=$xw1/FRA2.B. premiere=0 pas=2 \ # # R=$xiaf/FRA2.61$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.B$M. premiere=0 pas=2 \ # # R=$xiaf/FRA2.61$M$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.B$m. premiere=0 pas=2 \ # # R=$xiaf/FRA2.61$m$R64 \ # # $formatI # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.B. 0 127 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.B. 0 127 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # $xci/disk_video_P$Z $xw1/FRA2.B$M. 0 127 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.B$m. 0 127 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 006003_006130 sequence 006131_006258 sequence 006259_006386 sequence 006387_006514 # Generee (sur '$LACT28') par : # # # # Std # # # # $xrf/nuages.04$X \ # # niveau=1 \ # # R=$xw1/FRA2.C. \ # # $formatI # # # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.C.%04d \ # # T=$xiio/BLANC \ # # avion=FAUX \ # # R=$xw1/FRA2.C$M.%04d \ # # $formatI' # # $xci/genere$X premiere=0 derniere=127 pas=1 \ # # C='$xci/montagne.01$X \ # # A=$xw1/FRA2.C.%04d \ # # T=$xiio/BLANC \ # # avion=VRAI \ # # R=$xw1/FRA2.C$m.%04d \ # # $formatI' # # # # Std # # # # $xci/reduction_16$X A=$xw1/FRA2.C. premiere=0 pas=8 \ # # R=$xiaf/FRA2.71$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.C$M. premiere=0 pas=8 \ # # R=$xiaf/FRA2.71$M$R16 \ # # $formatI # # $xci/reduction_16$X A=$xw1/FRA2.C$m. premiere=0 pas=8 \ # # R=$xiaf/FRA2.71$m$R16 \ # # $formatI # # # # $xci/reduction_64$X A=$xw1/FRA2.C. premiere=0 pas=2 \ # # R=$xiaf/FRA2.71$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.C$M. premiere=0 pas=2 \ # # R=$xiaf/FRA2.71$M$R64 \ # # $formatI # # $xci/reduction_64$X A=$xw1/FRA2.C$m. premiere=0 pas=2 \ # # R=$xiaf/FRA2.71$m$R64 \ # # $formatI # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.C. 0 127 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.C. 0 127 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # $xci/disk_video_P$Z $xw1/FRA2.C$M. 0 127 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.C$m. 0 127 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 006515_006531 sequence 006532_006548 sequence 006549_006565 sequence 006566_006582 sequence 006583_006599 sequence 006600_006616 # Generee (sur '$LACT28') par : # # # # On notera la chose suivante concernant la reduction des mailles. La fonction de reduction # # choisie est la suivante : # # # # i-1 # # maille(i) = maille(1).P # # # # or on veut un 'modulo' de 16, soit : # # # # maille(1) # # maille(16+1) = ----------- # # 16 # # # # or d'apres ce qui precede : # # # # 17-1 # # maille(17) = maille(1).P # # # # 16 # # maille(17) = maille(1).P # # # # d'ou : # # # # maille(1) 16 # # maille(17) = ----------- = maille(1).P # # 16 # # # # d'ou : # # # # 16 1 # # P = ---- # # 16 # # # # d'ou enfin la constante 'inverse' ci-dessous... # # # # # # $Z Std # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int n; # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/fract_2D.01$X # # $c standard=FAUX # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 # # $c PX=1 PY=1 PP=1 # # $c PXYP=%.17f # # $c f=%f # # $c premier=%d # # $c dernier=%d # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=FAUX # # $c R=$xT/CHAMP # # $c $formatI\n" # # $c ,inverse,(double)n,n,n+N-N0-1,N-N0 # # $c ); # # $c printf("$xci/acces$X A=$xT/CHAMP # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/FRA2.D.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=FAUX # # $c R=$xw1/FRA2.D$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=VRAI # # $c R=$xw1/FRA2.D$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Std # # # # $Z $xci/reduction_16.x A=$xw1/FRA2.D. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.81$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.D$M. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.81$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.D$m. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.81$m$R16 \ # # $Z $formatI # # # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.D. 1 17 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.D. 1 17 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.D. 1 17 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.D. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.D$M. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.D$m. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.81$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA2.81$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/FRA2.81$m$R16 $xiP/montagnes.01 rien # # # sequence 006617_006633 sequence 006634_006650 sequence 006651_006667 sequence 006668_006684 sequence 006685_006701 sequence 006702_006718 # Generee (sur '$LACT28') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Std # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int n; # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/fract_2D.01$X # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 # # $c PX=1 PY=1 PP=1 # # $c PXYP=%.17f # # $c f=%f # # $c premier=1 # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=FAUX # # $c R=$xT/CHAMP # # $c $formatI\n" # # $c ,inverse,(double)n,N-N0 # # $c ); # # $c printf("$xci/acces$X A=$xT/CHAMP # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/FRA2.E.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=FAUX # # $c R=$xw1/FRA2.E$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=VRAI # # $c R=$xw1/FRA2.E$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Std # # # # $Z $xci/reduction_16.x A=$xw1/FRA2.E. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.82$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.E$M. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.82$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.E$m. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.82$m$R16 \ # # $Z $formatI # # # # # # Std # # # # $xci/disk_video_P$Z $xw1/FRA2.E. 1 17 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.E. 1 17 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.E. 1 17 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.E. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.E$M. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.E$m. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.82$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA2.82$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/FRA2.82$m$R16 $xiP/montagnes.01 rien # # # sequence 006719_006735 sequence 006736_006752 sequence 006753_006769 sequence 006770_006786 sequence 006787_006803 # Generee (sur '$LACT28') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # $c #define Z0 0.0 # # $c #define Z1 1.0 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int nz; # # $c int n; # # # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c double z=((Z1*(nz-nZ0))+(Z0*(nZ-nz)))/(nZ-nZ0); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/fract_3D.01$X # # $c z=%f # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 mz=0.4 # # $c PX=1 PY=1 PZ=1 PP=1 # # $c PXYZP=%.17f # # $c f=%f # # $c premier=1 # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=VRAI # # $c R=$xT/FRA2.%04d.%04d # # $c $formatI\n" # # $c ,z,inverse,(double)n,N-N0,n,nz # # $c ); # # $c } # # $c } # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/accumule.01$X A=$xT/FRA2.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=0.0 # # $c R=$xw1/FRA3.1.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xT/FRA2.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c R=$xw1/FRA3.2.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRA2.%04d. # # $c premiere=%d # # $c derniere=%d # # $c R=$xw1/FRA3.3.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # $c } # # # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.1. $xiaf/FRA3.11.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.2. $xiaf/FRA3.11.1$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.3. $xiaf/FRA3.12$R16 1 1 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.1. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.1. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.2. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.3. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.2. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.11.0$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA3.11.1$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/FRA3.12$R16 $xiP/gris.01 rien # # # # ATTENTION, cette sequence a ete generee sur '$LACT28' avec : # # # # Zmin=0 # # Zmax=511 # # # # et a donc ete refaite ci-apres... # sequence 006804_006820 sequence 006821_006837 sequence 006838_006854 sequence 006855_006871 sequence 006872_006888 # Generee (sur '$LACT28') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # $c #define Z0 0.0 # # $c #define Z1 1.0 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int nz; # # $c int n; # # # # $c printf("set Zmin=`$xcg/MIN2.01$X n1=$Xmin n2=$Ymin`\n" # # $c ); # # $c printf("set Zmax=`$xcg/MAX2.01$X n1=$Xmax n2=$Ymax`\n" # # $c ); # # # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c double z=((Z1*(nz-nZ0))+(Z0*(nZ-nz)))/(nZ-nZ0); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/fract_3D.01$X # # $c z=%f # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 mz=0.4 # # $c PX=1 PY=1 PZ=1 PP=1 # # $c PXYZP=%.17f # # $c f=%f # # $c premier=1 # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=VRAI # # $c R=$xT/FRA2.%04d.%04d # # $c $formatI # # $c Zmin=$Zmin # # $c Zmax=$Zmax\n" # # $c ,z,inverse,(double)n,N-N0,n,nz # # $c ); # # $c } # # $c } # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/accumule.01$X A=$xT/FRA2.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=0.0 # # $c R=$xw1/FRA3.4.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xT/FRA2.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c R=$xw1/FRA3.5.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRA2.%04d. # # $c premiere=%d # # $c derniere=%d # # $c R=$xw1/FRA3.6.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # $c } # # # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.4. $xiaf/FRA3.21.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.5. $xiaf/FRA3.21.1$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.6. $xiaf/FRA3.22$R16 1 1 # # # # $Z ro $xiaf/FRA3.21.0$R16 # # $Z ro $xiaf/FRA3.21.1$R16 # # $Z ro $xiaf/FRA3.22$R16 # # # # $Z $xcg/unite$Z $xiaf/FRA3.21.0$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.21.1$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.22$R16 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.4. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.4. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.5. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.5. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.6. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.21.0$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA3.21.1$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/FRA3.22$R16 $xiP/gris.01 rien # # # # ATTENTION, cette sequence a ete generee sur '$LACT28' avec : # # # # la coordonnee 'Z" non centree (alors que 'X' et 'Y' l'etaient) # # # # et a donc ete refaite ci-apres... # sequence 006889_006905 sequence 006906_006922 sequence 006923_006939 sequence 006940_006956 sequence 006957_006973 # Generee (sur '$LACT27') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # $c #define Z0 0.0 # # $c #define Z1 1.0 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int nz; # # $c int n; # # # # $c printf("set Zmin=`$xcg/MIN2.01$X n1=$Xmin n2=$Ymin`\n" # # $c ); # # $c printf("set Zmax=`$xcg/MAX2.01$X n1=$Xmax n2=$Ymax`\n" # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("if (`$xcg/parallele.01$X # # $c verrou=$xw1/FRA3.7.%04d` # # $c == $EXIST) then\nsaut\n" # # $c ,n # # $c ); # # # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c double z=((Z1*(nz-nZ0))+(Z0*(nZ-nz))) # # $c /(nZ-nZ0); # # $c printf("$xci/fract_3D.01$X # # $c z=%f # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 mz=0.4 # # $c PX=1 PY=1 PZ=1 PP=1 # # $c PXYZP=%.17f # # $c f=%f # # $c premier=1 # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=VRAI # # $c R=$xT/FRA3.%04d.%04d # # $c $formatI # # $c Zmin=$Zmin # # $c Zmax=$Zmax\n" # # $c ,z,inverse,(double)n,N-N0,n,nz # # $c ); # # $c } # # # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=0.0 # # $c R=$xw1/FRA3.7.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c R=$xw1/FRA3.8.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c R=$xw1/FRA3.9.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # # # $c printf("else\nendif\n" # # $c ); # # $c } # # $c } # # # # # # Suq # # # # $xci/regroupe_16$Z $xw1/FRA3.7. $xiaf/FRA3.31.0$R16 1 1 # # $xci/regroupe_16$Z $xw1/FRA3.8. $xiaf/FRA3.31.1$R16 1 1 # # $xci/regroupe_16$Z $xw1/FRA3.9. $xiaf/FRA3.32$R16 1 1 # # # # ro $xiaf/FRA3.31.0$R16 # # ro $xiaf/FRA3.31.1$R16 # # ro $xiaf/FRA3.32$R16 # # # # $xcg/unite$Z $xiaf/FRA3.31.0$R16 # # $xcg/unite$Z $xiaf/FRA3.31.1$R16 # # $xcg/unite$Z $xiaf/FRA3.32$R16 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.7. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.7. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.8. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.8. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.9. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.31.0$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA3.31.1$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/FRA3.32$R16 $xiP/gris.01 rien # # # # ATTENTION, cette sequence a ete generee sur '$LACT27' avec : # # # # premier=1 # # # # et a donc ete refaite ci-apres avec "premier=n" ; voir donc : # # # # xivPdf 7 2 / 007076_007092 # # # # et les sequences qui suivent... # sequence 006974_006990 sequence 006991_007007 sequence 007008_007024 sequence 007025_007041 sequence 007042_007058 sequence 007059_007075 # Generee (sur '$LACT12') par : # # # # ATTENTION, cette sequence presente une legere barre verticale passant par l'origine, # # ce defaut venant d'un 'IFLT(...)' a la place d'un 'IFLE(...)' dans la fonction # # 'Fcalcul_d_un_noeud_relativement_au_centre(...)' de 'v $xiii/aleat.2.vE$FON$INUTILE' # # et a ete corrige avec la sequence : # # # # xivPdf 7 2 / 007178_007194 # # # # et les suivantes... # # # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Pal # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int n; # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/fract_2D.01$X # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 # # $c PX=1 PY=1 PP=1 # # $c PXYP=%.17f # # $c f=%f # # $c premier=%d # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=FAUX # # $c R=$xT/CHAMP # # $c $formatI\n" # # $c ,inverse,(double)n,n,N-N0 # # $c ); # # $c printf("$xci/acces$X A=$xT/CHAMP # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/FRA2.F.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=FAUX # # $c R=$xw1/FRA2.F$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=VRAI # # $c R=$xw1/FRA2.F$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16.x A=$xw1/FRA2.F. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.83$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.F$M. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.83$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.F$m. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.83$m$R16 \ # # $Z $formatI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/FRA2.F. 1 17 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.F. 1 17 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.F. 1 17 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.F. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.F$M. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.F$m. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.83$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA2.83$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/FRA2.83$m$R16 $xiP/montagnes.01 rien # # # sequence 007076_007092 sequence 007093_007109 sequence 007110_007126 sequence 007127_007143 sequence 007144_007160 sequence 007161_007177 # Generee (sur '$LACT27') par : # # # # ATTENTION, cette sequence presente de legeres anomalies sur les trois plans de coordonnees, # # ce defaut venant d'un 'IFLT(...)' a la place d'un 'IFLE(...)' dans la fonction # # 'Fcalcul_d_un_noeud_relativement_au_centre(...)' de 'v $xiii/aleat.2.vE$FON$INUTILE' # # et a ete corrige avec la sequence : # # # # xivPdf 7 2 / 007280_007296 # # # # et les suivantes... # # # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # $c #define Z0 0.0 # # $c #define Z1 1.0 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int nz; # # $c int n; # # # # $c printf("set Zmin=`$xcg/MIN2.01$X n1=$Xmin n2=$Ymin`\n" # # $c ); # # $c printf("set Zmax=`$xcg/MAX2.01$X n1=$Xmax n2=$Ymax`\n" # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c double z=((Z1*(nz-nZ0))+(Z0*(nZ-nz))) # # $c /(nZ-nZ0); # # $c printf("$xci/fract_3D.01$X # # $c z=%f # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 mz=0.4 # # $c PX=1 PY=1 PZ=1 PP=1 # # $c PXYZP=%.17f # # $c f=%f # # $c premier=%d # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=VRAI # # $c R=$xT/FRA3.%04d.%04d # # $c $formatI # # $c Zmin=$Zmin # # $c Zmax=$Zmax\n" # # $c ,z,inverse,(double)n,n,N-N0,n,nz # # $c ); # # $c } # # # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=0.0 # # $c R=$xw1/FRA3.A.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c R=$xw1/FRA3.B.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c R=$xw1/FRA3.C.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # $c } # # # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.A. $xiaf/FRA3.41.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.B. $xiaf/FRA3.41.1$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.C. $xiaf/FRA3.42$R16 1 1 # # # # $Z ro $xiaf/FRA3.41.0$R16 # # $Z ro $xiaf/FRA3.41.1$R16 # # $Z ro $xiaf/FRA3.42$R16 # # # # $Z $xcg/unite$Z $xiaf/FRA3.41.0$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.41.1$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.42$R16 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.A. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.A. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.B. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.B. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.C. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.C. 1 17 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.41.0$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA3.41.1$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/FRA3.42$R16 $xiP/fractal.11 rien # # record.01$Z $xiaf/FRA3.42$R16 $xiP/gris.01 rien # # # sequence 007178_007194 sequence 007195_007211 sequence 007212_007228 sequence 007229_007245 sequence 007246_007262 sequence 007263_007279 # Generee (sur '$LACT12') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Pal # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int n; # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/fract_2D.01$X # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 # # $c PX=1 PY=1 PP=1 # # $c PXYP=%.17f # # $c f=%f # # $c premier=%d # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=FAUX # # $c R=$xT/CHAMP # # $c $formatI\n" # # $c ,inverse,(double)n,n,N-N0 # # $c ); # # $c printf("$xci/acces$X A=$xT/CHAMP # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/FRA2.G.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=FAUX # # $c R=$xw1/FRA2.G$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/init$X n=$BLANC # # $c $formatI | # # $c $xci/montagne.01$X A=$xT/CHAMP # # $c standard=FAUX # # $c avion=VRAI # # $c R=$xw1/FRA2.G$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16.x A=$xw1/FRA2.G. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.84$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.G$M. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.84$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_16.x A=$xw1/FRA2.G$m. \ # # $Z premiere=1 pas=1 \ # # $Z R=$xiaf/FRA2.84$m$R16 \ # # $Z $formatI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/FRA2.G. 1 17 $xiP/cercle.34 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.G. 1 17 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.G. 1 17 $xiP/nuages.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.G. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.G$M. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # $xci/disk_video_P$Z $xw1/FRA2.G$m. 1 17 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages # # # # # # Pal # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.84$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA2.84$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/FRA2.84$m$R16 $xiP/montagnes.01 rien # # # sequence 007280_007296 sequence 007297_007313 sequence 007314_007330 sequence 007331_007347 sequence 007348_007364 sequence 007365_007381 # Generee (sur '$LACT27') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # $c #define Z0 0.0 # # $c #define Z1 1.0 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int nz; # # $c int n; # # # # $c printf("set Zmin=`$xcg/MIN2.01$X n1=$Xmin n2=$Ymin`\n" # # $c ); # # $c printf("set Zmax=`$xcg/MAX2.01$X n1=$Xmax n2=$Ymax`\n" # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c double z=((Z1*(nz-nZ0))+(Z0*(nZ-nz))) # # $c /(nZ-nZ0); # # $c printf("$xci/fract_3D.01$X # # $c z=%f # # $c composante_04=1 # # $c composante_11=0 # # $c mx=0.4 my=0.4 mz=0.4 # # $c PX=1 PY=1 PZ=1 PP=1 # # $c PXYZP=%.17f # # $c f=%f # # $c premier=%d # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=VRAI # # $c R=$xT/FRA3.%04d.%04d # # $c $formatI # # $c Zmin=$Zmin # # $c Zmax=$Zmax\n" # # $c ,z,inverse,(double)n,n,N-N0,n,nz # # $c ); # # $c } # # # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=0.0 # # $c R=$xw1/FRA3.D.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c R=$xw1/FRA3.E.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c R=$xw1/FRA3.F.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # $c } # # # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.D. $xiaf/FRA3.51.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.E. $xiaf/FRA3.51.1$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.F. $xiaf/FRA3.52$R16 1 1 # # # # $Z ro $xiaf/FRA3.51.0$R16 # # $Z ro $xiaf/FRA3.51.1$R16 # # $Z ro $xiaf/FRA3.52$R16 # # # # $Z $xcg/unite$Z $xiaf/FRA3.51.0$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.51.1$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.52$R16 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.D. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.D. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.E. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.E. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.F. 1 17 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.F. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.51.0$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA3.51.1$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/FRA3.52$R16 $xiP/fractal.11 rien # # record.01$Z $xiaf/FRA3.52$R16 $xiP/gris.01 rien # # # sequence 007382_007398 sequence 007399_007415 sequence 007416_007432 sequence 007433_007449 # Generee (sur '$LACT27') par : # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c int main() # # $c { # # $c int nz; # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c printf("$xci/solarise.11$Z # # $c $xT/FRA3.%04d.%04d # # $c $xT/FRs3.%04d.%04d\n" # # $c ,n,nz,n,nz # # $c ); # # $c } # # # # $c printf("$xci/accumule.02$X A=$xT/FRs3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c seuil=$GRIS_1 # # $c binariser=FAUX # # $c R=$xw1/FRA3.G.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRs3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c seuil=$GRIS_1 # # $c binariser=FAUX # # $c trx=0 try=0 # # $c R=$xw1/FRA3.H.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # $c } # # # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.H. $xiaf/FRA3.53.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.G. $xiaf/FRA3.53.1$R16 1 1 # # # # $Z ro $xiaf/FRA3.53.0$R16 # # $Z ro $xiaf/FRA3.53.1$R16 # # # # $Z $xcg/unite$Z $xiaf/FRA3.53.0$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.53.1$R16 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.G. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.G. 1 17 $xiP/gris.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.H. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.H. 1 17 $xiP/gris.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.53.0$R16 $xiP/gris.01 Initialisation # # record.01$Z $xiaf/FRA3.53.0$R16 $xiP/gris.11 rien # # record.01$Z $xiaf/FRA3.53.1$R16 $xiP/gris.01 rien # # record.01$Z $xiaf/FRA3.53.1$R16 $xiP/gris.11 rien # # # sequence 007450_007466 sequence 007467_007483 sequence 007484_007500 sequence 007501_007517 sequence 007518_007534 sequence 007535_007551 sequence 007552_007568 sequence 007569_007585 sequence 007586_007602 sequence 007603_007619 # Generee (sur '$LACT27') par : # # # # Voir la sequence : # # # # xivPdf 7 2 / 006515_006531 # # # # pour le calcul de la constante 'inverse' ci-dessous... # # # # # # $Z Suq # # # # $c #define nZ0 1 # # $c #define nZ 128 # # $c #define Z0 0.0 # # $c #define Z1 1.0 # # # # $c #define N0 1 # # $c #define N 17 # # # # $c extern double pow(); # # # # $c int main() # # $c { # # $c double inverse=1.0/pow(1.0/(N-N0),1.0/(N-N0)); # # $c int nz; # # $c int n; # # # # $c printf("set Zmin=`$xcg/MIN2.01$X n1=$Xmin n2=$Ymin`\n" # # $c ); # # $c printf("set Zmax=`$xcg/MAX2.01$X n1=$Xmax n2=$Ymax`\n" # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c double z=((Z1*(nz-nZ0))+(Z0*(nZ-nz))) # # $c /(nZ-nZ0); # # $c printf("$xci/fract_3D.01$X # # $c z=%f # # $c composante_04=1 # # $c composante_11=0 # # $c OX=0.0 EX=1.0 # # $c OY=0.0 EY=1.0 # # $c OZ=0.0 EZ=1.0 # # $c mx=0.4 my=0.4 mz=0.4 # # $c valider=FAUX # # $c PX=1 PY=1 PZ=1 PP=1 # # $c PXYZP=%.17f # # $c f=%f # # $c premier=%d # # $c dernier=100 # # $c modulo=%d # # $c limite=0.01 # # $c petite=2 # # $c standard=VRAI # # $c R=$xT/FRA3.%04d.%04d # # $c $formatI # # $c Zmin=$Zmin # # $c Zmax=$Zmax\n" # # $c ,z,inverse,(double)n,n,N-N0,n,nz # # $c ); # # $c } # # # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=0.0 # # $c R=$xw1/FRA3.I.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c R=$xw1/FRA3.J.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRA3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c R=$xw1/FRA3.K.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c for (nz=nZ0 ; nz<=nZ ; nz++) # # $c { # # $c printf("$xci/solarise.11$Z # # $c $xT/FRA3.%04d.%04d # # $c $xT/FRs3.%04d.%04d\n" # # $c ,n,nz,n,nz # # $c ); # # $c } # # # # $c printf("$xci/accumule.02$X A=$xT/FRs3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c seuil=$GRIS_1 # # $c binariser=FAUX # # $c R=$xw1/FRA3.L.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c printf("$xci/accumule.02$X A=$xT/FRs3.%04d. # # $c premiere=%d # # $c derniere=%d # # $c seuil=$GRIS_1 # # $c binariser=FAUX # # $c trx=0 try=0 # # $c R=$xw1/FRA3.M.%04d # # $c $formatI\n" # # $c ,n,nZ0,nZ,n # # $c ); # # $c } # # $c } # # # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.I. $xiaf/FRA3.61.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.J. $xiaf/FRA3.61.1$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.K. $xiaf/FRA3.62$R16 1 1 # # # # $Z ro $xiaf/FRA3.61.0$R16 # # $Z ro $xiaf/FRA3.61.1$R16 # # $Z ro $xiaf/FRA3.62$R16 # # # # $Z $xcg/unite$Z $xiaf/FRA3.61.0$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.61.1$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.62$R16 # # # # $Z Suq # # # # $Z $xci/regroupe_16$Z $xw1/FRA3.M. $xiaf/FRA3.63.0$R16 1 1 # # $Z $xci/regroupe_16$Z $xw1/FRA3.L. $xiaf/FRA3.63.1$R16 1 1 # # # # $Z ro $xiaf/FRA3.63.0$R16 # # $Z ro $xiaf/FRA3.63.1$R16 # # # # $Z $xcg/unite$Z $xiaf/FRA3.63.0$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.63.1$R16 # # # # # # Suq # # # # $xci/disk_video_P$Z $xw1/FRA3.I. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.I. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.J. 1 17 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.J. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.K. 1 17 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.K. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # $xci/disk_video_P$Z $xw1/FRA3.L. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.L. 1 17 $xiP/gris.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.M. 1 17 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # $xci/disk_video_P$Z $xw1/FRA3.M. 1 17 $xiP/gris.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # # # Suq # # # # $CP $xw1/FRA3.L.???? $xiff/FRA3.L.???? # # # # # # xivPdf 3 2 # # # # Std # # # # record.01$Z $xiaf/FRA3.61.0$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/FRA3.61.1$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/FRA3.62$R16 $xiP/fractal.11 rien # # record.01$Z $xiaf/FRA3.62$R16 $xiP/gris.01 rien # # # # record.01$Z $xiaf/FRA3.63.0$R16 $xiP/gris.01 rien # # record.01$Z $xiaf/FRA3.63.0$R16 $xiP/gris.11 rien # # record.01$Z $xiaf/FRA3.63.1$R16 $xiP/gris.01 rien # # record.01$Z $xiaf/FRA3.63.1$R16 $xiP/gris.11 rien # # # sequence 007620_008643 # Generee par : # # # # Std # # # # $xci/disk_video_P$Z $xT/PAYS.2. 0 127 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_paysages VRAI # # # # Cette sequence est le resultat du reenregistrement 8 fois de la sequence : # # # # xivPdf 7 2 / 002822_002949 # # # # afin de bien montrer la periodicite... # sequence 008644_008899 # Generee (sur '$LACT28') par : # # # # # # ATTENTION, on notera que pour la montagne on utilise la texture seuillee (c'est-a-dire # # toute 'BLANC') '$xT/TEXTURE.12', alors que pour l'eau, on utilise la texture non seuillee # # (c'est-a-dire telle qu'elle a ete calculee) '$xT/TEXTURE.11', ce qui permet de simuler # # l'assombrissement de l'eau avec sa profondeur... # # # # # # $Z SET Nimages=256 # # $Z SET Noir=$NOIR # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z R=$xT/MONTAGNE \ # # $Z $formatI # # $Z Pal # # # # # # $c #define N0 1 # # $c #define N Nimages # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xT/TEXTURE.*\n"); # # # # $c printf("$xci/seuil$X A=$xT/MONTAGNE # # $c seuil=%d # # $c R=$xT/TEXTURE # # $c $formatI\n" # # $c ,Noir+n-N0 # # $c ); # # # # $c printf("$CP $xT/TEXTURE $xT/TEXTURE.12$ROUGE\n"); # # $c printf("$CP $xT/TEXTURE $xT/TEXTURE.12$VERTE\n"); # # $c printf("$CP $xT/TEXTURE $xT/TEXTURE.12$BLEUE\n"); # # # # $c printf("$xci/complement$X # # $c A=$xT/TEXTURE # # $c R=$xT/TEXTURE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/init$X # # $c niveau=$NOIR # # $c R=$xT/TEXTURE.11$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/and$X # # $c A1=$xT/TEXTURE # # $c A2=$xT/MONTAGNE # # $c $formatI | # # $c $xci/acces$X # # $c renormaliser=VRAI # # $c R=$xT/TEXTURE.11$BLEUE # # $c $formatI\n" # # $c ); # # $c printf("$xci/scale$X # # $c A=$xT/TEXTURE.11$BLEUE # # $c a=0.7 # # $c R=$xT/TEXTURE.11$VERTE # # $c $formatI\n" # # $c ); # # # # # # $c printf("$xci/or_02$X # # $c A1=$xT/TEXTURE.11$ROUGE # # $c A2=$xT/TEXTURE.12$ROUGE # # $c $formatI | # # $c $xci/montagne.01$X # # $c A=$xT/MONTAGNE # # $c avion=VRAI # # $c R=$xw1/ICE.1$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/or_02$X # # $c A1=$xT/TEXTURE.11$VERTE # # $c A2=$xT/TEXTURE.12$VERTE # # $c $formatI | # # $c $xci/montagne.01$X # # $c A=$xT/MONTAGNE # # $c avion=VRAI # # $c R=$xw1/ICE.1$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/or_02$X # # $c A1=$xT/TEXTURE.11$BLEUE # # $c A2=$xT/TEXTURE.12$BLEUE # # $c $formatI | # # $c $xci/montagne.01$X # # $c A=$xT/MONTAGNE # # $c avion=VRAI # # $c R=$xw1/ICE.1$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $DELETE $xT/TEXTURE.* # # # # $Z $xci/reduction_16$Z $xw1/ICE.1$m. $xiaf/ICEB.11 1 16 # # $Z $xci/reduction_64$Z $xw1/ICE.1$m. $xiaf/ICEB.11 1 4 # # # # $Z ro $xiaf/ICEB.11$R16$ROUGE # # $Z ro $xiaf/ICEB.11$R16$VERTE # # $Z ro $xiaf/ICEB.11$R16$BLEUE # # # # $Z ro $xiaf/ICEB.11$R64$ROUGE # # $Z ro $xiaf/ICEB.11$R64$VERTE # # $Z ro $xiaf/ICEB.11$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/ICEB.11$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/ICEB.11$R16$VERTE # # $Z $xcg/unite$Z $xiaf/ICEB.11$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/ICEB.11$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/ICEB.11$R64$VERTE # # $Z $xcg/unite$Z $xiaf/ICEB.11$R64$BLEUE # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ICE.1$m. 001 256 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/ICEB.11$R16 RVB Initialisation # # record.01$Z $xiaf/ICEB.11$R64 RVB rien # # # sequence 010308_010435 # Generee (sur '$LACT27') par : # # # # # # ATTENTION, on notera que le programme '$xrf/nuages.03$K' ne fonctionne plus correctement # # (le 1996061100) et qu'il est donc plus simple de proceder comme suit... # # # # # # :Debut_listG_NUAG_1: # # # # $Z SET Nimages=128 # # # # $Z Pal # # # # # # $c #define N0 1 # # $c #define N Nimages # # # # $c #define OX 0.0 # # $c #define EX 4.0 # # # # $c #define OY 0.0 # # $c #define EY 8.0 # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c #define mailleX 0.50 # # $c #define mailleY 0.25 # # $c #define mailleZ 0.50 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double trX=((EX*(n-N0))+(OX*(N-n)))/(N-N0); # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c mX=%.16f OX=%.16f EX=%.16f # # $c mY=%.16f OY=%.16f EY=%.16f # # $c mZ=%.16f OZ=%.16f EZ=%.16f # # $c trX=%.16f # # $c Z=%.16f # # $c R=$xw1/NUAG.1.%04d # # $c $formatI\n" # # $c ,mailleX,OX,EX # # $c ,mailleY,OY,EY # # $c ,mailleZ,OZ,EZ # # $c ,trX # # $c ,Z # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.1. premiere=1 pas=8 \ # # $Z R=$xiaf/NUAG.11$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.1. premiere=1 pas=2 \ # # $Z R=$xiaf/NUAG.11$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.11$R16 # # $Z ro $xiaf/NUAG.11$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.11$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.11$R64 # # # # :Fin_listG_NUAG_1: # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.1. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.11$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/NUAG.11$R64 $xiP/nuages.02 rien # # # # ATTENTION, l'enregistrement de '$xw1/NUAG.1.' a ete oublie ; il a donc ete fait apres # # la serie suivante, c'est-a-dire apres celui de '$xw1/PA.4$M.'... # sequence 008900_009027 sequence 009028_009155 sequence 009156_009283 sequence 009284_009411 sequence 009412_009539 sequence 009540_009667 sequence 009668_009795 sequence 009796_009923 sequence 009924_010051 sequence 010052_010179 sequence 010180_010307 # Generee (sur '$LACT28') par : # # # # # # $Z SET Nimages=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z graine=1234 \ # # $Z R=$xT/ALTITUDE \ # # $Z $formatI # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $Z $formatI # # # # $c #define N0 1 # # $c #define N Nimages # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/substitue$X # # $c Attendre=VRAI # # $c Bloquer=VRAI # # $c A=$xw1/NUAG.1.%04d # # $c substitution=L_SUBSTITUTION_ROUGE # # $c p=$xiP/gris.02 # # $c R=$xT/INTERPOLATEUR # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xT/ALTITUDE # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xT/MONTAGNE # # $c $formatI\n" # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xw1/NUAG.1.%04d # # $c A2=$xT/MONTAGNE # # $c P=$xT/INTERPOLATEUR # # $c R=$xw1/PA.3$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # # # $c printf("$xci/Sx$X # # $c A=$xw1/NUAG.1.%04d # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/nuages.02 # # $c RVB=VRAI # # $c R=$xT/BACKGROUND # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/ALTITUDE # # $c T=$xT/TEXTURE # # $c fond=VRAI # # $c F=$xT/BACKGROUND$ROUGE # # $c avion=FAUX # # $c R=$xT/MONTAGNE$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/ALTITUDE # # $c T=$xT/TEXTURE # # $c fond=VRAI # # $c F=$xT/BACKGROUND$VERTE # # $c avion=FAUX # # $c R=$xT/MONTAGNE$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/ALTITUDE # # $c T=$xT/TEXTURE # # $c fond=VRAI # # $c F=$xT/BACKGROUND$BLEUE # # $c avion=FAUX # # $c R=$xT/MONTAGNE$BLEUE # # $c $formatI\n" # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xw1/NUAG.1.%04d # # $c A2=$xT/MONTAGNE$ROUGE # # $c P=$xT/INTERPOLATEUR # # $c R=$xw1/PA.3$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xw1/NUAG.1.%04d # # $c A2=$xT/MONTAGNE$VERTE # # $c P=$xT/INTERPOLATEUR # # $c R=$xw1/PA.3$M.%04d$VERTE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xw1/NUAG.1.%04d # # $c A2=$xT/MONTAGNE$BLEUE # # $c P=$xT/INTERPOLATEUR # # $c R=$xw1/PA.3$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xw1/PA.4$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE # # $c avion=FAUX # # $c R=$xw1/PA.4$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xw1/NUAG.1.%04d # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xT/TEXTURE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE$ROUGE # # $c avion=VRAI # # $c R=$xw1/PA.4$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE$VERTE # # $c avion=VRAI # # $c R=$xw1/PA.4$m.%04d$VERTE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE$BLEUE # # $c avion=VRAI # # $c R=$xw1/PA.4$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE$ROUGE # # $c avion=FAUX # # $c R=$xw1/PA.4$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE$VERTE # # $c avion=FAUX # # $c R=$xw1/PA.4$M.%04d$VERTE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.1.%04d # # $c T=$xT/TEXTURE$BLEUE # # $c avion=FAUX # # $c R=$xw1/PA.4$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/PA.3$m. premiere=1 pas=8 \ # # $Z R=$xiaf/PAYS.61$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PA.3$m. premiere=1 pas=2 \ # # $Z R=$xiaf/PAYS.61$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.61$m$R16 # # $Z ro $xiaf/PAYS.61$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.61$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.61$m$R64 # # # # $Z $xci/reduction_16$Z $xw1/PA.3$M. $xiaf/PAYS.61$M 1 8 # # $Z $xci/reduction_64$Z $xw1/PA.3$M. $xiaf/PAYS.61$M 1 2 # # # # $Z ro $xiaf/PAYS.61$M$R16$ROUGE # # $Z ro $xiaf/PAYS.61$M$R16$VERTE # # $Z ro $xiaf/PAYS.61$M$R16$BLEUE # # # # $Z ro $xiaf/PAYS.61$M$R64$ROUGE # # $Z ro $xiaf/PAYS.61$M$R64$VERTE # # $Z ro $xiaf/PAYS.61$M$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/PAYS.61$M$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/PAYS.61$M$R16$VERTE # # $Z $xcg/unite$Z $xiaf/PAYS.61$M$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/PAYS.61$M$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/PAYS.61$M$R64$VERTE # # $Z $xcg/unite$Z $xiaf/PAYS.61$M$R64$BLEUE # # # # # # $Z $xci/reduction_16$X A=$xw1/PA.4$m. premiere=1 pas=8 \ # # $Z R=$xiaf/PAYS.62$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PA.4$m. premiere=1 pas=2 \ # # $Z R=$xiaf/PAYS.62$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.62$m$R16 # # $Z ro $xiaf/PAYS.62$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/PA.4$M. premiere=1 pas=8 \ # # $Z R=$xiaf/PAYS.62$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PA.4$M. premiere=1 pas=2 \ # # $Z R=$xiaf/PAYS.62$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.62$M$R16 # # $Z ro $xiaf/PAYS.62$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R64 # # # # # # $Z $xci/reduction_16$Z $xw1/PA.4$m. $xiaf/PAYS.62$m 1 8 # # $Z $xci/reduction_64$Z $xw1/PA.4$m. $xiaf/PAYS.62$m 1 2 # # # # $Z ro $xiaf/PAYS.62$m$R16$ROUGE # # $Z ro $xiaf/PAYS.62$m$R16$VERTE # # $Z ro $xiaf/PAYS.62$m$R16$BLEUE # # # # $Z ro $xiaf/PAYS.62$m$R64$ROUGE # # $Z ro $xiaf/PAYS.62$m$R64$VERTE # # $Z ro $xiaf/PAYS.62$m$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R16$VERTE # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R64$VERTE # # $Z $xcg/unite$Z $xiaf/PAYS.62$m$R64$BLEUE # # # # $Z $xci/reduction_16$Z $xw1/PA.4$M. $xiaf/PAYS.62$M 1 8 # # $Z $xci/reduction_64$Z $xw1/PA.4$M. $xiaf/PAYS.62$M 1 2 # # # # $Z ro $xiaf/PAYS.62$M$R16$ROUGE # # $Z ro $xiaf/PAYS.62$M$R16$VERTE # # $Z ro $xiaf/PAYS.62$M$R16$BLEUE # # # # $Z ro $xiaf/PAYS.62$M$R64$ROUGE # # $Z ro $xiaf/PAYS.62$M$R64$VERTE # # $Z ro $xiaf/PAYS.62$M$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R16$VERTE # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R64$VERTE # # $Z $xcg/unite$Z $xiaf/PAYS.62$M$R64$BLEUE # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/PA.3$m. 001 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.3$m. 001 128 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.3$M. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.3$M. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.3$M. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.3$M. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z "$xw1/PA.3$M. $ROUGE" 001 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # $xci/disk_video_P$Z $xw1/PA.4$m. 001 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.4$M. 001 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.4$m. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.4$M. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.61$m$R16 $xiP/fractal.91 Initialisation # # record.01$Z $xiaf/PAYS.61$m$R16 $xiP/gris.01 rien # # record.01$Z $xiaf/PAYS.61$m$R64 $xiP/fractal.91 rien # # record.01$Z $xiaf/PAYS.61$m$R64 $xiP/gris.01 rien # # # # record.01$Z $xiaf/PAYS.61$M$R16 RVB rien # # record.01$Z $xiaf/PAYS.61$M$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.62$m$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/PAYS.62$m$R64 $xiP/montagnes.01 rien # # # # record.01$Z $xiaf/PAYS.62$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/PAYS.62$M$R64 $xiP/montagnes.01 rien # # # # record.01$Z $xiaf/PAYS.62$m$R16 RVB rien # # record.01$Z $xiaf/PAYS.62$m$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.62$M$R16 RVB rien # # record.01$Z $xiaf/PAYS.62$M$R64 RVB rien # # # sequence 010436_010563 sequence 010564_010691 sequence 010692_010819 # Generee (sur '$LACT27') par : # # # # # # $Z SET Nimages=128 # # # # $Z Pal # # # # $Z $xci/convol.01$X \ # # $Z A=$xifc/MAND.1.0000 \ # # $Z points=961 \ # # $Z R=$xT/MANDEL \ # # $Z $formatI # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $Z $formatI # # # # $Z Pal # # # # # # $c #define N0 1 # # $c #define N Nimages # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xT/MANDEL # # $c A2=$xw1/NUAG.1.%04d # # $c R=$xw1/NUAG.2.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.2.%04d # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xw1/PA.5$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xw1/NUAG.2.%04d # # $c T=$xT/TEXTURE # # $c avion=FAUX # # $c R=$xw1/PA.5$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.2. premiere=1 pas=8 \ # # $Z R=$xiaf/NUAG.21$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.2. premiere=1 pas=2 \ # # $Z R=$xiaf/NUAG.21$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.21$R16 # # $Z ro $xiaf/NUAG.21$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.21$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.21$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/PA.5$m. premiere=1 pas=8 \ # # $Z R=$xiaf/PAYS.72$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PA.5$m. premiere=1 pas=2 \ # # $Z R=$xiaf/PAYS.72$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.72$m$R16 # # $Z ro $xiaf/PAYS.72$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.72$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.72$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/PA.5$M. premiere=1 pas=8 \ # # $Z R=$xiaf/PAYS.72$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PA.5$M. premiere=1 pas=2 \ # # $Z R=$xiaf/PAYS.72$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.72$M$R16 # # $Z ro $xiaf/PAYS.72$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.72$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.72$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.2. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.5$m. 001 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.5$M. 001 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.21$R16 $xiP/nuages.02 Initialisation # # record.01$Z $xiaf/NUAG.21$R64 $xiP/nuages.02 rien # # # # record.01$Z $xiaf/PAYS.72$m$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/PAYS.72$m$R64 $xiP/montagnes.01 rien # # # # record.01$Z $xiaf/PAYS.72$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/PAYS.72$M$R64 $xiP/montagnes.01 rien # # # sequence 010820_010947 # Generee (sur '$LACT27') par : # # # # # # $Z SET Nimages=128 # # # # $Z Pal # # # # # # $c #define N0 1 # # $c #define N Nimages # # # # $c int main() # # $c { # # $c int n; # # # # $c int n0=N0+0; # # $c int n1=N0+((1*N)/3); # # $c int n2=N0+((2*N)/3); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/vraies_C$X # # $c A=$xiff/NUAG.1.%04d # # $c p=$xiP/enfer.04 # # $c RVB=VRAI # # $c R=$xT/NUAGES.0 # # $c $formatI\n" # # $c ,n0 # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xiff/NUAG.1.%04d # # $c p=$xiP/nuages.02 # # $c RVB=VRAI # # $c R=$xT/NUAGES.1 # # $c $formatI\n" # # $c ,n1 # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/NUAGES.0$ROUGE # # $c A2=$xT/NUAGES.1$ROUGE # # $c P=$xiff/NUAG.1.%04d # # $c R=$xw1/CIEL.1.%04d$ROUGE # # $c $formatI\n" # # $c ,n2,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/NUAGES.0$VERTE # # $c A2=$xT/NUAGES.1$VERTE # # $c P=$xiff/NUAG.1.%04d # # $c R=$xw1/CIEL.1.%04d$VERTE # # $c $formatI\n" # # $c ,n2,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/NUAGES.0$BLEUE # # $c A2=$xT/NUAGES.1$BLEUE # # $c P=$xiff/NUAG.1.%04d # # $c R=$xw1/CIEL.1.%04d$BLEUE # # $c $formatI\n" # # $c ,n2,n # # $c ); # # # # $c n0 = n0 + 1; # # $c if (n0 > N) # # $c { # # $c n0 = n0 - N; # # $c } # # $c else # # $c { # # $c } # # # # $c n1 = n1 + 1; # # $c if (n1 > N) # # $c { # # $c n1 = n1 - N; # # $c } # # $c else # # $c { # # $c } # # # # $c n2 = n2 + 1; # # $c if (n2 > N) # # $c { # # $c n2 = n2 - N; # # $c } # # $c else # # $c { # # $c } # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/CIEL.1. $xiaf/CIEL.11 1 8 # # # # $Z ro $xiaf/CIEL.11$R16$ROUGE # # $Z ro $xiaf/CIEL.11$R16$VERTE # # $Z ro $xiaf/CIEL.11$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/CIEL.11$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/CIEL.11$R16$VERTE # # $Z $xcg/unite$Z $xiaf/CIEL.11$R16$BLEUE # # # # # # $Z $xci/reduction_64$Z $xw1/CIEL.1. $xiaf/CIEL.11 1 2 # # # # $Z ro $xiaf/CIEL.11$R64$ROUGE # # $Z ro $xiaf/CIEL.11$R64$VERTE # # $Z ro $xiaf/CIEL.11$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/CIEL.11$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/CIEL.11$R64$VERTE # # $Z $xcg/unite$Z $xiaf/CIEL.11$R64$BLEUE # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/CIEL.1. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/CIEL.11$R16 RVB Initialisation # # record.01$Z $xiaf/CIEL.11$R64 RVB rien # # # sequence 010948_011075 # Generee par : # # # # # # $Z SET Nimages=128 # # # # $Z $DELETE $xT/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xT/ROTATION$COORD_X # # # # $Z Pal # # # # $Z $xrv/champs_5.30$X \ # # $Z np=$Nimages \ # # $Z A=$xiff/NUAG.2. \ # # $Z premiere=1 derniere=17 pas=1 \ # # $Z facteurR=18 puissance=3 \ # # $Z ZOOM=0.8 \ # # $Z ROTATION_OX=$xT/ROTATION$COORD_X \ # # $Z ROTATION_OY=0.2 \ # # $Z ROTATION_OZ=0.2 \ # # $Z Ly=1000 Lz=100000 \ # # $Z px=32 py=32 \ # # $Z Zauto=VRAI \ # # $Z Zmin=1 Zmax=17 \ # # $Z R=$xw1/NUAG.3. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/NUAG.3. $xiaf/NUAG.31 1 8 # # # # $Z ro $xiaf/NUAG.31$R16$ROUGE # # $Z ro $xiaf/NUAG.31$R16$VERTE # # $Z ro $xiaf/NUAG.31$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/NUAG.31$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/NUAG.31$R16$VERTE # # $Z $xcg/unite$Z $xiaf/NUAG.31$R16$BLEUE # # # # # # $Z $xci/reduction_64$Z $xw1/NUAG.3. $xiaf/NUAG.31 1 2 # # # # $Z ro $xiaf/NUAG.31$R64$ROUGE # # $Z ro $xiaf/NUAG.31$R64$VERTE # # $Z ro $xiaf/NUAG.31$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/NUAG.31$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/NUAG.31$R64$VERTE # # $Z $xcg/unite$Z $xiaf/NUAG.31$R64$BLEUE # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.3. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.31$R16 RVB Initialisation # # record.01$Z $xiaf/NUAG.31$R64 RVB rien # # # sequence 011076_011203 # Generee par : # # # # # # $Z SET Nimages=128 # # # # $Z $DELETE $xT/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xT/ROTATION$COORD_X # # # # # # $Z Pal # # # # $X $xci/genere$X premiere=1 derniere=17 pas=1 \ # # $X C='$xci/substitue$X \ # # $X A=$xiff/NUAG.2.%04d \ # # $X substitution=L_SUBSTITUTION_ROUGE \ # # $X p=$xiP/periodise.02 \ # # $X $formatI | \ # # $X $xci/vraies_C$X \ # # $X p=$xiP/cercle.35 \ # # $X RR=$xT/NUAG.2$ROUGE.%04d \ # # $X RV=$xT/NUAG.2$VERTE.%04d \ # # $X RB=$xT/NUAG.2$BLEUE.%04d \ # # $X $formatI' # # # # # # $Z $xrv/champs_5.20$X \ # # $Z np=$Nimages \ # # $Z A=$xiff/NUAG.2. \ # # $Z premiere=1 derniere=17 pas=1 \ # # $Z evolution=VRAI \ # # $Z cRAYON=$xiff/NUAG.2. \ # # $Z cROUGE=$xT/NUAG.2$ROUGE. \ # # $Z cVERTE=$xT/NUAG.2$VERTE. \ # # $Z cBLEUE=$xT/NUAG.2$BLEUE. \ # # $Z seuil=128 \ # # $Z facteurR=16 puissance=3 \ # # $Z ZOOM=0.8 \ # # $Z ROTATION_OX=$xT/ROTATION$COORD_X \ # # $Z ROTATION_OY=0.2 \ # # $Z ROTATION_OZ=0.2 \ # # $Z Ly=1000 Lz=100000 \ # # $Z px=32 py=32 \ # # $Z zmin=1 zmax=17 \ # # $Z R=$xw1/NUAG.4. \ # # $Z Zmin=1 Zmax=17 \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/NUAG.4. $xiaf/NUAG.41 1 8 # # # # $Z ro $xiaf/NUAG.41$R16$ROUGE # # $Z ro $xiaf/NUAG.41$R16$VERTE # # $Z ro $xiaf/NUAG.41$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/NUAG.41$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/NUAG.41$R16$VERTE # # $Z $xcg/unite$Z $xiaf/NUAG.41$R16$BLEUE # # # # # # $Z $xci/reduction_64$Z $xw1/NUAG.4. $xiaf/NUAG.41 1 2 # # # # $Z ro $xiaf/NUAG.41$R64$ROUGE # # $Z ro $xiaf/NUAG.41$R64$VERTE # # $Z ro $xiaf/NUAG.41$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/NUAG.41$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/NUAG.41$R64$VERTE # # $Z $xcg/unite$Z $xiaf/NUAG.41$R64$BLEUE # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.4. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.41$R16 RVB Initialisation # # record.01$Z $xiaf/NUAG.41$R64 RVB rien # # # sequence 011204_011232 sequence 011233_011360 # Generee par : # # # # # # $Z SET Nimages=128 # # # # $Z $DELETE $xT/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=1 d=$Nimages vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xT/ROTATION$COORD_X # # # # $Z Pal # # # # $Z $xrv/champs_5.30$X \ # # $Z np=$Nimages \ # # $Z A=$xiff/NUAG.2. \ # # $Z premiere=1 derniere=17 pas=1 \ # # $Z facteurR=18 puissance=1 \ # # $Z ZOOM=0.8 \ # # $Z ROTATION_OX=$xT/ROTATION$COORD_X \ # # $Z ROTATION_OY=0.2 \ # # $Z ROTATION_OZ=0.2 \ # # $Z Ly=1000 Lz=100000 \ # # $Z px=32 py=32 \ # # $Z Zauto=VRAI \ # # $Z Zmin=1 Zmax=17 \ # # $Z R=$xw1/NUAG.5. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/NUAG.5. $xiaf/NUAG.33 1 8 # # # # $Z ro $xiaf/NUAG.33$R16$ROUGE # # $Z ro $xiaf/NUAG.33$R16$VERTE # # $Z ro $xiaf/NUAG.33$R16$BLEUE # # # # $Z $xcg/unite$Z $xiaf/NUAG.33$R16$ROUGE # # $Z $xcg/unite$Z $xiaf/NUAG.33$R16$VERTE # # $Z $xcg/unite$Z $xiaf/NUAG.33$R16$BLEUE # # # # # # $Z $xci/reduction_64$Z $xw1/NUAG.5. $xiaf/NUAG.33 1 2 # # # # $Z ro $xiaf/NUAG.33$R64$ROUGE # # $Z ro $xiaf/NUAG.33$R64$VERTE # # $Z ro $xiaf/NUAG.33$R64$BLEUE # # # # $Z $xcg/unite$Z $xiaf/NUAG.33$R64$ROUGE # # $Z $xcg/unite$Z $xiaf/NUAG.33$R64$VERTE # # $Z $xcg/unite$Z $xiaf/NUAG.33$R64$BLEUE # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.5. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.33$R16 RVB Initialisation # # record.01$Z $xiaf/NUAG.33$R64 RVB rien # # # # ATTENTION, la sequence a ete enregistree deux fois a cause de problemes avec la carte # # 'Galileo'... # sequence 011361_011488 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xT/FRACTAL \ # # $Z $formatI # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 32.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xT/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/FRACTAL # # $c A2=$xT/GAUSS # # $c P=$xT/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/montagne.01$X # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xw1/EROS.1$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/EROS.1$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.81$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/EROS.1$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.81$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.81$m$R16 # # $Z ro $xiaf/PAYS.81$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.81$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.81$m$R64 # # # # # # $Z @ Derniere = $Derniere / 2 # # # # $Z $xci/reduction_16$X A=$xw1/EROS.1$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.82$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/EROS.1$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.82$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.82$m$R16 # # $Z ro $xiaf/PAYS.82$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.82$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.82$m$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/EROS.1$m. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.81$m$R16 $xiP/montagnes.01 Initialisation # # record.01$Z $xiaf/PAYS.81$m$R64 $xiP/montagnes.01 rien # # # # record.01$Z $xiaf/PAYS.82$m$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/PAYS.82$m$R64 $xiP/montagnes.01 rien # # # sequence 011489_011616 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xT/FRACTAL.01 \ # # $Z $formatI # # $Z $xci/substitue$X \ # # $Z A=$xT/FRACTAL.01 \ # # $Z standard=FAUX \ # # $Z p=$xiP/gris.03 \ # # $Z substitution=L_SUBSTITUTION_ROUGE \ # # $Z R=$xT/FRACTAL.03 \ # # $Z $formatI # # # # $Z $xci/acces$X \ # # $Z A=$xT/FRACTAL.01 \ # # $Z standard=FAUX \ # # $Z zero=FAUX \ # # $Z $formatI | \ # # $Z $xci/complement$X \ # # $Z $formatI | \ # # $Z $xci/vraies_C$X \ # # $Z p=$xiP/random.03 \ # # $Z RVB=VRAI \ # # $Z R=$xT/FRACTAL.01 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xT/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/FRACTAL.03 # # $c A2=$xT/GAUSS # # $c P=$xT/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/montagne.01$X # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/FRACTAL.01$ROUGE # # $c avion=VRAI # # $c R=$xw1/EROS.2$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/FRACTAL.03 # # $c A2=$xT/GAUSS # # $c P=$xT/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/montagne.01$X # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/FRACTAL.01$VERTE # # $c avion=VRAI # # $c R=$xw1/EROS.2$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xT/FRACTAL.03 # # $c A2=$xT/GAUSS # # $c P=$xT/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/montagne.01$X # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/FRACTAL.01$BLEUE # # $c avion=VRAI # # $c R=$xw1/EROS.2$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/EROS.2$m. $xiaf/PAYS.83$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/EROS.2$m. $xiaf/PAYS.83$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.83$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.83$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.83$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.83$m$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/EROS.2$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.83$m$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.83$m$R64 RVB rien # # # sequence 011617_011626 sequence 011627_011754 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # $Z $xci/substitue$X \ # # $Z A=$xTV/FRACTAL.01 \ # # $Z standard=FAUX \ # # $Z p=$xiP/gris.03 \ # # $Z substitution=L_SUBSTITUTION_ROUGE \ # # $Z R=$xTV/FRACTAL.03 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.03 # # $c A2=$xTV/GAUSS # # $c P=$xTV/GAUSS # # $c standard=FAUX # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=VRAI # # $c R=$xw1/ER.3$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=VRAI # # $c R=$xw1/ER.3$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=VRAI # # $c R=$xw1/ER.3$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.3$m. $xiaf/PAYS.84$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.3$m. $xiaf/PAYS.84$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.84$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.84$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.84$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.84$m$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.3$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.84$m$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.84$m$R64 RVB rien # # # # ATTENTION, l'enregistrement a du etre repris integralement a cause du fameux probleme : # # # # WARNING: Frame transfer aborted: analog video input not locked # # # sequence 011755_011882 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # $Z $xci/substitue$X \ # # $Z A=$xTV/FRACTAL.01 \ # # $Z standard=FAUX \ # # $Z p=$xiP/gris.03 \ # # $Z substitution=L_SUBSTITUTION_ROUGE \ # # $Z R=$xTV/FRACTAL.03 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.03 # # $c A2=$xTV/GAUSS # # $c P=$xTV/GAUSS # # $c standard=FAUX # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c R=$xTV/MONTAGNE$M # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.4$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.4$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.4$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.4$M. $xiaf/PAYS.85$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.4$M. $xiaf/PAYS.85$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.85$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.85$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.85$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.85$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.4$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.85$M$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.85$M$R64 RVB rien # # # sequence 011883_012010 sequence 012011_012138 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OP 1 # # $c #define EP 512 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c int P=((EP*(n-N0))+(OP*(N-n)))/(N-N0); # # # # $c printf("$xci/substitue$X # # $c A=$xTV/FRACTAL.01 # # $c standard=FAUX # # $c p=$xiP/gris.03 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c lissage=VRAI # # $c passes=%d # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,P # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.62 # # $c perspective=0.20 # # $c R=$xTV/MONTAGNE$M # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=VRAI # # $c R=$xw1/ER.5$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=VRAI # # $c R=$xw1/ER.5$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=VRAI # # $c R=$xw1/ER.5$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=FAUX # # $c Ty=0.62 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.5$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=FAUX # # $c Ty=0.62 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.5$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=FAUX # # $c Ty=0.62 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.5$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.5$m. $xiaf/PAYS.91$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.5$m. $xiaf/PAYS.91$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.91$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.91$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.91$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.91$m$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xw1/ER.5$M. $xiaf/PAYS.91$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.5$M. $xiaf/PAYS.91$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.91$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.91$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.91$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.91$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.5$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ER.5$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.91$m$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.91$m$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.91$M$R16 RVB rien # # record.01$Z $xiaf/PAYS.91$M$R64 RVB rien # # # sequence 012139_012266 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # $Z $xci/substitue$X \ # # $Z A=$xTV/FRACTAL.01 \ # # $Z standard=FAUX \ # # $Z p=$xiP/universel.11 \ # # $Z lissage=VRAI \ # # $Z passes=256 \ # # $Z substitution=L_SUBSTITUTION_ROUGE \ # # $Z R=$xTV/FRACTAL.03 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.03 # # $c A2=$xTV/GAUSS # # $c P=$xTV/GAUSS # # $c standard=FAUX # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=VRAI # # $c R=$xw1/ER.6$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=VRAI # # $c R=$xw1/ER.6$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=VRAI # # $c R=$xw1/ER.6$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.6$m. $xiaf/PAYS.A1$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.6$m. $xiaf/PAYS.A1$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.A1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.A1$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.A1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.A1$m$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.6$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.A1$m$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.A1$m$R64 RVB rien # # # sequence 012267_012394 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # $Z $xci/substitue$X \ # # $Z A=$xTV/FRACTAL.01 \ # # $Z standard=FAUX \ # # $Z p=$xiP/universel.11 \ # # $Z lissage=VRAI \ # # $Z passes=256 \ # # $Z substitution=L_SUBSTITUTION_ROUGE \ # # $Z R=$xTV/FRACTAL.03 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.03 # # $c A2=$xTV/GAUSS # # $c P=$xTV/GAUSS # # $c standard=FAUX # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c R=$xTV/MONTAGNE$M # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.7$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.7$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.7$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.7$M. $xiaf/PAYS.A2$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.7$M. $xiaf/PAYS.A2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.A2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.A2$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.A2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.A2$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.7$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.A2$M$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.A2$M$R64 RVB rien # # # sequence 012395_012522 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/GAUSS # # $c P=$xTV/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/universel.11 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=VRAI # # $c R=$xw1/ER.8$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=VRAI # # $c R=$xw1/ER.8$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=VRAI # # $c R=$xw1/ER.8$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.8$m. $xiaf/PAYS.B1$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.8$m. $xiaf/PAYS.B1$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.B1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.B1$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.B1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.B1$m$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.8$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.B1$m$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.B1$m$R64 RVB rien # # # sequence 012523_012650 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 1.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c c=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/GAUSS # # $c P=$xTV/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/universel.11 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xTV/MONTAGNE$m # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/ALTITUDE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c R=$xTV/MONTAGNE$M # # $c ZBuffer=VRAI # # $c ZBuffer_standard=VRAI # # $c $formatI | # # $c $xci/complement$X # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$ROUGE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.9$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$VERTE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.9$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/ALTITUDE$BLEUE # # $c avion=FAUX # # $c Ty=0.69 # # $c perspective=0.20 # # $c $formatI | # # $c $xci/brume.11$X # # $c B=$xTV/BRUME # # $c R=$xw1/ER.9$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/ER.9$M. $xiaf/PAYS.B2$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/ER.9$M. $xiaf/PAYS.B2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.B2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.B2$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.B2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.B2$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.9$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.B2$M$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.B2$M$R64 RVB rien # # # sequence 012651_012778 sequence 012779_012906 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z $DELETE $xTV/PALETTE$ROUGE # # $Z $DELETE $xTV/PALETTE$VERTE # # $Z $DELETE $xTV/PALETTE$BLEUE # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OP 1.0 # # $c #define EP 0.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double P=((EP*(n-N0))+(OP*(N-n)))/(N-N0); # # # # $c printf("$xciP/interpole.01$Z # # $c %f $xiP/gris.01 # # $c %f $xiP/gris.52 # # $c $xTV/PALETTE\n" # # $c ,P,1-P # # $c ); # # # # $c printf("$xci/substitue$X # # $c A=$xTV/FRACTAL.01 # # $c standard=FAUX # # $c p=$xTV/PALETTE # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/FRACTAL.03 # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/PALETTE$ROUGE\n"); # # $c printf("$DELETE $xTV/PALETTE$VERTE\n"); # # $c printf("$DELETE $xTV/PALETTE$BLEUE\n"); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/ER.A$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.75 # # $c perspective=0.30 # # $c R=$xw1/ER.A$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/ER.A$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.C1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.A$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.C1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.C1$m$R16 # # $Z ro $xiaf/PAYS.C1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.C1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.C1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ER.A$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.C1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.A$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.C1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.C1$M$R16 # # $Z ro $xiaf/PAYS.C1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.C1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.C1$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.A$m. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ER.A$M. 1 128 $xiP/montagnes.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.C1$m$R16 $xiP/montagnes.01 Initialisation # # record.01$Z $xiaf/PAYS.C1$m$R64 $xiP/montagnes.01 rien # # # # record.01$Z $xiaf/PAYS.C1$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/PAYS.C1$M$R64 $xiP/montagnes.01 rien # # # sequence 012907_013034 sequence 013035_013162 # Generees par (sur '$LACT27') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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("$xci/acces$X # # $c A=$xiff/NUAG.1.%04d # # $c convertir=VRAI # # $c $formatI | # # $c $xci/lissage$X # # $c passes=10 # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c p=$xiP/gris.52 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c standard=FAUX # # $c R=$xT/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/ER.B$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.50 # # $c R=$xw1/ER.B$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/ER.B$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.D1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.B$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.D1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.D1$m$R16 # # $Z ro $xiaf/PAYS.D1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.D1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.D1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ER.B$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.D1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.B$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/PAYS.D1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.D1$M$R16 # # $Z ro $xiaf/PAYS.D1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.D1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.D1$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.B$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ER.B$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.D1$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYS.D1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/PAYS.D1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.D1$M$R64 $xiP/montagnes.91 rien # # # # # # Les artefacts qui apparaissent sous forme de bandes verticales a gauche des images # # '$xw1/ER.B$M.????' viennent fort probablement du lissage par '$xci/lissage$X' des # # champs, puisqu'au bord de ceux-ci, il y a interpolation avec des points situes a # # l'exterieur... # sequence 013163_013290 sequence 013291_013418 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c #define mailleZ 0.40 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c valider=FAUX # # $c mZ=%.16f OZ=%.16f EZ=%.16f # # $c Z=%.16f # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xw1/NUAG.6.%04d # # $c $formatI\n" # # $c ,mailleZ,OZ,EZ # # $c ,Z # # $c ,n # # $c ); # # $c printf("$xci/acces$X # # $c A=$xw1/NUAG.6.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/NUAG.7.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.7. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.51$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.7. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.51$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.51$R16 # # $Z ro $xiaf/NUAG.51$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.51$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.51$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.7. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.7. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.51$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/NUAG.51$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/NUAG.51$R64 $xiP/cercle.35 rien # # record.01$Z $xiaf/NUAG.51$R64 $xiP/nuages.02 rien # # # # # # ATTENTION, ces sequences presentaient des structures "rectangulaires" dans les petites # # echelles surtout visibles en representation '$m' et '$M'. Elles ont donc ete regenerees # # de facon a ce l'on ne soit pas sur un tore (on ne redefinit pas {OZ,EZ}) ; c'est donc # # l'objet des sequences suivantes... # sequence 013419_013546 sequence 013547_013674 sequence 013675_013802 sequence 013803_013930 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c Z=%.16f # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xw1/NUAG.8.%04d # # $c $formatI\n" # # $c ,Z # # $c ,n # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xw1/NUAG.8.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/NUAG.9.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # # # $c printf("$xci/substitue$X # # $c A=$xw1/NUAG.8.%04d # # $c p=$xiP/gris.52 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c standard=FAUX # # $c R=$xT/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/ER.C$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.50 # # $c R=$xw1/ER.C$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.9. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/NUAG.52$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.9. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/NUAG.52$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.52$R16 # # $Z ro $xiaf/NUAG.52$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.52$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.52$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ER.C$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.E1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.C$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.E1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.E1$m$R16 # # $Z ro $xiaf/PAYS.E1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.E1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.E1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ER.C$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.E1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.C$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.E1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.E1$M$R16 # # $Z ro $xiaf/PAYS.E1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.E1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.E1$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.9. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.9. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # $xci/disk_video_P$Z $xw1/ER.C$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ER.C$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.52$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/NUAG.52$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/NUAG.52$R64 $xiP/cercle.35 rien # # record.01$Z $xiaf/NUAG.52$R64 $xiP/nuages.02 rien # # # # record.01$Z $xiaf/PAYS.E1$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.E1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/PAYS.E1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.E1$M$R64 $xiP/montagnes.91 rien # # # sequence 013931_014058 sequence 014059_014186 sequence 014187_014314 sequence 014315_014442 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z SET Noir=$NOIR # # $Z SET Blanc=$BLANC # # # # $Z Pal # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define BANDE 22 # # # # $c #define OI (Noir+1) # # $c #define EI (ES-BANDE) # # # # $c #define OS (OI+BANDE) # # $c #define ES (Blanc) # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double inf=((EI*(n-N0))+(OI*(N-n)))/(N-N0); # # $c double sup=((ES*(n-N0))+(OS*(N-n)))/(N-N0); # # # # $c printf("$xci/accumule.02$X # # $c A=$xw1/NUAG.9. # # $c premiere=%d derniere=%d # # $c trx=0 try=0 # # $c binariser=VRAI # # $c seuil=%d # # $c filtrage=VRAI inf=%d sup=%d # # $c R=$xw1/ACCU.1.%04d # # $c $formatI\n" # # $c ,N0,N # # $c ,(int)inf # # $c ,(int)inf,(int)sup # # $c ,n # # $c ); # # # # $c printf("$xci/accumule.02$X # # $c A=$xw1/NUAG.9. # # $c premiere=%d derniere=%d # # $c trx=0 try=0 # # $c binariser=FAUX # # $c seuil=%d # # $c filtrage=VRAI inf=%d sup=%d # # $c R=$xw1/ACCU.2.%04d # # $c $formatI\n" # # $c ,N0,N # # $c ,(int)inf # # $c ,(int)inf,(int)sup # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/ACCU.1. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/ACCU.12$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ACCU.1. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/ACCU.12$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/ACCU.12$R16 # # $Z ro $xiaf/ACCU.12$R64 # # # # $Z $xcg/unite$Z $xiaf/ACCU.12$R16 # # $Z $xcg/unite$Z $xiaf/ACCU.12$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ACCU.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/ACCU.14$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ACCU.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/ACCU.14$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/ACCU.14$R16 # # $Z ro $xiaf/ACCU.14$R64 # # # # $Z $xcg/unite$Z $xiaf/ACCU.14$R16 # # $Z $xcg/unite$Z $xiaf/ACCU.14$R64 # # # # # # $Z $xci/vraies_C.01$X A=$xw1/ACCU.1. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z p=$xiP/fractal.11 \ # # $Z RVB=VRAI \ # # $Z R=$xT/ACCU.1. \ # # $Z $formatI # # # # $Z $xci/reduction_16$Z $xT/ACCU.1. $xiaf/ACCU.12 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xT/ACCU.1. $xiaf/ACCU.12 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/ACCU.12$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/ACCU.12$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/ACCU.12$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/ACCU.12$R64%s' RVB=VRAI # # # # # # $Z $xci/vraies_C.01$X A=$xw1/ACCU.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z p=$xiP/fractal.11 \ # # $Z RVB=VRAI \ # # $Z R=$xT/ACCU.2. \ # # $Z $formatI # # # # $Z $xci/reduction_16$Z $xT/ACCU.2. $xiaf/ACCU.14 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xT/ACCU.2. $xiaf/ACCU.14 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/ACCU.14$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/ACCU.14$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/ACCU.14$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/ACCU.14$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ACCU.1. 001 128 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ACCU.2. 001 128 $xiP/fractal.11 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ACCU.1. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ACCU.2. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/ACCU.12$R16 $xiP/fractal.11 Initialisation # # record.01$Z $xiaf/ACCU.12$R64 $xiP/fractal.11 rien # # record.01$Z $xiaf/ACCU.14$R16 $xiP/fractal.11 rien # # record.01$Z $xiaf/ACCU.14$R64 $xiP/fractal.11 rien # # # # record.01$Z $xiaf/ACCU.12$R16 RVB rien # # record.01$Z $xiaf/ACCU.12$R64 RVB rien # # record.01$Z $xiaf/ACCU.14$R16 RVB rien # # record.01$Z $xiaf/ACCU.14$R64 RVB rien # # # sequence 014443_014570 sequence 014571_014698 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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/acces$X # # $c A=$xw1/ACCU.1.%04d # # $c convertir=VRAI # # $c $formatI | # # $c $xci/lissage$X # # $c standard=FAUX # # $c passes=10 # # $c R=$xTV/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/ACCU.1$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/SURFACE # # $c standard=FAUX # # $c zero=VRAI # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c R=$xw1/ACCU.1$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/ACCU.1$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/ACCU.12$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ACCU.1$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/ACCU.12$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/ACCU.12$m$R16 # # $Z ro $xiaf/ACCU.12$m$R64 # # # # $Z $xcg/unite$Z $xiaf/ACCU.12$m$R16 # # $Z $xcg/unite$Z $xiaf/ACCU.12$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ACCU.1$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/ACCU.12$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ACCU.1$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/ACCU.12$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/ACCU.12$M$R16 # # $Z ro $xiaf/ACCU.12$M$R64 # # # # $Z $xcg/unite$Z $xiaf/ACCU.12$M$R16 # # $Z $xcg/unite$Z $xiaf/ACCU.12$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ACCU.1$m. 001 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ACCU.1$M. 001 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/ACCU.12$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/ACCU.12$m$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/ACCU.12$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/ACCU.12$M$R64 $xiP/montagnes.91 rien # # # sequence 014699_014826 sequence 014827_014954 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z SET Noir=$NOIR # # $Z SET Blanc=$BLANC # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define Int(i,i0,iN,v0,vN) (((vN*(i-i0))+(v0*(iN-i)))/(iN-i0)) # # # # $c #define NivT1 (Noir+0) # # $c #define NivT2 (Noir+16) # # $c #define NivT3 (Blanc-16) # # $c #define NivT4 (Blanc-0) # # # # $c #define dNiv1O2 4 # # $c #define dNivE2E3 8 # # $c #define dNivO2O3 8 # # $c #define dNivE34 4 # # # # $c #define Niv1 (Noir+0) # # # # $c #define ONiv2 (Niv1+dNiv1O2) # # $c #define ENiv2 (ENiv3-dNivE2E3) # # # # $c #define ONiv3 (ONiv2+dNivO2O3) # # $c #define ENiv3 (Niv4-dNivE34) # # # # $c #define Niv4 (Blanc-0) # # # # $c int main() # # $c { # # $c int n; # # # # $c int niv1=Niv1; # # $c int niv4=Niv4; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c int niv; # # $c int niv2=Int(n,N0,N,ONiv2,ENiv2); # # $c int niv3=Int(n,N0,N,ONiv3,ENiv3); # # # # $c printf("$DELETE $xTV/PALETTE\n"); # # # # $c for (niv=Noir ; niv<=Blanc ; niv++) # # $c { # # $c int nivT; # # # # $c if ((niv>=niv1) && (niv<=niv2)) # # $c { # # $c nivT=Int(niv,niv1,niv2,NivT1,NivT2); # # $c } # # $c else # # $c { # # $c } # # # # $c if ((niv>=niv2) && (niv<=niv3)) # # $c { # # $c nivT=Int(niv,niv2,niv3,NivT2,NivT3); # # $c } # # $c else # # $c { # # $c } # # # # $c if ((niv>=niv3) && (niv<=niv4)) # # $c { # # $c nivT=Int(niv,niv3,niv4,NivT3,NivT4); # # $c } # # $c else # # $c { # # $c } # # # # $c printf("echo %02x >>! $xTV/PALETTE\n" # # $c ,nivT # # $c ); # # $c } # # $c printf("$DELETE $xTV/PALETTE$ROUGE\n"); # # $c printf("$DELETE $xTV/PALETTE$VERTE\n"); # # $c printf("$DELETE $xTV/PALETTE$BLEUE\n"); # # # # $c printf("$CA $xTV/PALETTE | $xcg/anti_dumpX$X > $xTV/PALETTE$ROUGE\n"); # # $c printf("$CA $xTV/PALETTE | $xcg/anti_dumpX$X > $xTV/PALETTE$VERTE\n"); # # $c printf("$CA $xTV/PALETTE | $xcg/anti_dumpX$X > $xTV/PALETTE$BLEUE\n"); # # # # $c printf("$xci/substitue$X # # $c A=$xTV/FRACTAL # # $c p=$xTV/PALETTE # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c standard=FAUX # # $c R=$xT/SURFACE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/ER.D$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.50 # # $c R=$xw1/ER.D$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/ER.D$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.F1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.D$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.F1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.F1$m$R16 # # $Z ro $xiaf/PAYS.F1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.F1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.F1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ER.D$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.F1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.D$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.F1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.F1$M$R16 # # $Z ro $xiaf/PAYS.F1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.F1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.F1$M$R64 # # # # # # Pal # # # # # # $xci/disk_video_P$Z $xw1/ER.D$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ER.D$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.F1$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYS.F1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/PAYS.F1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.F1$M$R64 $xiP/montagnes.91 rien # # # sequence 014955_015082 sequence 015083_015210 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # $Z $xci/gauss$X \ # # $Z c=8 \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/GAUSS.1 \ # # $Z $formatI # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OC 3.0 # # $c #define EC 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double C=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # # # $c printf("$xci/gauss$X # # $c c=%.16f # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/gris.53 # # $c lissage=VRAI # # $c passes=512 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/GAUSS.2 # # $c $formatI\n" # # $c ,C*C*C*C # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/GAUSS.1 # # $c A2=$xTV/FRACTAL # # $c P=$xTV/GAUSS.2 # # $c standard=FAUX # # $c R=$xT/SURFACE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/ER.E$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xT/SURFACE # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.50 # # $c R=$xw1/ER.E$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/ER.E$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/INTE.12$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.E$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/INTE.12$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/INTE.12$m$R16 # # $Z ro $xiaf/INTE.12$m$R64 # # # # $Z $xcg/unite$Z $xiaf/INTE.12$m$R16 # # $Z $xcg/unite$Z $xiaf/INTE.12$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/ER.E$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/INTE.12$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/ER.E$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/INTE.12$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/INTE.12$M$R16 # # $Z ro $xiaf/INTE.12$M$R64 # # # # $Z $xcg/unite$Z $xiaf/INTE.12$M$R16 # # $Z $xcg/unite$Z $xiaf/INTE.12$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/ER.E$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/ER.E$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/INTE.12$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/INTE.12$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/INTE.12$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/INTE.12$M$R64 $xiP/montagnes.91 rien # # # sequence 015211_015338 sequence 015339_015350 sequence 015351_015466 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c int main() # # $c { # # $c int n; # # # # $c printf("set ListeX=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=1111`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeY=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=2222`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeCX=`$xci/valeurs_alea$X p=%d d=%d inf=1 sup=+32 graine=3333`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeCY=`$xci/valeurs_alea$X p=%d d=%d inf=1 sup=+32 graine=4444`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeS=`$xci/valeurs_alea$X p=%d d=%d inf=0.2 sup=1.0 graine=5555`\n" # # $c ,N0,N # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/sinus$X # # $c standard=FAUX # # $c Tx=$ListeX[%d] # # $c Ty=$ListeY[%d] # # $c cx=$ListeCX[%d] # # $c cy=$ListeCY[%d] # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=$ListeS[%d] # # $c extrema=FAUX # # $c R=$xTV/SINUS.%04d # # $c $formatI\n" # # $c ,n,n,n,n,n,n # # $c ); # # # # $c printf("$xci/accumule.01$X # # $c A=$xTV/SINUS. # # $c standard=FAUX # # $c premiere=%d # # $c derniere=%d # # $c maximum=FAUX # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c R=$xTV/SINUS # # $c $formatI\n" # # $c ,N0,n # # $c ); # # # # $c printf("$xci/multi_02.01$X # # $c standard=FAUX # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/SINUS # # $c R=$xTV/COTE.02 # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xw1/PAYS.G$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.70 perspective=0.30 # # $c R=$xw1/PAYS.G$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/PAYS.G$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.G1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PAYS.G$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.G1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.G1$m$R16 # # $Z ro $xiaf/PAYS.G1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.G1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.G1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/PAYS.G$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.G1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/PAYS.G$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.G1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.G1$M$R16 # # $Z ro $xiaf/PAYS.G1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.G1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.G1$M$R64 # # # # # # Pal # # # # # # $xci/disk_video_P$Z $xw1/PAYS.G$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PAYS.G$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.G1$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYS.G1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/PAYS.G1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.G1$M$R64 $xiP/montagnes.91 rien # # # # ATTENTION, l'enregistrement de '$xw1/PAYS.G$M.' a ete fait en deux fois car j'ai betement # # couper l'alimentation de la baie video afin de couper le reseau local (le "hub" de securite # # etant momentanement absent) le 19970915194145. # sequence 015467_015594 sequence 015595_015722 # Generee (sur '$LACT27') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c int main() # # $c { # # $c int n; # # # # $c printf("set ListeX=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=1111`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeY=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=2222`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeC=`$xci/valeurs_alea$X p=%d d=%d inf=100 sup=200 graine=3333`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeS=`$xci/valeurs_alea$X p=%d d=%d inf=0.2 sup=1.0 graine=4444`\n" # # $c ,N0,N # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/gauss$X # # $c standard=FAUX # # $c Tx=$ListeX[%d] # # $c Ty=$ListeY[%d] # # $c c=$ListeC[%d] # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/abso.21 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/complement$X # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=$ListeS[%d] # # $c extrema=FAUX # # $c R=$xiim/GAUSS.%04d # # $c $formatI\n" # # $c ,n,n,n,n,n # # $c ); # # # # $c printf("$xci/accumule.01$X # # $c A=$xiim/GAUSS. # # $c standard=FAUX # # $c premiere=%d # # $c derniere=%d # # $c maximum=FAUX # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,N0,n # # $c ); # # # # $c printf("$xci/multi_02.01$X # # $c standard=FAUX # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/GAUSS # # $c R=$xTV/COTE.02 # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/PAYS.H$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.80 perspective=0.30 # # $c R=$xiim/PAYS.H$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.H$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.H1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.H$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.H1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.H1$m$R16 # # $Z ro $xiaf/PAYS.H1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.H1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.H1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.H$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.H1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.H$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.H1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.H1$M$R16 # # $Z ro $xiaf/PAYS.H1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.H1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.H1$M$R64 # # # # # # $Z $xci/vraies_C.01$X A=$xiim/PAYS.H$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z p=$xiP/montagnes.91 \ # # $Z RVB=VRAI \ # # $Z R=$xw1/PA.H$m. \ # # $Z $formatI # # # # $Z $xci/vraies_C.01$X A=$xiim/PAYS.H$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z p=$xiP/montagnes.91 \ # # $Z RVB=VRAI \ # # $Z R=$xw1/PA.H$M. \ # # $Z $formatI # # # # # # Pal # # # # # # $xci/disk_video_P$Z $xw1/PA.H$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.H$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.H1$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYS.H1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/PAYS.H1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.H1$M$R64 $xiP/montagnes.91 rien # # # sequence 015723_015850 sequence 015851_015978 # Generee (sur '$LACT27') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c int main() # # $c { # # $c int n; # # # # $c printf("set ListeX=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 g=1111`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeY=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 g=2222`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeE=`$xci/valeurs_alea$X p=%d d=%d inf=2.0 sup=8.0 g=3333`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeR=`$xci/valeurs_alea$X p=%d d=%d inf=1.0 sup=4.0 g=4444`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeP=`$xci/valeurs_alea$X p=%d d=%d inf=0.0 sup=$dpi g=5555`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeN=`$xci/valeurs_alea$X p=%d d=%d inf=3 sup=9 e=VRAI g=6666`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeS=`$xci/valeurs_alea$X p=%d d=%d inf=0.2 sup=1.0 g=7777`\n" # # $c ,N0,N # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/trefle$X # # $c standard=FAUX # # $c Tx=$ListeX[%d] # # $c Ty=$ListeY[%d] # # $c Ex=$ListeE[%d] # # $c Ey=$ListeE[%d] # # $c r=$ListeR[%d] # # $c Pt=$ListeP[%d] # # $c Ct=$ListeN[%d] # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=$ListeS[%d] # # $c extrema=FAUX # # $c R=$xiim/TREFLE.%04d # # $c $formatI\n" # # $c ,n,n,n,n,n,n,n,n,n # # $c ); # # # # $c printf("$xci/accumule.01$X # # $c A=$xiim/TREFLE. # # $c standard=FAUX # # $c premiere=%d # # $c derniere=%d # # $c maximum=FAUX # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c R=$xTV/TREFLE # # $c $formatI\n" # # $c ,N0,n # # $c ); # # # # $c printf("$xci/multi_02.01$X # # $c standard=FAUX # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/TREFLE # # $c R=$xTV/COTE.02 # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/PAYS.I$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.80 perspective=0.30 # # $c R=$xiim/PAYS.I$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/vraies_C$X # # $c A=$xiim/PAYS.I$m.%04d # # $c p=$xiP/montagnes.91 # # $c RVB=VRAI # # $c R=$xw1/PA.I$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xiim/PAYS.I$M.%04d # # $c p=$xiP/montagnes.91 # # $c RVB=VRAI # # $c R=$xw1/PA.I$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.I$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.I1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.I$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.I1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.I1$m$R16 # # $Z ro $xiaf/PAYS.I1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.I1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.I1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.I$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.I1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.I$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.I1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.I1$M$R16 # # $Z ro $xiaf/PAYS.I1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.I1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.I1$M$R64 # # # # # # Pal # # # # # # $xci/disk_video_P$Z $xw1/PA.I$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.I$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.I1$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYS.I1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/PAYS.I1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.I1$M$R64 $xiP/montagnes.91 rien # # # sequence 015979_016106 sequence 016107_016234 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z mX=0.02 mY=0.02 \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.11 \ # # $Z $formatI # # $Z $xci/scale$X \ # # $Z A=$xTV/FRACTAL.11 \ # # $Z standard=FAUX \ # # $Z a=0.1 b=0.2 \ # # $Z R=$xTV/FRACTAL.12 \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # $c #define N1 (N/32) # # $c #define N2 (N1+1) # # # # $c #define OC 64.0 # # $c #define EC 8.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c printf("set ListeX=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=1234`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeY=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=5678`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeK1=`$xci/valeurs_alea$X p=%d d=%d inf=0.01 sup=2 graine=5555`\n" # # $c ,N0,N1 # # $c ); # # $c printf("set ListeK2=`$xci/valeurs_alea$X p=%d d=%d inf=4 sup=40 graine=6666`\n" # # $c ,N2,N # # $c ); # # $c printf("set ListeK=`echo $ListeK1 $ListeK2`\n"); # # $c printf("set ListeS=`$xci/valeurs_alea$X p=%d d=%d inf=0.01 sup=0.04 graine=77`\n" # # $c ,N0,N # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double gauss=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # $c printf("$xci/dist_exponen$X # # $c standard=FAUX # # $c Tx=$ListeX[%d] # # $c Ty=$ListeY[%d] # # $c k=$ListeK[%d] # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/abso.45 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/complement$X # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=$ListeS[%d] # # $c extrema=FAUX # # $c R=$xiim/EXPON.%04d # # $c $formatI\n" # # $c ,n,n,n,n,n # # $c ); # # # # $c printf("$xci/accumule.01$X # # $c A=$xiim/EXPON. # # $c standard=FAUX # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c maximum=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=0.80 b=0.0 # # $c R=$xTV/EXPON # # $c $formatI\n" # # $c ,N0,n # # $c ); # # # # $c printf("$xci/multi_02.01$X # # $c standard=FAUX # # $c A1=$xTV/FRACTAL.12 # # $c A2=$xTV/EXPON # # $c R=$xTV/COTE.02 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/substitue$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c p=$xiP/gris.65 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/COTE.12 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/gauss$X # # $c Tx=0.2 Ty=0.8 # # $c c=8 # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xTV/PONDER.1 # # $c $formatI\n" # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/COTE.12 # # $c P=$xTV/PONDER.1 # # $c standard=FAUX # # $c R=$xTV/COTE.13 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/gauss$X # # $c Tx=0.60 Ty=0.75 # # $c c=%f # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/gris.41 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xTV/PONDER.2 # # $c $formatI\n" # # $c ,gauss # # $c ); # # # # $c printf("$xci/substitue$X # # $c A=$xTV/FRACTAL.01 # # $c standard=FAUX # # $c p=$xiP/abso.30 # # $c lissage=VRAI # # $c passes=32 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/Sy$X # # $c standard=FAUX # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=0.02 b=0 # # $c $formatI | # # $c $xci/interpole.02$X # # $c A2=$xTV/COTE.13 # # $c P=$xTV/PONDER.2 # # $c standard=FAUX # # $c R=$xTV/COTE.14 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xTV/COTE.14 # # $c standard=FAUX # # $c zero=FAUX # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=6 # # $c R=$xTV/CONTINENT # # $c $formatI\n" # # $c ); # # $c printf("$xci/init$X # # $c niveau=$GRIS_7 # # $c $formatI | # # $c $xci/cache$X # # $c M=$xTV/CONTINENT # # $c R=$xTV/MER # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.14 # # $c standard=FAUX # # $c zero=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/MER # # $c avion=VRAI # # $c R=$xiim/PAYS.J$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.14 # # $c standard=FAUX # # $c zero=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/MER # # $c avion=FAUX # # $c Ty=0.88 perspective=0.40 # # $c R=$xiim/PAYS.J$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/vraies_C$X # # $c A=$xiim/PAYS.J$m.%04d # # $c p=$xiP/gris.01 # # $c RVB=VRAI # # $c R=$xw1/PA.J$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xiim/PAYS.J$M.%04d # # $c p=$xiP/montagnes.91 # # $c RVB=VRAI # # $c R=$xw1/PA.J$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.J$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.J1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.J$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.J1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.J1$m$R16 # # $Z ro $xiaf/PAYS.J1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.J1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.J1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.J$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.J1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.J$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.J1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.J1$M$R16 # # $Z ro $xiaf/PAYS.J1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.J1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.J1$M$R64 # # # # # # Pal # # # # # # $xci/disk_video_P$Z $xw1/PA.J$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.J$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.J1$m$R16 $xiP/gris.01 Initialisation # # record.01$Z $xiaf/PAYS.J1$m$R64 $xiP/gris.01 rien # # # # record.01$Z $xiaf/PAYS.J1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.J1$M$R64 $xiP/montagnes.91 rien # # # sequence 016235_016362 sequence 016363_016490 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z mX=0.02 mY=0.02 \ # # $Z $formatI | \ # # $Z $xci/normalise.01$X \ # # $Z R=$xTV/FRACTAL.11 \ # # $Z $formatI # # $Z $xci/scale$X \ # # $Z A=$xTV/FRACTAL.11 \ # # $Z standard=FAUX \ # # $Z a=0.1 b=0.2 \ # # $Z R=$xTV/FRACTAL.12 \ # # $Z $formatI # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # $c #define N1 (N/32) # # $c #define N2 (N1+1) # # # # $c extern double sqrt(); # # # # $c #define OC sqrt(sqrt(sqrt(sqrt(400.0)))) # # $c #define EC 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c printf("set ListeX=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=1234`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeY=`$xci/valeurs_alea$X p=%d d=%d inf=0 sup=1 graine=5678`\n" # # $c ,N0,N # # $c ); # # $c printf("set ListeK1=`$xci/valeurs_alea$X p=%d d=%d inf=0.01 sup=2 graine=5555`\n" # # $c ,N0,N1 # # $c ); # # $c printf("set ListeK2=`$xci/valeurs_alea$X p=%d d=%d inf=4 sup=40 graine=6666`\n" # # $c ,N2,N # # $c ); # # $c printf("set ListeK=`echo $ListeK1 $ListeK2`\n"); # # $c printf("set ListeS=`$xci/valeurs_alea$X p=%d d=%d inf=0.01 sup=0.04 graine=77`\n" # # $c ,N0,N # # $c ); # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double gauss=((EC*(n-N0))+(OC*(N-n)))/(N-N0); # # $c printf("$xci/dist_exponen$X # # $c standard=FAUX # # $c Tx=$ListeX[%d] # # $c Ty=$ListeY[%d] # # $c k=$ListeK[%d] # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/abso.45 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/complement$X # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=$ListeS[%d] # # $c extrema=FAUX # # $c R=$xiim/EXPON.%04d # # $c $formatI\n" # # $c ,n,n,n,n,n # # $c ); # # # # $c printf("$xci/accumule.01$X # # $c A=$xiim/EXPON. # # $c standard=FAUX # # $c premiere=%d # # $c derniere=%d # # $c attenuation=1.0 # # $c maximum=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=0.80 b=0.0 # # $c R=$xTV/EXPON # # $c $formatI\n" # # $c ,N0,n # # $c ); # # # # $c printf("$xci/multi_02.01$X # # $c standard=FAUX # # $c A1=$xTV/FRACTAL.12 # # $c A2=$xTV/EXPON # # $c R=$xTV/COTE.02 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/substitue$X # # $c A=$xTV/COTE.02 # # $c standard=FAUX # # $c p=$xiP/gris.65 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/COTE.12 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/gauss$X # # $c Tx=0.2 Ty=0.8 # # $c c=8 # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xTV/PONDER.1 # # $c $formatI\n" # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xTV/FRACTAL.01 # # $c A2=$xTV/COTE.12 # # $c P=$xTV/PONDER.1 # # $c standard=FAUX # # $c R=$xTV/COTE.13 # # $c $formatI\n" # # $c ); # # # # $c gauss=gauss*gauss; # # $c gauss=gauss*gauss; # # $c gauss=gauss*gauss; # # $c gauss=gauss*gauss; # # # # $c printf("$xci/gauss$X # # $c Tx=0.60 Ty=0.75 # # $c c=%f # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/gris.41 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xTV/PONDER.2 # # $c $formatI\n" # # $c ,gauss # # $c ); # # # # $c printf("$xci/substitue$X # # $c A=$xTV/FRACTAL.01 # # $c standard=FAUX # # $c p=$xiP/abso.30 # # $c lissage=VRAI # # $c passes=32 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/Sy$X # # $c standard=FAUX # # $c $formatI | # # $c $xci/scale$X # # $c standard=FAUX # # $c a=0.02 b=0 # # $c $formatI | # # $c $xci/interpole.02$X # # $c A2=$xTV/COTE.13 # # $c P=$xTV/PONDER.2 # # $c standard=FAUX # # $c R=$xTV/COTE.14 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xTV/COTE.14 # # $c standard=FAUX # # $c zero=FAUX # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=6 # # $c R=$xTV/CONTINENT # # $c $formatI\n" # # $c ); # # $c printf("$xci/init$X # # $c niveau=$GRIS_7 # # $c $formatI | # # $c $xci/cache$X # # $c M=$xTV/CONTINENT # # $c R=$xTV/MER # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.14 # # $c standard=FAUX # # $c zero=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/MER # # $c avion=VRAI # # $c R=$xiim/PAYS.K$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.14 # # $c standard=FAUX # # $c zero=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/MER # # $c avion=FAUX # # $c Ty=0.88 perspective=0.40 # # $c R=$xiim/PAYS.K$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/vraies_C$X # # $c A=$xiim/PAYS.K$m.%04d # # $c p=$xiP/gris.01 # # $c RVB=VRAI # # $c R=$xw1/PA.K$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xiim/PAYS.K$M.%04d # # $c p=$xiP/montagnes.91 # # $c RVB=VRAI # # $c R=$xw1/PA.K$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.K$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.K1$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.K$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.K1$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.K1$m$R16 # # $Z ro $xiaf/PAYS.K1$m$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.K1$m$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.K1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xiim/PAYS.K$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.K1$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/PAYS.K$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/PAYS.K1$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/PAYS.K1$M$R16 # # $Z ro $xiaf/PAYS.K1$M$R64 # # # # $Z $xcg/unite$Z $xiaf/PAYS.K1$M$R16 # # $Z $xcg/unite$Z $xiaf/PAYS.K1$M$R64 # # # # # # Pal # # # # # # $xci/disk_video_P$Z $xw1/PA.K$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.K$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.K1$m$R16 $xiP/gris.01 Initialisation # # record.01$Z $xiaf/PAYS.K1$m$R64 $xiP/gris.01 rien # # # # record.01$Z $xiaf/PAYS.K1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/PAYS.K1$M$R64 $xiP/montagnes.91 rien # # # sequence 016491_016618 sequence 016619_016746 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c Z=%.16f # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/NUAG.A.%04d # # $c $formatI\n" # # $c ,Z # # $c ,n # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xiim/NUAG.A.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/NUAG.A.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.A. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.A. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 016747_016874 sequence 016875_017002 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $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("$xci/montagne.01$X # # $c A=$xiim/NUAG.A.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xw1/NUAG.A$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xiim/NUAG.A.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=FAUX # # $c R=$xw1/NUAG.A$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.A$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.71$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.A$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.71$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.71$m$R16 # # $Z ro $xiaf/NUAG.71$m$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.71$m$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.71$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.A$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.71$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.A$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.71$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.71$M$R16 # # $Z ro $xiaf/NUAG.71$M$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.71$M$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.71$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.A$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.A$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.71$m$R16 $xiP/montagnes.01 Initialisation # # record.01$Z $xiaf/NUAG.71$m$R64 $xiP/montagnes.01 rien # # # # record.01$Z $xiaf/NUAG.71$M$R16 $xiP/montagnes.01 rien # # record.01$Z $xiaf/NUAG.71$M$R64 $xiP/montagnes.01 rien # # # sequence 017003_017130 sequence 017131_017258 # Generees par (sur '$LACT29') : # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $Z $formatI # # # # $Z $xci/gauss$X \ # # $Z c=0.18 \ # # $Z cx2=9 cy2=16 \ # # $Z standard=FAUX \ # # $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("$xci/multi_02.01$X # # $c A1=$xiim/NUAG.A.%04d # # $c A2=$xT/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/gris.54 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/FRACTAL.03 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/Sx$X # # $c A=$xiim/NUAG.A.%04d # # $c standard=FAUX # # $c $formatI | # # $c $xci/substitue$X # # $c standard=FAUX # # $c p=$xiP/gris.52 # # $c lissage=VRAI # # $c passes=256 # # $c substitution=L_SUBSTITUTION_ROUGE # # $c $formatI | # # $c $xci/acces$X # # $c standard=FAUX # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/nuages.02 # # $c RVB=VRAI # # $c R=$xTV/NUAGES.01 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.70 # # $c Z-Buffer=VRAI # # $c Z=$xTV/BRUME # # $c R=$xTV/MONTAGNE # # $c $formatI\n" # # $c ); # # $c printf("$xci/multi_02.01$X # # $c A1=$xiim/NUAG.A.%04d # # $c A2=$xT/GAUSS # # $c standard=FAUX # # $c $formatI | # # $c $xci/acces$X # # $c standard=FAUX # # $c zero=FAUX # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/MonValley.13 # # $c RVB=VRAI # # $c R=$xTV/FRACTAL.01 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/FRACTAL.01$ROUGE # # $c Nminimum=0.4 # # $c attenuation=0.20 # # $c avion=FAUX # # $c fond=VRAI # # $c F=$xTV/NUAGES.01$ROUGE # # $c Ty=0.90 # # $c perspective=0.70 # # $c R=$xTV/MONTAGNE$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/FRACTAL.01$VERTE # # $c Nminimum=0.4 # # $c attenuation=0.20 # # $c avion=FAUX # # $c fond=VRAI # # $c F=$xTV/NUAGES.01$VERTE # # $c Ty=0.90 # # $c perspective=0.70 # # $c R=$xTV/MONTAGNE$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/FRACTAL.01$BLEUE # # $c Nminimum=0.4 # # $c attenuation=0.20 # # $c avion=FAUX # # $c fond=VRAI # # $c F=$xTV/NUAGES.01$BLEUE # # $c Ty=0.90 # # $c perspective=0.70 # # $c R=$xTV/MONTAGNE$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/complement$X # # $c A=$xTV/BRUME # # $c $formatI | # # $c $xci/scale$X # # $c a=0.6 # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/brume.11$X # # $c A=$xTV/MONTAGNE$ROUGE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.L$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/brume.11$X # # $c A=$xTV/MONTAGNE$VERTE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.L$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/brume.11$X # # $c A=$xTV/MONTAGNE$BLEUE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.L$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/FRACTAL.01$ROUGE # # $c Nminimum=0.4 # # $c attenuation=0.20 # # $c avion=VRAI # # $c R=$xw1/PA.L$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/FRACTAL.01$VERTE # # $c Nminimum=0.4 # # $c attenuation=0.20 # # $c avion=VRAI # # $c R=$xw1/PA.L$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL.03 # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/FRACTAL.01$BLEUE # # $c Nminimum=0.4 # # $c attenuation=0.20 # # $c avion=VRAI # # $c R=$xw1/PA.L$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/PA.L$m. $xiaf/PAYS.L1$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.L$m. $xiaf/PAYS.L1$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.L1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.L1$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.L1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.L1$m$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xw1/PA.L$M. $xiaf/PAYS.L1$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.L$M. $xiaf/PAYS.L1$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.L1$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.L1$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.L1$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.L1$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/PA.L$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.L$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.L1$M$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.L1$M$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.L1$m$R16 RVB rien # # record.01$Z $xiaf/PAYS.L1$m$R64 RVB rien # # # sequence 017259_017386 sequence 017387_017514 sequence 017515_017642 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $Z $formatI # # # # $Z $xci/gauss$X \ # # $Z c=8 \ # # $Z standard=FAUX \ # # $Z R=$xT/GAUSS \ # # $Z $formatI # # # # $Z $xci/interpole.02$X \ # # $Z A1=$xTV/FRACTAL.01 \ # # $Z A2=$xTV/GAUSS \ # # $Z P=$xTV/GAUSS \ # # $Z standard=FAUX \ # # $Z R=$xT/FRACTAL.02 \ # # $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 double passe=((double)(n+9))/((double)N); # # # # $c printf("$xci/substitue$X # # $c A=$xT/FRACTAL.02 # # $c standard=FAUX # # $c p=$xiP/universel.11 # # $c lissage=VRAI # # $c passes=%d # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/FRACTAL_GAUSS # # $c $formatI\n" # # $c ,7+((int)((passe*passe*passe*passe)*50000)) # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c Z-Buffer=VRAI # # $c R=$xTV/MONTAGNE # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$ROUGE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xw1/PA.N$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$VERTE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xw1/PA.N$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$BLEUE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xw1/PA.N$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$ROUGE # # $c avion=VRAI # # $c R=$xw1/PA.N$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$VERTE # # $c avion=VRAI # # $c R=$xw1/PA.N$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$BLEUE # # $c avion=VRAI # # $c R=$xw1/PA.N$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c Z-Buffer=VRAI # # $c R=$xTV/MONTAGNE # # $c $formatI | # # $c $xci/complement$X # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/brume.11$X # # $c A=$xw1/PA.N$M.%04d$ROUGE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.O$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/brume.11$X # # $c A=$xw1/PA.N$M.%04d$VERTE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.O$M.%04d$VERTE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/brume.11$X # # $c A=$xw1/PA.N$M.%04d$BLEUE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.O$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/PA.N$m. $xiaf/PAYS.M1$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.N$m. $xiaf/PAYS.M1$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.M1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.M1$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.M1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.M1$m$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xw1/PA.N$M. $xiaf/PAYS.M1$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.N$M. $xiaf/PAYS.M1$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.M1$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.M1$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.M1$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.M1$M$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xw1/PA.O$M. $xiaf/PAYS.M2$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.O$M. $xiaf/PAYS.M2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.M2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.M2$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.M2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.M2$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/PA.N$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.N$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.O$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.M1$M$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.M1$M$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.M1$m$R16 RVB rien # # record.01$Z $xiaf/PAYS.M1$m$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.M2$M$R16 RVB rien # # record.01$Z $xiaf/PAYS.M2$M$R64 RVB rien # # # sequence 017643_017770 sequence 017771_017898 sequence 017899_018026 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/fract_2D.01$X \ # # $Z standard=FAUX \ # # $Z R=$xTV/FRACTAL.01 \ # # $Z $formatI # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $Z $formatI # # # # $Z $xci/gauss$X \ # # $Z c=8 \ # # $Z standard=FAUX \ # # $Z R=$xT/GAUSS \ # # $Z $formatI # # # # $Z $xci/interpole.02$X \ # # $Z A1=$xTV/FRACTAL.01 \ # # $Z A2=$xTV/GAUSS \ # # $Z P=$xTV/GAUSS \ # # $Z standard=FAUX \ # # $Z R=$xT/FRACTAL.02 \ # # $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 double passe=((double)(n+9))/((double)N); # # # # $c printf("$xci/substitue$X # # $c A=$xT/FRACTAL.02 # # $c standard=FAUX # # $c p=$xiP/gris.54 # # $c lissage=VRAI # # $c passes=%d # # $c substitution=L_SUBSTITUTION_ROUGE # # $c R=$xTV/FRACTAL_GAUSS # # $c $formatI\n" # # $c ,7+((int)((passe*passe*passe*passe)*50000)) # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c Z-Buffer=VRAI # # $c R=$xTV/MONTAGNE # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/vraies_C$X # # $c p=$xiP/MonValley.13 # # $c RVB=VRAI # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$ROUGE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xw1/PA.P$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$VERTE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xw1/PA.P$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$BLEUE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xw1/PA.P$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$ROUGE # # $c avion=VRAI # # $c R=$xw1/PA.P$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$VERTE # # $c avion=VRAI # # $c R=$xw1/PA.P$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$BLEUE # # $c avion=VRAI # # $c R=$xw1/PA.P$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.90 # # $c perspective=0.30 # # $c Z-Buffer=VRAI # # $c R=$xTV/MONTAGNE # # $c $formatI | # # $c $xci/complement$X # # $c R=$xTV/BRUME # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$ROUGE # # $c avion=FAUX # # $c fond=VRAI # # $c F=$xTV/TEXTURE # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xTV/MONTAGNE$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$VERTE # # $c avion=FAUX # # $c fond=VRAI # # $c F=$xTV/TEXTURE # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xTV/MONTAGNE$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/FRACTAL_GAUSS # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xTV/COTE$BLEUE # # $c avion=FAUX # # $c fond=VRAI # # $c F=$xTV/TEXTURE # # $c Ty=0.90 # # $c perspective=0.30 # # $c R=$xTV/MONTAGNE$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/brume.11$X # # $c A=$xTV/MONTAGNE$ROUGE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.Q$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/brume.11$X # # $c A=$xTV/MONTAGNE$VERTE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.Q$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/brume.11$X # # $c A=$xTV/MONTAGNE$BLEUE # # $c B=$xTV/BRUME # # $c R=$xw1/PA.Q$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/PA.P$m. $xiaf/PAYS.N1$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.P$m. $xiaf/PAYS.N1$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.N1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.N1$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.N1$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.N1$m$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xw1/PA.P$M. $xiaf/PAYS.N1$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.P$M. $xiaf/PAYS.N1$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.N1$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.N1$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.N1$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.N1$M$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xw1/PA.Q$M. $xiaf/PAYS.N2$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PA.Q$M. $xiaf/PAYS.N2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.N2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.N2$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.N2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.N2$M$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/PA.P$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.P$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/PA.Q$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.N1$M$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.N1$M$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.N1$m$R16 RVB rien # # record.01$Z $xiaf/PAYS.N1$m$R64 RVB rien # # # # record.01$Z $xiaf/PAYS.N2$M$R16 RVB rien # # record.01$Z $xiaf/PAYS.N2$M$R64 RVB rien # # # sequence 018027_018154 sequence 018155_018282 sequence 018283_018410 sequence 018411_018538 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z set Rotation=`$xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi` # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $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/fract_3D.01$X # # $c ROTATION_OX=$Rotation[%d] # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/NUAG.C.%04d # # $c $formatI\n" # # $c ,n-N0+1 # # $c ,n # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xiim/NUAG.C.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/NUAG.C.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xiim/NUAG.C.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xw1/NUAG.C$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xiim/NUAG.C.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=FAUX # # $c R=$xw1/NUAG.C$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.C. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.81$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.C. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.81$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.81$R16 # # $Z ro $xiaf/NUAG.81$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.81$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.81$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.C$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.81$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.C$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.81$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.81$m$R16 # # $Z ro $xiaf/NUAG.81$m$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.81$m$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.81$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.C$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.81$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.C$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.81$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.81$M$R16 # # $Z ro $xiaf/NUAG.81$M$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.81$M$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.81$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.C. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.C. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # $xci/disk_video_P$Z $xw1/NUAG.C$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.C$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.81$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/NUAG.81$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/NUAG.81$R64 $xiP/cercle.35 rien # # record.01$Z $xiaf/NUAG.81$R64 $xiP/nuages.02 rien # # # # record.01$Z $xiaf/NUAG.81$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/NUAG.81$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/NUAG.81$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/NUAG.81$M$R64 $xiP/montagnes.91 rien # # # sequence 018539_018666 sequence 018667_018794 sequence 018795_018922 sequence 018923_019050 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xT/TEXTURE \ # # $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/multi_02.01$X # # $c A1=$xiim/NUAG.A.%04d # # $c A2=$xiim/NUAG.C.%04d # # $c standard=FAUX # # $c R=$xiim/NUAG.D.%04d # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xiim/NUAG.D.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xw1/NUAG.D.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xiim/NUAG.D.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=VRAI # # $c R=$xw1/NUAG.D$m.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xiim/NUAG.D.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c T=$xT/TEXTURE # # $c avion=FAUX # # $c R=$xw1/NUAG.D$M.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.D. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.91$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.D. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.91$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.91$R16 # # $Z ro $xiaf/NUAG.91$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.91$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.91$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.D$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.91$m$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.D$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.91$m$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.91$m$R16 # # $Z ro $xiaf/NUAG.91$m$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.91$m$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.91$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xw1/NUAG.D$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.91$M$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xw1/NUAG.D$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/NUAG.91$M$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/NUAG.91$M$R16 # # $Z ro $xiaf/NUAG.91$M$R64 # # # # $Z $xcg/unite$Z $xiaf/NUAG.91$M$R16 # # $Z $xcg/unite$Z $xiaf/NUAG.91$M$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/NUAG.D. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.D. 001 128 $xiP/nuages.02 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # $xci/disk_video_P$Z $xw1/NUAG.D$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/NUAG.D$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/NUAG.91$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/NUAG.91$R16 $xiP/nuages.02 rien # # record.01$Z $xiaf/NUAG.91$R64 $xiP/cercle.35 rien # # record.01$Z $xiaf/NUAG.91$R64 $xiP/nuages.02 rien # # # # record.01$Z $xiaf/NUAG.91$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/NUAG.91$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/NUAG.91$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/NUAG.91$M$R64 $xiP/montagnes.91 rien # # # sequence 019051_019304 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=254 # # # # $Z Std # # # # $Z S # # # # $Z $xci/filtre.01$X \ # # $Z A=$xiio/ETOILE.11 \ # # $Z N=$xiio/GAUSS.8110 \ # # $Z $formatI | \ # # $Z $xci/multi_02.01$X \ # # $Z A2=$xiio/GAUSS.8110 \ # # $Z R=$xTV/FILTRE \ # # $Z $formatI # # # # $Z Pal # # # # $Z eval `$xci/genere$X \\\ # # $Z commande='($xci/format.01$X \\\ # # $Z A=$xiirf/PAYS.u9$M%s \\\ # # $Z mode=2 \\\ # # $Z $formatI \\\ # # $Z R=$xTV/PAYSAGE%s \\\ # # $Z $formatR_Std)' \\\ # # $Z en_tete=FAUX RVB=VRAI separateur=VRAI` # # # # $Z Std # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c int main() # # $c { # # $c int n; # # $c int seuil=0; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/filtre.01$X # # $c A=$xTV/PAYSAGE$ROUGE # # $c N=$xTV/FILTRE # # $c seuil=%d # # $c $formatI | # # $c $xci/format.01$X # # $c mode=2 # # $c $formatI # # $c R=$xw1/PAYS.R.%04d$ROUGE # # $c $formatR_Pal\n" # # $c ,seuil,n # # $c ); # # $c printf("$xci/filtre.01$X # # $c A=$xTV/PAYSAGE$VERTE # # $c N=$xTV/FILTRE # # $c seuil=%d # # $c $formatI | # # $c $xci/format.01$X # # $c mode=2 # # $c $formatI # # $c R=$xw1/PAYS.R.%04d$VERTE # # $c $formatR_Pal\n" # # $c ,seuil,n # # $c ); # # $c printf("$xci/filtre.01$X # # $c A=$xTV/PAYSAGE$BLEUE # # $c N=$xTV/FILTRE # # $c seuil=%d # # $c $formatI | # # $c $xci/format.01$X # # $c mode=2 # # $c $formatI # # $c R=$xw1/PAYS.R.%04d$BLEUE # # $c $formatR_Pal\n" # # $c ,seuil,n # # $c ); # # # # $c seuil++; # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xw1/PAYS.R. $xiaf/PAYS.u9$Fi $Premiere $Derniere # # $Z $xci/reduction_64$Z $xw1/PAYS.R. $xiaf/PAYS.u9$Fi $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/PAYS.u9$Fi$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/PAYS.u9$Fi$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.u9$Fi$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/PAYS.u9$Fi$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/PAYS.R. 001 254 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYS.u9$Fi$R16 RVB Initialisation # # record.01$Z $xiaf/PAYS.u9$Fi$R64 RVB rien # # # sequence 019305_019320 sequence 019321_019336 sequence 019337_019352 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=16 # # # # # # $Z Pal # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/fract_2D.01$X \ # # $X standard=FAUX \ # # $X niveau=%04d \ # # $X R=$xiim/FRA2.H.%04d \ # # $X $formatI' # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/acces$X \ # # $X A=$xiim/FRA2.H.%04d \ # # $X standard=FAUX \ # # $X renormaliser=VRAI \ # # $X zero=FAUX \ # # $X R=$xw1/FRA2.H.%04d \ # # $X $formatI' # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/montagne.01$X \ # # $X A=$xiim/FRA2.H.%04d \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=FAUX \ # # $X R=$xw1/FRA2.H$M.%04d \ # # $X $formatI' # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/montagne.01$X \ # # $X A=$xiim/FRA2.H.%04d \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=VRAI \ # # $X R=$xw1/FRA2.H$m.%04d \ # # $X $formatI' # # # # # # $Z $xci/reduction_16$X A=$xw1/FRA2.H. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.C1$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.C1$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.C1$R16 # # # # $Z $xci/reduction_16$X A=$xw1/FRA2.H$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.C1$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.C1$M$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.C1$M$R16 # # # # $Z $xci/reduction_16$X A=$xw1/FRA2.H$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.C1$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.C1$m$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.C1$m$R16 # # # # # # Pal # # # # $xci/disk_video_P$Z $xw1/FRA2.H. 1 16 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.H$M. 1 16 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xw1/FRA2.H$m. 1 16 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.C1$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/FRA2.C1$R16 $xiP/nuages.02 rien # # # # record.01$Z $xiaf/FRA2.C1$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/FRA2.C1$m$R16 $xiP/montagnes.91 rien # # # sequence 019353_019480 sequence 019481_019544 sequence 019545_019608 # Images obtenues par (sur '$LACT29') : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # # # $Z S # # # # $Z Sdu # # # # $Z $xci/gauss$X \ # # $Z R=$xT/GAUSS \ # # $Z $formatI # # # # $Z Pal # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c mx=0.2 my=0.2 mz=0.2 # # $c Z=%.16f # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/COUP.1.%04d # # $c $formatI\n" # # $c ,Z # # $c ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/acces$X # # $c A=$xiim/COUP.1.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xiim/COUP.2.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/passe_bande$X # # $c A=$xiim/COUP.2.%04d # # $c inf=110 sup=140 # # $c $formatI | # # $c $xci/format.01$X # # $c $formatI # # $c mode=7 # # $c $formatR_Sdu | # # $c $xci/filtre.01$X # # $c N=$xT/GAUSS # # $c $format_Sdu | # # $c $xci/format.01$X # # $c $format_Sdu # # $c mode=7 # # $c R=$xiim/COUP.3.%04d # # $c $formatR_Pal\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/COUP.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.71$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/COUP.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.71$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/FRA3.71$R16 # # $Z ro $xiaf/FRA3.71$R64 # # # # $Z $xcg/unite$Z $xiaf/FRA3.71$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.71$R64 # # # # # # $Z $xci/reduction_16$X A=$xiim/COUP.3. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.72$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/COUP.3. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.72$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/FRA3.72$R16 # # $Z ro $xiaf/FRA3.72$R64 # # # # $Z $xcg/unite$Z $xiaf/FRA3.72$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.72$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.2. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/COUP.3. 001 128 $xiP/gris.01 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.71$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/FRA3.71$R64 $xiP/cercle.35 rien # # record.01$Z $xiaf/FRA3.72$R16 $xiP/gris.01 rien # # record.01$Z $xiaf/FRA3.72$R64 $xiP/gris.01 rien # # # # ATTENTION, la sequence : # # # # xivPdf 7 2 / 019481_019608 # # # # a ete enregistree en deux fois suite au probleme bien connu : # # # # WARNING: Frame transfer aborted: analog video input not locked # # # sequence 019609_019736 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.7 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COORDONNEES$ROUGE # # $Z $DELETE $xTV/COORDONNEES$VERTE # # $Z $DELETE $xTV/COORDONNEES$BLEUE # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.001 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$xci/seuil$X # # $c A=$xiim/COUP.3.%04d # # $c seuil=$GRIS_4 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.012 \ # # $Z sup=0.022 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $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 @ TeinteMagenta = $GRIS_7 # # $Z @ TeinteCyan = $GRIS_4 + $GRIS_8 # # # # $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ # # $Z vD=$TeinteMagenta vA=$TeinteCyan \ # # $Z cubique=FAUX \ # # $Z entiers=VRAI \ # # $Z > $xTV/COULEURS$TEINT # # $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ # # $Z vD=$GRIS_4 vA=$GRIS_4 \ # # $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 $DELETE $xT/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xT/ROTATION$COORD_X # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xT/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z Lz=1000 \ # # $Z R=$xiim/COUP.4. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.4. $xiaf/FRA3.91 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.4. $xiaf/FRA3.91 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.91$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.91$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.91$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.91$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.4. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.91$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.91$R64 RVB rien # # # sequence 019737_019864 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.7 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COORDONNEES$ROUGE # # $Z $DELETE $xTV/COORDONNEES$VERTE # # $Z $DELETE $xTV/COORDONNEES$BLEUE # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.008 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$xci/seuil$X # # $c A=$xiim/COUP.3.%04d # # $c seuil=$GRIS_4 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $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 @ TeinteMagenta = $GRIS_7 # # $Z @ TeinteCyan = $GRIS_4 + $GRIS_8 # # # # $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ # # $Z vD=$TeinteMagenta vA=$TeinteCyan \ # # $Z cubique=FAUX \ # # $Z entiers=VRAI \ # # $Z > $xTV/COULEURS$TEINT # # $Z $xci/valeurs_inte$X premiere=$Part0 derniere=$PartN \ # # $Z vD=$GRIS_4 vA=$GRIS_4 \ # # $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 $DELETE $xT/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xT/ROTATION$COORD_X # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xT/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z Lz=1000 \ # # $Z R=$xiim/COUP.5. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.5. $xiaf/FRA3.92 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.5. $xiaf/FRA3.92 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.92$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.92$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.92$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.92$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.5. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.92$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.92$R64 RVB rien # # # sequence 019865_019992 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.7 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COORDONNEES$ROUGE # # $Z $DELETE $xTV/COORDONNEES$VERTE # # $Z $DELETE $xTV/COORDONNEES$BLEUE # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.008 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$xci/seuil$X # # $c A=$xiim/COUP.3.%04d # # $c seuil=$GRIS_4 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/COULEUR1$ROUGE # # $Z $DELETE $xTV/COULEUR1$VERTE # # $Z $DELETE $xTV/COULEUR1$BLEUE # # # # $Z $DELETE $xTV/COULEUR2$ROUGE # # $Z $DELETE $xTV/COULEUR2$VERTE # # $Z $DELETE $xTV/COULEUR2$BLEUE # # # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # $Z set Npo=$NpointsXYZ # # # # $Z set Rouge=`$xrv/extrema.01$X CAL1=FAUX ne=$Npo fichier=$xTV/COORDONNEES$COORD_X` # # $Z set Verte=`$xrv/extrema.01$X CAL1=FAUX ne=$Npo fichier=$xTV/COORDONNEES$COORD_Y` # # $Z set Bleue=`$xrv/extrema.01$X CAL1=FAUX ne=$Npo fichier=$xTV/COORDONNEES$COORD_Z` # # # # $Z set hRouge=`echo $Rouge | $SE -e "s/^.*facteur[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set tRouge=`echo $Rouge | $SE -e "s/^.*translation[^=]*=\([-+.0-9]*\).*/\1/"` # # # # $Z set hVerte=`echo $Verte | $SE -e "s/^.*facteur[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set tVerte=`echo $Verte | $SE -e "s/^.*translation[^=]*=\([-+.0-9]*\).*/\1/"` # # # # $Z set hBleue=`echo $Bleue | $SE -e "s/^.*facteur[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set tBleue=`echo $Bleue | $SE -e "s/^.*translation[^=]*=\([-+.0-9]*\).*/\1/"` # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COORDONNEES$COORD_X \ # # $Z homothetie=$hRouge \ # # $Z translation=$tRouge \ # # $Z > $xTV/COULEUR1$ROUGE # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COORDONNEES$COORD_Y \ # # $Z homothetie=$hVerte \ # # $Z translation=$tVerte \ # # $Z > $xTV/COULEUR1$VERTE # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COORDONNEES$COORD_Z \ # # $Z homothetie=$hBleue \ # # $Z translation=$tBleue \ # # $Z > $xTV/COULEUR1$BLEUE # # # # $Z set qpi=`$xcg/MUL2.01$X n1=2 n2=$dpi` # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COULEUR1$ROUGE \ # # $Z homothetie=$qpi \ # # $Z translation=0 \ # # $Z > $xTV/COULEUR2$ROUGE # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COULEUR1$VERTE \ # # $Z homothetie=$qpi \ # # $Z translation=0 \ # # $Z > $xTV/COULEUR2$VERTE # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COULEUR1$BLEUE \ # # $Z homothetie=$qpi \ # # $Z translation=0 \ # # $Z > $xTV/COULEUR2$BLEUE # # # # $Z set gammaR = 175 # # $Z @ betaR = $GRIS_8 - $gammaR # # $Z $xrv/CERCLE.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COULEUR2$ROUGE \ # # $Z r=1 h=0 T=0 \ # # $Z alpha=0 beta=$betaR gamma=$gammaR \ # # $Z > $xTV/COULEURS$ROUGE # # # # $Z set gammaV = 170 # # $Z @ betaV = $GRIS_8 - $gammaV # # $Z $xrv/CERCLE.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COULEUR2$VERTE \ # # $Z r=1 h=0 T=0 \ # # $Z alpha=0 beta=$betaV gamma=$gammaV \ # # $Z > $xTV/COULEURS$VERTE # # # # $Z set gammaB = 190 # # $Z @ betaB = $GRIS_8 - $gammaB # # $Z $xrv/CERCLE.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/COULEUR2$BLEUE \ # # $Z r=1 h=0 T=0 \ # # $Z alpha=0 beta=$betaB gamma=$gammaB \ # # $Z > $xTV/COULEURS$BLEUE # # # # $Z $DELETE $xT/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xT/ROTATION$COORD_X # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xT/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z Lz=1000 \ # # $Z R=$xiim/COUP.6. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.6. $xiaf/FRA3.93 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.6. $xiaf/FRA3.93 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.93$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.93$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.93$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.93$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.6. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.93$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.93$R64 RVB rien # # # sequence 019993_020120 # Images obtenues par (sur '$LACT29') : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c mx=0.2 my=0.2 mz=0.2 # # $c Z=%.16f # # $c profondeur=1 # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/COUP.X.%04d # # $c $formatI\n" # # $c ,Z # # $c ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/acces$X # # $c A=$xiim/COUP.X.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xiim/COUP.Y.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xiim/COUP.Y.%04d # # $c p=$xiP/cercle.B5 # # $c RVB=VRAI # # $c R=$xiim/COUP.Z.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/COUP.Y. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.A1$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/COUP.Y. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.A1$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/FRA3.A1$R16 # # $Z ro $xiaf/FRA3.A1$R64 # # # # $Z $xcg/unite$Z $xiaf/FRA3.A1$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.A1$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.Y. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.A1$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/FRA3.A1$R64 $xiP/cercle.35 rien # # # sequence 020121_020248 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.7 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.008 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/seuil$X # # $c A=$xiim/COUP.3.%04d # # $c seuil=$GRIS_4 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z Lz=1000 \ # # $Z R=$xiim/COUP.7. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.7. $xiaf/FRA3.94 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.7. $xiaf/FRA3.94 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.94$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.94$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.94$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.94$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.7. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.94$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.94$R64 RVB rien # # # sequence 020249_020376 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.008 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/COUP.2.%04d # # $c inf=119 sup=131 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.4 ZmaximumT=1.0 \ # # $Z R=$xiim/COUP.8. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.8. $xiaf/FRA3.B1 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.8. $xiaf/FRA3.B1 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.B1$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.B1$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.B1$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.B1$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.8. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.B1$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.B1$R64 RVB rien # # # sequence 020377_020504 sequence 020505_020632 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.015 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/COUP.2.%04d # # $c inf=119 sup=131 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xcg/parallele.1N$X \ # # $Z commande11="$xrv/particule.10$X # # $Z np=$Nimages # # $Z iterations=$NpointsXYZ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE # # $Z LISTE_RAYON=$xTV/COORDONNEES.r # # $Z zoom_automatique=FAUX ZOOM=0.7 # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X # # $Z coordonnees_dans_0_1=VRAI # # $Z brume=FAUX # # $Z Lz=1000 # # $Z ZminimumT=0.4 ZmaximumT=1.0 # # $Z Zminimum=0.4 Zmaximum=1.0 # # $Z R=$xiim/COUP.9. # # $Z $formatI" \ # # $Z commande21="$xrv/particule.10$X # # $Z np=$Nimages # # $Z iterations=$NpointsXYZ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE # # $Z LISTE_RAYON=$xTV/COORDONNEES.r # # $Z zoom_automatique=FAUX ZOOM=0.7 # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X # # $Z coordonnees_dans_0_1=VRAI # # $Z brume=VRAI # # $Z Lz=1000 # # $Z ZminimumT=0.4 ZmaximumT=1.0 # # $Z Zminimum=0.4 Zmaximum=1.0 # # $Z R=$xiim/COUP.A. # # $Z $formatI" # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.9. $xiaf/FRA3.B2 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.9. $xiaf/FRA3.B2 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.B2$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.B2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.B2$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.B2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/COUP.9.0029%s $xiirf/FRA3.B2.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.B2.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.B2.0029%s' RVB=VRAI # # # # $Z $xci/reduction_16$Z $xiim/COUP.A. $xiaf/FRA3.C2 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.A. $xiaf/FRA3.C2 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.C2$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.C2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.C2$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.C2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/COUP.A.0029%s $xiirf/FRA3.C2.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.C2.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.C2.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.9. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/COUP.A. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.B2$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.B2$R64 RVB rien # # record.01$Z $xiirf/FRA3.B2.0029 RVB rien # # record.01$Z $xiaf/FRA3.C2$R16 RVB rien # # record.01$Z $xiaf/FRA3.C2$R64 RVB rien # # record.01$Z $xiirf/FRA3.C2.0029 RVB rien # # # sequence 020633_020760 # Images obtenues par (sur '$LACT29') : # # # # # # $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/vraies_C$X # # $c A=$xiim/COUP.Y.%04d # # $c p=$xiP/trou_noir.84 # # $c RVB=VRAI # # $c R=$xiim/COUP.Z.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.Z. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # ATTENTION, ce calcul a ete refait ci-apres car, en effet, il est imperatif que la # # palette utilisee ('$xiP/trou_noir.84') ne contienne pas de niveaux a 'NOIR' afin que # # par la suite, lors du calcul des fichiers '$xTV/COULEUR.%04d.?' on trouve le meme nombre # # de points pour les trois composantes {$ROUGE,$VERTE,$BLEUE}. C'est le cas de la palette # # '$xiP/trou_noir.74' mais pas de la palette '$xiP/trou_noir.84'... # sequence 020761_020888 # Images obtenues par (sur '$LACT29') : # # # # # # $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/vraies_C$X # # $c A=$xiim/COUP.Y.%04d # # $c p=$xiP/trou_noir.74 # # $c RVB=VRAI # # $c R=$xiim/COUP.Z.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.Z. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # sequence 020889_021016 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.015 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/COUP.2.%04d # # $c inf=120 sup=128 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z brume=FAUX \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.4 ZmaximumT=1.0 \ # # $Z Zminimum=0.4 Zmaximum=1.0 \ # # $Z R=$xiim/COUP.B. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.B. $xiaf/FRA3.D2 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.B. $xiaf/FRA3.D2 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.D2$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.D2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.D2$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.D2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/COUP.B.0029%s $xiirf/FRA3.D2.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.D2.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.D2.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.B. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.D2$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.D2$R64 RVB rien # # record.01$Z $xiirf/FRA3.D2.0029 RVB rien # # # sequence 021017_021144 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.050 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/COUP.2.%04d # # $c inf=121 sup=127 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/COUP.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z brume=FAUX \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.4 ZmaximumT=1.0 \ # # $Z Zminimum=0.4 Zmaximum=1.0 \ # # $Z N_au_carre=FAUX \ # # $Z R=$xiim/COUP.C. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/COUP.C. $xiaf/FRA3.D3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/COUP.C. $xiaf/FRA3.D3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.D3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.D3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.D3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.D3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/COUP.C.0029%s $xiirf/FRA3.D3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.D3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.D3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/COUP.C. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.D3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.D3$R64 RVB rien # # record.01$Z $xiirf/FRA3.D3.0029 RVB rien # # # sequence 021145_021272 # Images obtenues par (sur '$LACT29') : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c mx=0.25 my=0.25 mz=0.25 # # $c OX=0.0 EX=1.0 # # $c OY=0.0 EY=1.0 # # $c OZ=0.0 EZ=1.0 # # $c Z=%.16f # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/FRAC.1.%04d # # $c $formatI\n" # # $c ,Z # # $c ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.1.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xiim/FRAC.2.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/FRAC.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.E1$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/FRAC.2. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.E1$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/FRA3.E1$R16 # # $Z ro $xiaf/FRA3.E1$R64 # # # # $Z $xcg/unite$Z $xiaf/FRA3.E1$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.E1$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.2. 001 128 $xiP/cercle.35 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.E1$R16 $xiP/cercle.35 Initialisation # # record.01$Z $xiaf/FRA3.E1$R64 $xiP/cercle.35 rien # # # sequence 021273_021400 # Images obtenues par (sur '$LACT29') : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z Pal # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define OZ 0.0 # # $c #define EZ 1.0 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double Z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$xci/fract_3D.01$X # # $c mx=0.25 my=0.25 mz=0.25 # # $c OX=0.0 EX=1.0 # # $c OY=0.0 EY=1.0 # # $c OZ=0.0 EZ=1.0 # # $c Z=%.16f # # $c profondeur=1 # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/FRAC.X.%04d # # $c $formatI\n" # # $c ,Z # # $c ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xiim/FRAC.Y.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xiim/FRAC.Y.%04d # # $c p=$xiP/trou_noir.74 # # $c RVB=VRAI # # $c R=$xiim/FRAC.Z.%04d # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c } # # $c } # # # # # # $Z Pal # # # # $Z $xci/reduction_16$X A=$xiim/FRAC.Y. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.E2$R16 \ # # $Z $formatI # # $Z $xci/reduction_64$X A=$xiim/FRAC.Y. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=FAUX \ # # $Z R=$xiaf/FRA3.E2$R64 \ # # $Z $formatI # # # # $Z ro $xiaf/FRA3.E2$R16 # # $Z ro $xiaf/FRA3.E2$R64 # # # # $Z $xcg/unite$Z $xiaf/FRA3.E2$R16 # # $Z $xcg/unite$Z $xiaf/FRA3.E2$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.Z. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.E2$R16 $xiP/trou_noir.74 Initialisation # # record.01$Z $xiaf/FRA3.E2$R64 $xiP/trou_noir.74 rien # # # sequence 021401_021528 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.050 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/FRAC.2.%04d # # $c inf=121 sup=127 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.010 \ # # $Z sup=0.010 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z brume=FAUX \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.4 ZmaximumT=1.0 \ # # $Z Zminimum=0.4 Zmaximum=1.0 \ # # $Z N_au_carre=FAUX \ # # $Z R=$xiim/FRAC.C. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.C. $xiaf/FRA3.E3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.C. $xiaf/FRA3.E3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.E3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.E3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.E3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.E3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/FRAC.C.0029%s $xiirf/FRA3.E3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.E3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.E3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.C. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.E3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.E3$R64 RVB rien # # record.01$Z $xiirf/FRA3.E3.0029 RVB rien # # # sequence 021529_021656 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.075 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/FRAC.2.%04d # # $c inf=122 sup=126 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.018 \ # # $Z sup=0.018 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z brume=FAUX \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.4 ZmaximumT=1.0 \ # # $Z Zminimum=0.4 Zmaximum=1.0 \ # # $Z N_au_carre=FAUX \ # # $Z R=$xiim/FRAC.D. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.D. $xiaf/FRA3.F3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.D. $xiaf/FRA3.F3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.F3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.F3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.F3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.F3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/FRAC.D.0029%s $xiirf/FRA3.F3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.F3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.F3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.D. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.F3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.F3$R64 RVB rien # # record.01$Z $xiirf/FRA3.F3.0029 RVB rien # # # sequence 021657_021784 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.075 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/FRAC.2.%04d # # $c inf=122 sup=126 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.024 \ # # $Z sup=0.024 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/COORDONNEES.r \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z brume=FAUX \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.1 ZmaximumT=1.0 \ # # $Z Zminimum=0.1 Zmaximum=1.0 \ # # $Z N_au_carre=FAUX \ # # $Z R=$xiim/FRAC.E. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.E. $xiaf/FRA3.G3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.E. $xiaf/FRA3.G3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.G3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.G3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.G3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.G3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/FRAC.E.0029%s $xiirf/FRA3.G3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.G3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.G3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.E. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.G3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.G3$R64 RVB rien # # record.01$Z $xiirf/FRA3.G3.0029 RVB rien # # # sequence 021785_021912 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/COORDONNEES.r # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.075 # # $c #define GRAINE 7 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/FRAC.2.%04d # # $c inf=122 sup=126 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/random.02$X # # $c graine=%d # # $c seuil=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z $xci/valeurs_alea$X \ # # $Z premiere=$Part0 derniere=$PartN \ # # $Z inf=0.024 \ # # $Z sup=0.024 \ # # $Z graine=9999 \ # # $Z > $xTV/COORDONNEES.r # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X \ # # $Z p=$Premiere d=$Derniere \ # # $Z vD=0.78157044667397 vA=+0.78157044667397 \ # # $Z cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z set Npo=$NpointsXYZ # # # # $Z set MmX=`$xrv/extrema.01$X CAL1=FAUX ne=$Npo fichier=$xTV/COORDONNEES$COORD_X` # # $Z set MmY=`$xrv/extrema.01$X CAL1=FAUX ne=$Npo fichier=$xTV/COORDONNEES$COORD_Y` # # $Z set MmZ=`$xrv/extrema.01$X CAL1=FAUX ne=$Npo fichier=$xTV/COORDONNEES$COORD_Z` # # # # $Z set MinX=`echo $MmX | $SE -e "s/^.*minimum[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set MaxX=`echo $MmX | $SE -e "s/^.*maximum[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set LenX=`$xcg/SOUS.01$X a=$MaxX b=$MinX` # # $Z set PasX=`$xcg/DIVZ.01$X a=$LenX b=$Nimages` # # # # $Z set MinY=`echo $MmY | $SE -e "s/^.*minimum[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set MaxY=`echo $MmY | $SE -e "s/^.*maximum[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set LenY=`$xcg/SOUS.01$X a=$MaxY b=$MinY` # # $Z set PasY=`$xcg/DIVZ.01$X a=$LenY b=$Nimages` # # # # $Z set MinZ=`echo $MmZ | $SE -e "s/^.*minimum[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set MaxZ=`echo $MmZ | $SE -e "s/^.*maximum[^=]*=\([-+.0-9]*\).*/\1/"` # # $Z set LenZ=`$xcg/SOUS.01$X a=$MaxZ b=$MinZ` # # $Z set PasZ=`$xcg/DIVZ.01$X a=$LenZ b=$Nimages` # # # # $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/TCOORD.1$COORD_X\n"); # # $c printf("$DELETE $xTV/TCOORD.2$COORD_X\n"); # # $c printf("$DELETE $xTV/TCOORD.1$COORD_Y\n"); # # $c printf("$DELETE $xTV/TCOORD.2$COORD_Y\n"); # # $c printf("$DELETE $xTV/TCOORD.1$COORD_Z\n"); # # $c printf("$DELETE $xTV/TCOORD.2$COORD_Z\n"); # # # # $c printf("set TraX=`$xcg/MUL2.01$X a=$PasX b=%d`\n" # # $c ,(n-N0) # # $c ); # # # # $c printf("set TraY=`$xcg/MUL2.01$X a=$PasY b=%d`\n" # # $c ,(n-N0) # # $c ); # # # # $c printf("set TraZ=`$xcg/MUL2.01$X a=$PasZ b=%d`\n" # # $c ,(n-N0) # # $c ); # # # # $c printf("$xrv/AXPB.01$X # # $c ne=$NpointsXYZ # # $c fichier=$xTV/COORDONNEES$COORD_X # # $c homothetie=1 # # $c translation=$TraX # # $c > $xTV/TCOORD.1$COORD_X\n" # # $c ); # # $c printf("$xrv/MODF.01$X # # $c ne=$NpointsXYZ # # $c fichier=$xTV/TCOORD.1$COORD_X # # $c origine=$MinX # # $c extremite=$MaxX # # $c > $xTV/TCOORD.2$COORD_X\n" # # $c ); # # # # $c printf("$xrv/AXPB.01$X # # $c ne=$NpointsXYZ # # $c fichier=$xTV/COORDONNEES$COORD_Y # # $c homothetie=1 # # $c translation=$TraY # # $c > $xTV/TCOORD.1$COORD_Y\n" # # $c ); # # $c printf("$xrv/MODF.01$X # # $c ne=$NpointsXYZ # # $c fichier=$xTV/TCOORD.1$COORD_Y # # $c origine=$MinY # # $c extremite=$MaxY # # $c > $xTV/TCOORD.2$COORD_Y\n" # # $c ); # # # # $c printf("$xrv/AXPB.01$X # # $c ne=$NpointsXYZ # # $c fichier=$xTV/COORDONNEES$COORD_Z # # $c homothetie=1 # # $c translation=$TraZ # # $c > $xTV/TCOORD.1$COORD_Z\n" # # $c ); # # $c printf("$xrv/MODF.01$X # # $c ne=$NpointsXYZ # # $c fichier=$xTV/TCOORD.1$COORD_Z # # $c origine=$MinZ # # $c extremite=$MaxZ # # $c > $xTV/TCOORD.2$COORD_Z\n" # # $c ); # # # # $c printf("$xrv/particule.10$X # # $c np=1 # # $c iterations=$NpointsXYZ # # $c LISTE_X=$xTV/TCOORD.2$COORD_X # # $c LISTE_Y=$xTV/TCOORD.2$COORD_Y # # $c LISTE_Z=$xTV/TCOORD.2$COORD_Z # # $c LISTE_ROUGE=$xTV/COULEURS$ROUGE # # $c LISTE_VERTE=$xTV/COULEURS$VERTE # # $c LISTE_BLEUE=$xTV/COULEURS$BLEUE # # $c LISTE_RAYON=$xTV/COORDONNEES.r # # $c zoom_automatique=FAUX ZOOM=0.7 # # $c ROTATION_OX=$xTV/ROTATION$COORD_X # # $c coordonnees_dans_0_1=VRAI # # $c brume=FAUX # # $c Lz=1000 # # $c ZminimumT=0.1 ZmaximumT=1.0 # # $c Zminimum=0.1 Zmaximum=1.0 # # $c N_au_carre=FAUX # # $c R=$xTV/FRAC.F. # # $c $formatI\n" # # $c ); # # # # $c printf("$CP $xTV/FRAC.F.%04d$ROUGE # # $c $xiim/FRAC.F.%04d$ROUGE\n" # # $c ,N0,n # # $c ); # # $c printf("$CP $xTV/FRAC.F.%04d$VERTE # # $c $xiim/FRAC.F.%04d$VERTE\n" # # $c ,N0,n # # $c ); # # $c printf("$CP $xTV/FRAC.F.%04d$BLEUE # # $c $xiim/FRAC.F.%04d$BLEUE\n" # # $c ,N0,n # # $c ); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.F. $xiaf/FRA3.H3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.F. $xiaf/FRA3.H3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.H3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.H3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.H3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.H3$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.F. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.H3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.H3$R64 RVB rien # # # sequence 021913_022040 # Generee (sur '$LACT29') par : # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # $Z Pal # # # # $Z @ Zmin = $Premiere - $Premiere # # $Z @ Zmax = $Derniere - $Premiere # # $Z @ tailleZ = $Zmax - $Zmin # # $Z @ tailleZ = $tailleZ + 1 # # $Z setenv dimZ $tailleZ # # # # $Z set fracZ = `$xcg/DIVZ.01$X a=1 b=$dimZ signe="$K_VIDE"` # # $Z set fracZ = `$xcg/MUL2.01$X a=0.5 b=$fracZ signe="$K_VIDE"` # # # # $Z $DELETE $xTV/COORDONNEES$COORD_X # # $Z $DELETE $xTV/COORDONNEES$COORD_Y # # $Z $DELETE $xTV/COORDONNEES$COORD_Z # # $Z $DELETE $xTV/RAYON.1 # # $Z $DELETE $xTV/RAYON.2 # # $Z $DELETE $xTV/COULEURS$ROUGE # # $Z $DELETE $xTV/COULEURS$VERTE # # $Z $DELETE $xTV/COULEURS$BLEUE # # # # # # $c #define N0 Premiere # # $c #define N Derniere # # # # $c #define SEUIL 0.075 # # $c #define GRAINE 7 # # # # $c #define OZ (-0.5) # # $c #define EZ (+0.5) # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c double z=((EZ*(n-N0))+(OZ*(N-n)))/(N-N0); # # # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$VERTE\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$DELETE $xTV/RAYON.%04d$ROUGE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/passe_bande$X # # $c A=$xiim/FRAC.2.%04d # # $c inf=122 sup=126 # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=$GRIS_1 # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/gauss$X # # $c c=8 # # $c z=%f # # $c R=$xTV/GAUSS # # $c $formatI\n" # # $c ,z # # $c ); # # # # $c printf("$xci/random.03$X # # $c C=$xTV/GAUSS # # $c graine=%d # # $c facteur=%f # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/COUPE # # $c R=$xTV/COUPE # # $c $formatI\n" # # $c ,(n*GRAINE) # # $c ,SEUIL # # $c ); # # # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=VRAI # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=VRAI # # $c eNIVEAU=FAUX # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$xci/liste_points$X # # $c A=$xTV/COUPE # # $c rectangulaire=FAUX # # $c grand_carre=FAUX # # $c centrer=VRAI # # $c Cdenormaliser=FAUX # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=FAUX # # $c points=VRAI # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("set Npoints=`$CA $xTV/COORDO.%04d.p`\n" # # $c ,n # # $c ); # # # # $c printf("$xci/valeurs_alea$X # # $c premiere=1 # # $c derniere=$Npoints # # $c inf=-$fracZ # # $c sup=+$fracZ # # $c graine=%d # # $c > $xTV/COORDT.%04d$COORD_Z\n" # # $c ,(n*GRAINE) # # $c ,n # # $c ); # # $c printf("@ CoordZ = %d - %d\n" # # $c ,n,N0 # # $c ); # # $c printf("set CoordZ=`$xci/coordonnees$X # # $c abscisse=FAUX # # $c ordonnee=FAUX # # $c profondeur=VRAI # # $c Z=$CoordZ # # $c denormaliser=FAUX # # $c Zmin=$Zmin Zmax=$Zmax`\n" # # $c ); # # $c printf("$xrv/ADD2.11$X # # $c ne=$Npoints # # $c fichier1=$CoordZ # # $c fichier2=$xTV/COORDT.%04d$COORD_Z # # $c > $xTV/COORDO.%04d$COORD_Z\n" # # $c ,n # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDT.%04d$COORD_Z\n" # # $c ,n # # $c ); # # $c printf("$DELETE $xTV/COORDO.%04d.p\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/COORDO.%04d$COORD_X # # $c >>! $xTV/COORDONNEES$COORD_X\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Y # # $c >>! $xTV/COORDONNEES$COORD_Y\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COORDO.%04d$COORD_Z # # $c >>! $xTV/COORDONNEES$COORD_Z\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$ROUGE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$ROUGE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$VERTE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$VERTE\n" # # $c ,n,n # # $c ); # # $c printf("$xci/and$X # # $c A1=$xiim/FRAC.Z.%04d$BLEUE # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/COULEUR.%04d$BLEUE\n" # # $c ,n,n # # $c ); # # # # $c printf("$CA $xTV/COULEUR.%04d$ROUGE # # $c >>! $xTV/COULEURS$ROUGE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$VERTE # # $c >>! $xTV/COULEURS$VERTE\n" # # $c ,n # # $c ); # # $c printf("$CA $xTV/COULEUR.%04d$BLEUE # # $c >>! $xTV/COULEURS$BLEUE\n" # # $c ,n # # $c ); # # # # $c printf("$xci/and$X # # $c A1=$xTV/GAUSS # # $c A2=$xTV/COUPE # # $c $formatI | # # $c $xci/liste_points$X # # $c eX=FAUX # # $c eY=FAUX # # $c eNIVEAU=VRAI # # $c points=FAUX # # $c $formatI # # $c | $SE -e 's/^.*=//' # # $c > $xTV/RAYON.%04d\n" # # $c ,n # # $c ); # # # # $c printf("$CA $xTV/RAYON.%04d # # $c >>! $xTV/RAYON.1\n" # # $c ,n # # $c ); # # $c } # # # # $c } # # # # $Z set NpointsX=`$WC $xTV/COORDONNEES$COORD_X` # # $Z set NpointsX=$NpointsX[$WC1] # # $Z set NpointsY=`$WC $xTV/COORDONNEES$COORD_Y` # # $Z set NpointsY=$NpointsY[$WC1] # # $Z set NpointsZ=`$WC $xTV/COORDONNEES$COORD_Z` # # $Z set NpointsZ=$NpointsZ[$WC1] # # # # $Z set NpointsXY=`$xcg/MIN2.01$X n1=$NpointsX n2=$NpointsY` # # $Z set NpointsXYZ=`$xcg/MIN2.01$X n1=$NpointsXY n2=$NpointsZ` # # # # $Z set Part0=1 # # $Z set PartN=$NpointsXYZ # # # # $Z set hRayon=0.016 # # $Z set hRayon=`$xcg/DIVZ.01$X a=$hRayon b=$BLANC` # # $Z set tRayon=0.008 # # # # $Z $xrv/AXPB.01$X \ # # $Z ne=$NpointsXYZ \ # # $Z fichier=$xTV/RAYON.1 \ # # $Z homothetie=$hRayon \ # # $Z translation=$tRayon \ # # $Z > $xTV/RAYON.2 # # # # $Z $DELETE $xTV/ROTATION$COORD_X # # $Z $xci/valeurs_inte$X p=$Premiere d=$Derniere vD=0 vA=$dpi cubique=VRAI \ # # $Z > $xTV/ROTATION$COORD_X # # # # # # $Z $xrv/particule.10$X \ # # $Z np=$Nimages \ # # $Z iterations=$NpointsXYZ \ # # $Z LISTE_X=$xTV/COORDONNEES$COORD_X \ # # $Z LISTE_Y=$xTV/COORDONNEES$COORD_Y \ # # $Z LISTE_Z=$xTV/COORDONNEES$COORD_Z \ # # $Z LISTE_ROUGE=$xTV/COULEURS$ROUGE \ # # $Z LISTE_VERTE=$xTV/COULEURS$VERTE \ # # $Z LISTE_BLEUE=$xTV/COULEURS$BLEUE \ # # $Z LISTE_RAYON=$xTV/RAYON.2 \ # # $Z zoom_automatique=FAUX ZOOM=0.7 \ # # $Z ROTATION_OX=$xTV/ROTATION$COORD_X \ # # $Z coordonnees_dans_0_1=VRAI \ # # $Z brume=FAUX \ # # $Z Lz=1000 \ # # $Z ZminimumT=0.1 ZmaximumT=1.0 \ # # $Z Zminimum=0.1 Zmaximum=1.0 \ # # $Z N_au_carre=FAUX \ # # $Z R=$xiim/FRAC.G. \ # # $Z $formatI # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.G. $xiaf/FRA3.I3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.G. $xiaf/FRA3.I3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.I3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.I3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.I3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.I3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/FRAC.G.0029%s $xiirf/FRA3.I3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.I3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.I3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.G. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.I3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.I3$R64 RVB rien # # record.01$Z $xiirf/FRA3.I3.0029 RVB rien # # # sequence 022041_022168 # 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 #define PAQUET 8 # # # # $c int main() # # $c { # # $c int n; # # # # $c for (n=(N+1) ; n<=(N+PAQUET-1) ; n++) # # $c { # # $c printf("$CP $xiim/FRAC.G.%04d$ROUGE # # $c $xiim/FRAC.G.%04d$ROUGE\n" # # $c ,N0+(n-N)-1,n # # $c ); # # $c printf("$CP $xiim/FRAC.G.%04d$VERTE # # $c $xiim/FRAC.G.%04d$VERTE\n" # # $c ,N0+(n-N)-1,n # # $c ); # # $c printf("$CP $xiim/FRAC.G.%04d$BLEUE # # $c $xiim/FRAC.G.%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 printf("$xci/accumule.01$X A=$xiim/FRAC.G. # # $c postfixe=$ROUGE # # $c premiere=%d derniere=%d # # $c R=$xiim/FRAC.H.%04d$ROUGE # # $c $formatI\n" # # $c ,n,np,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xiim/FRAC.G. # # $c postfixe=$VERTE # # $c premiere=%d derniere=%d # # $c R=$xiim/FRAC.H.%04d$VERTE # # $c $formatI\n" # # $c ,n,np,n # # $c ); # # $c printf("$xci/accumule.01$X A=$xiim/FRAC.G. # # $c postfixe=$BLEUE # # $c premiere=%d derniere=%d # # $c R=$xiim/FRAC.H.%04d$BLEUE # # $c $formatI\n" # # $c ,n,np,n # # $c ); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.H. $xiaf/FRA3.J3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.H. $xiaf/FRA3.J3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.J3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.J3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.J3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.J3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/FRAC.H.0029%s $xiirf/FRA3.J3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.J3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.J3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.H. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.J3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.J3$R64 RVB rien # # record.01$Z $xiirf/FRA3.J3.0029 RVB rien # # # # ATTENTION, cette sequence presente des anomalies de couleur et de luminance ; celles-ci # # sont dues de toute evidence au fait que l'accumulation par '$xci/accumule.01$X' fait une # # renormalisation des images ; or cette renormalisation est independante d'une couleur a # # l'autre {$ROUGE,$VERTE,$BLEUE}, mais aussi d'une image '%04d' a l'autre... # sequence 022169_022296 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z S # # # # $Z Sdu # # # # $Z $xci/gauss$X \ # # $Z R=$xTV/GAUSS \ # # $Z $formatI # # # # $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("Pal\n"); # # # # $c printf("$xci/format.01$X A=$xiim/FRAC.G.%04d$ROUGE # # $c $formatI # # $c mode=7 # # $c R=$xTV/FRAC.1$ROUGE # # $c $formatR_Sdu\n" # # $c ,n # # $c ); # # $c printf("$xci/format.01$X A=$xiim/FRAC.G.%04d$VERTE # # $c $formatI # # $c mode=7 # # $c R=$xTV/FRAC.1$VERTE # # $c $formatR_Sdu\n" # # $c ,n # # $c ); # # $c printf("$xci/format.01$X A=$xiim/FRAC.G.%04d$BLEUE # # $c $formatI # # $c mode=7 # # $c R=$xTV/FRAC.1$BLEUE # # $c $formatR_Sdu\n" # # $c ,n # # $c ); # # # # $c printf("Sdu\n"); # # # # $c printf("$xci/filtre.01$X A=$xTV/FRAC.1$ROUGE # # $c N=$xTV/GAUSS # # $c seuil=$GRIS_7 # # $c R=$xTV/FRAC.2$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/filtre.01$X A=$xTV/FRAC.1$VERTE # # $c N=$xTV/GAUSS # # $c seuil=$GRIS_7 # # $c R=$xTV/FRAC.2$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/filtre.01$X A=$xTV/FRAC.1$BLEUE # # $c N=$xTV/GAUSS # # $c seuil=$GRIS_7 # # $c R=$xTV/FRAC.2$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/format.01$X A=$xTV/FRAC.2$ROUGE # # $c $formatI # # $c mode=7 # # $c R=$xiim/FRAC.I.%04d$ROUGE # # $c $formatR_Pal\n" # # $c ,n # # $c ); # # $c printf("$xci/format.01$X A=$xTV/FRAC.2$VERTE # # $c $formatI # # $c mode=7 # # $c R=$xiim/FRAC.I.%04d$VERTE # # $c $formatR_Pal\n" # # $c ,n # # $c ); # # $c printf("$xci/format.01$X A=$xTV/FRAC.2$BLEUE # # $c $formatI # # $c mode=7 # # $c R=$xiim/FRAC.I.%04d$BLEUE # # $c $formatR_Pal\n" # # $c ,n # # $c ); # # # # $c printf("Pal\n"); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.I. $xiaf/FRA3.K3 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.I. $xiaf/FRA3.K3 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.K3$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.K3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.K3$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.K3$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/FRAC.I.0029%s $xiirf/FRA3.K3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='ro $xiirf/FRA3.K3.0029%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/FRA3.K3.0029%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.I. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.K3$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.K3$R64 RVB rien # # record.01$Z $xiirf/FRA3.K3.0029 RVB rien # # # sequence 022297_022424 sequence 022425_022552 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/gauss$X \ # # $Z c=20 \ # # $Z R=$xTV/GAUSS \ # # $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/interpole.02$X # # $c A1=$xiim/FRAC.G.%04d$ROUGE # # $c A2=$xiim/FRAC.I.%04d$ROUGE # # $c P=$xTV/GAUSS # # $c R=$xiim/FRAC.J.%04d$ROUGE # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xiim/FRAC.G.%04d$VERTE # # $c A2=$xiim/FRAC.I.%04d$VERTE # # $c P=$xTV/GAUSS # # $c R=$xiim/FRAC.J.%04d$VERTE # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xiim/FRAC.G.%04d$BLEUE # # $c A2=$xiim/FRAC.I.%04d$BLEUE # # $c P=$xTV/GAUSS # # $c R=$xiim/FRAC.J.%04d$BLEUE # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xiim/FRAC.I.%04d$ROUGE # # $c A2=$xiim/FRAC.G.%04d$ROUGE # # $c P=$xTV/GAUSS # # $c R=$xiim/FRAC.K.%04d$ROUGE # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xiim/FRAC.I.%04d$VERTE # # $c A2=$xiim/FRAC.G.%04d$VERTE # # $c P=$xTV/GAUSS # # $c R=$xiim/FRAC.K.%04d$VERTE # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # $c printf("$xci/interpole.02$X # # $c A1=$xiim/FRAC.I.%04d$BLEUE # # $c A2=$xiim/FRAC.G.%04d$BLEUE # # $c P=$xTV/GAUSS # # $c R=$xiim/FRAC.K.%04d$BLEUE # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # $c } # # $c } # # # # $Z Pal # # # # $Z $xci/reduction_16$Z $xiim/FRAC.J. $xiaf/FRA3.L1 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.J. $xiaf/FRA3.L1 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.L1$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.L1$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.L1$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.L1$R64%s' RVB=VRAI # # # # # # $Z $xci/reduction_16$Z $xiim/FRAC.K. $xiaf/FRA3.L2 $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/FRAC.K. $xiaf/FRA3.L2 $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/FRA3.L2$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/FRA3.L2$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.L2$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/FRA3.L2$R64%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.J. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRAC.K. 001 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA3.L1$R16 RVB Initialisation # # record.01$Z $xiaf/FRA3.L1$R64 RVB rien # # record.01$Z $xiaf/FRA3.L2$R16 RVB rien # # record.01$Z $xiaf/FRA3.L2$R64 RVB rien # # # sequence 022553_022680 sequence 022681_022808 sequence 022809_022936 sequence 022937_023064 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/maximum$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=FAUX \ # # $X R=$xiim/FRA2.I$M.%04d \ # # $X $formatI' # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/maximum$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=VRAI \ # # $X R=$xiim/FRA2.I$m.%04d \ # # $X $formatI' # # # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/minmax$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=FAUX \ # # $X R=$xiim/FRA2.J$M.%04d \ # # $X $formatI' # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/minmax$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=VRAI \ # # $X R=$xiim/FRA2.J$m.%04d \ # # $X $formatI' # # # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.I$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D1$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D1$M$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D1$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.I$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D1$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D1$m$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D1$m$R16 # # # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.J$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D2$M$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.J$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D2$m$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D2$m$R16 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.I$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.I$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.J$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.J$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.D1$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/FRA2.D1$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/FRA2.D2$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/FRA2.D2$m$R16 $xiP/montagnes.91 rien # # # sequence 023065_023192 sequence 023193_023245 sequence 023246_023373 # 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/minmax$X # # $c A1=$xiim/FRAC.1.%04d # # $c A2=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.2.%04d # # $c A2=$xiim/FRAC.Y.%04d # # $c R=$xTV/TEXTURE.1 # # $c $formatI\n" # # $c ,n,n # # $c ); # # # # $c printf("$xci/distance.01$X # # $c A1=$xiim/FRAC.Y.%04d # # $c A2=$xTV/TEXTURE.1 # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=252 # # $c $formatI | # # $c $xci/dilate.01$X # # $c dilater=FAUX # # $c points=25 # # $c R=$xTV/TEXTURE.2 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/complement$X # # $c A=$xTV/TEXTURE.2 # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/TEXTURE.1 # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xTV/TEXTURE.3 # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$ROUGE # # $c R=$xTV/TEXTURE.4$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$VERTE # # $c R=$xTV/TEXTURE.4$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$BLEUE # # $c R=$xTV/TEXTURE.4$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$ROUGE # # $c points=25 # # $c R=$xTV/TEXTURE.5$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$VERTE # # $c points=25 # # $c R=$xTV/TEXTURE.5$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$BLEUE # # $c points=25 # # $c R=$xTV/TEXTURE.5$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=FAUX # # $c R=$xiim/F2.K$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=FAUX # # $c R=$xiim/F2.K$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=FAUX # # $c R=$xiim/F2.K$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=VRAI # # $c R=$xiim/F2.K$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=VRAI # # $c R=$xiim/F2.K$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=VRAI # # $c R=$xiim/F2.K$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$Z $xiim/F2.K$M. $xiaf/F2.E2$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/F2.K$M. $xiaf/F2.E2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.E2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.E2$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$M$R64%s' RVB=VRAI # # # # $Z $xci/reduction_16$Z $xiim/F2.K$m. $xiaf/F2.E2$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/F2.K$m. $xiaf/F2.E2$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.E2$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.E2$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$m$R64%s' RVB=VRAI # # # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0014%s $xiirf/F2.E2$M.0014%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0014%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0014%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0024%s $xiirf/F2.E2$M.0024%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0024%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0024%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0064%s $xiirf/F2.E2$M.0064%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0064%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0064%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0104%s $xiirf/F2.E2$M.0104%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0104%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0104%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.K$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.K$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.E2$M$R16 RVB Initialisation # # record.01$Z $xiaf/F2.E2$M$R64 RVB rien # # record.01$Z $xiaf/F2.E2$m$R16 RVB rien # # record.01$Z $xiaf/F2.E2$m$R64 RVB rien # # # # record.01$Z $xiirf/F2.E2$M.0014 RVB rien # # record.01$Z $xiirf/F2.E2$M.0024 RVB rien # # record.01$Z $xiirf/F2.E2$M.0064 RVB rien # # record.01$Z $xiirf/F2.E2$M.0104 RVB rien # # # # ATTENTION, l'enregistrement a du etre repris integralement a cause du fameux probleme : # # # # WARNING: Frame transfer aborted: analog video input not locked # # # sequence 023374_023389 sequence 023390_023405 sequence 023406_023421 sequence 023422_023437 sequence 023438_023453 sequence 023454_023469 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=16 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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/fract_2D.01$X # # $c profondeur=%d # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/FRAC.3.%04d # # $c $formatI\n" # # $c ,(n-N0)+1 # # $c ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.3.%04d # # $c A2=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,N,n # # $c ); # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xTV/COTE.N # # $c $formatI\n" # # $c ,N # # $c ); # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xTV/COTE.n # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/minmax$X # # $c A1=$xTV/COTE.N # # $c A2=$xTV/COTE.n # # $c R=$xTV/TEXTURE.1 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c $formatI | # # $c $xci/distance.01$X # # $c A2=$xTV/TEXTURE.1 # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=252 # # $c $formatI | # # $c $xci/dilate.01$X # # $c dilater=FAUX # # $c points=49 # # $c R=$xTV/TEXTURE.2 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/complement$X # # $c A=$xTV/TEXTURE.2 # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/TEXTURE.1 # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xTV/TEXTURE.3 # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$ROUGE # # $c R=$xTV/TEXTURE.4$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$VERTE # # $c R=$xTV/TEXTURE.4$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$BLEUE # # $c R=$xTV/TEXTURE.4$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$ROUGE # # $c points=25 # # $c R=$xTV/TEXTURE.5$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$VERTE # # $c points=25 # # $c R=$xTV/TEXTURE.5$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$BLEUE # # $c points=25 # # $c R=$xTV/TEXTURE.5$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_04$X A=$xiim/F2.L$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$M$R04 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$M$R04 # # $Z $xcg/unite$Z $xiaf/F2.G2$M$R04 # # # # $Z $xci/reduction_04$X A=$xiim/F2.L$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$m$R04 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$m$R04 # # $Z $xcg/unite$Z $xiaf/F2.G2$m$R04 # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.L$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.G2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.L$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.G2$m$R16 # # # # # # $Z $xci/reduction_04$Z $xiim/F2.L$M. $xiaf/F2.G2$M $Premiere $Derniere # # $Z $xci/reduction_16$Z $xiim/F2.L$M. $xiaf/F2.G2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.G2$M$R04%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.G2$M$R16%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$M$R04%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$M$R16%s' RVB=VRAI # # # # $Z $xci/reduction_04$Z $xiim/F2.L$m. $xiaf/F2.G2$m $Premiere $Derniere # # $Z $xci/reduction_16$Z $xiim/F2.L$m. $xiaf/F2.G2$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.G2$m$R04%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.G2$m$R16%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$m$R04%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$m$R16%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$M. 1 16 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$M. 1 16 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$m. 1 16 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$m. 1 16 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.G2$M$R04 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.G2$M$R04 RVB rien # # record.01$Z $xiaf/F2.G2$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.G2$M$R16 RVB rien # # record.01$Z $xiaf/F2.G2$m$R04 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.G2$m$R04 RVB rien # # record.01$Z $xiaf/F2.G2$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.G2$m$R16 RVB rien # # # # ATTENTION, les deux premiers enregistrements ont ete refaits car il y avait une erreur # # dans le programme de generation (il manquait la generation de '$xiim_LACT29/F2.L$m.' en # # fausses couleurs et elle ecrasait en fait celle de '$xiim_LACT29/F2.L$M.'...). # sequence 023470_023597 sequence 023598_023725 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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 if (n == N0) # # $c { # # $c printf("$xci/neutre$X # # $c A=$xiim/FRAC.1.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c else # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.1.%04d # # $c A2=$xTV/COTE # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.6 # # $c R=$xiim/F2.M$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.M$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.M$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.H1$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.M$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.H1$m$R16 # # # # # # $Z $xci/reduction_64$X A=$xiim/F2.M$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$M$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$M$R64 # # $Z $xcg/unite$Z $xiaf/F2.H1$M$R64 # # # # $Z $xci/reduction_64$X A=$xiim/F2.M$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$m$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$m$R64 # # $Z $xcg/unite$Z $xiaf/F2.H1$m$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.M$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.M$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.H1$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.H1$M$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H1$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H1$m$R64 $xiP/montagnes.91 rien # # # sequence 023726_023853 sequence 023854_023981 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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 if (n == N0) # # $c { # # $c printf("$xci/neutre$X # # $c A=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c else # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.X.%04d # # $c A2=$xTV/COTE # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.6 # # $c R=$xiim/F2.N$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.N$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.N$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.H2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.N$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.H2$m$R16 # # # # # # $Z $xci/reduction_64$X A=$xiim/F2.N$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$M$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$M$R64 # # $Z $xcg/unite$Z $xiaf/F2.H2$M$R64 # # # # $Z $xci/reduction_64$X A=$xiim/F2.N$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$m$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$m$R64 # # $Z $xcg/unite$Z $xiaf/F2.H2$m$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.N$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.N$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.H2$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.H2$M$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H2$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H2$m$R64 $xiP/montagnes.91 rien # # # sequence 023982_024109 sequence 024110_024231 sequence 024232_024237 sequence 024238_024365 sequence 024366_024493 # Generee (sur '$LACT29') par : # # # # xivPdf 7 2 / 022553_022680 # # xivPdf 7 2 / 022681_022808 # # xivPdf 7 2 / 022809_022936 # # xivPdf 7 2 / 022937_023064 # # # # apres ajout de 'v $xiii/montagnes$FON ARRONDI_NIVEAU'. # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $Z $formatI # # # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/maximum$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=FAUX \ # # $X R=$xiim/FRA2.I$M.%04d \ # # $X $formatI' # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/maximum$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=VRAI \ # # $X R=$xiim/FRA2.I$m.%04d \ # # $X $formatI' # # # # # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/minmax$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=FAUX \ # # $X R=$xiim/FRA2.J$M.%04d \ # # $X $formatI' # # $X $xci/genere$X premiere=$Premiere derniere=$Derniere pas=1 \ # # $X C='$xci/minmax$X \ # # $X A1=$xiim/FRAC.1.%04d \ # # $X A2=$xiim/FRAC.X.%04d \ # # $X standard=FAUX \ # # $X $formatI | \ # # $X $xci/montagne.01$X \ # # $X standard=FAUX \ # # $X zero=FAUX \ # # $X T=$xTV/TEXTURE \ # # $X avion=VRAI \ # # $X R=$xiim/FRA2.J$m.%04d \ # # $X $formatI' # # # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.I$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D1$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D1$M$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D1$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.I$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D1$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D1$m$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D1$m$R16 # # # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.J$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D2$M$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/FRA2.J$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/FRA2.D2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/FRA2.D2$m$R16 # # $Z $xcg/unite$Z $xiaf/FRA2.D2$m$R16 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.I$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.I$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.J$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/FRA2.J$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/FRA2.D1$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/FRA2.D1$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/FRA2.D2$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/FRA2.D2$m$R16 $xiP/montagnes.91 rien # # # # ATTENTION, la sequence : # # # # xivPdf 7 2 / 024110_024237 # # # # a ete enregistree en deux fois suite au probleme bien connu : # # # # WARNING: Frame transfer aborted: analog video input not locked # # # sequence 024494_024499 sequence 024500_024621 sequence 024622_024749 sequence 024750_024877 # Generee (sur '$LACT29') par : # # # # xivPdf 7 2 / 023065_023192 # # xivPdf 7 2 / 023193_023245 # # xivPdf 7 2 / 023246_023373 # # # # apres ajout de 'v $xiii/montagnes$FON ARRONDI_NIVEAU'. # # # # # # $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/minmax$X # # $c A1=$xiim/FRAC.1.%04d # # $c A2=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n,n # # $c ); # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.2.%04d # # $c A2=$xiim/FRAC.Y.%04d # # $c R=$xTV/TEXTURE.1 # # $c $formatI\n" # # $c ,n,n # # $c ); # # # # $c printf("$xci/distance.01$X # # $c A1=$xiim/FRAC.Y.%04d # # $c A2=$xTV/TEXTURE.1 # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=252 # # $c $formatI | # # $c $xci/dilate.01$X # # $c dilater=FAUX # # $c points=25 # # $c R=$xTV/TEXTURE.2 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/complement$X # # $c A=$xTV/TEXTURE.2 # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/TEXTURE.1 # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xTV/TEXTURE.3 # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$ROUGE # # $c R=$xTV/TEXTURE.4$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$VERTE # # $c R=$xTV/TEXTURE.4$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$BLEUE # # $c R=$xTV/TEXTURE.4$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$ROUGE # # $c points=25 # # $c R=$xTV/TEXTURE.5$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$VERTE # # $c points=25 # # $c R=$xTV/TEXTURE.5$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$BLEUE # # $c points=25 # # $c R=$xTV/TEXTURE.5$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=FAUX # # $c R=$xiim/F2.K$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=FAUX # # $c R=$xiim/F2.K$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=FAUX # # $c R=$xiim/F2.K$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=VRAI # # $c R=$xiim/F2.K$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=VRAI # # $c R=$xiim/F2.K$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=VRAI # # $c R=$xiim/F2.K$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$Z $xiim/F2.K$M. $xiaf/F2.E2$M $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/F2.K$M. $xiaf/F2.E2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.E2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.E2$M$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$M$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$M$R64%s' RVB=VRAI # # # # $Z $xci/reduction_16$Z $xiim/F2.K$m. $xiaf/F2.E2$m $Premiere $Derniere # # $Z $xci/reduction_64$Z $xiim/F2.K$m. $xiaf/F2.E2$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.E2$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.E2$m$R64%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$m$R16%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.E2$m$R64%s' RVB=VRAI # # # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0014%s $xiirf/F2.E2$M.0014%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0014%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0014%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0024%s $xiirf/F2.E2$M.0024%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0024%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0024%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0064%s $xiirf/F2.E2$M.0064%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0064%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0064%s' RVB=VRAI # # # # $X $xci/genere$X c='$CP $xiim/F2.K$M.0104%s $xiirf/F2.E2$M.0104%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiirf/F2.E2$M.0104%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiirf/F2.E2$M.0104%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.K$M. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.K$m. 1 128 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z "$xiim_LACT29/F2.K$m. $ROUGE" 1 128 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.E2$M$R16 RVB Initialisation # # record.01$Z $xiaf/F2.E2$M$R64 RVB rien # # record.01$Z $xiaf/F2.E2$m$R16 RVB rien # # record.01$Z $xiaf/F2.E2$m$R64 RVB rien # # # # record.01$Z $xiirf/F2.E2$M.0014 RVB rien # # record.01$Z $xiirf/F2.E2$M.0024 RVB rien # # record.01$Z $xiirf/F2.E2$M.0064 RVB rien # # record.01$Z $xiirf/F2.E2$M.0104 RVB rien # # # # ATTENTION, la sequence : # # # # xivPdf 7 2 / 024494_024621 # # # # a ete enregistree en deux fois a cause d'un probleme d'enregistrement via un '$Z' qui # # a lance plusieurs '$xci/disk_video_P$Z' simultanement. Mais j'ai decouvert que le debut # # etait mauvais (le 20001114121030) et qu'il faut donc conserver uniquement la sequence # # "reduite" : # # # # xivPdf 7 2 / 024500_024621 # # # # ATTENTION, l'enregistrement de la troisieme sequence a ete ajoute artificiellement afin # # d'eviter un decalage, puisque l'enregistrement de la sequence : # # # # xivPdf 7 2 / 023193_023245 # # xivPdf 7 2 / 023246_023373 # # # # s'etait fait en deux fois a cause de : # # # # WARNING: Frame transfer aborted: analog video input not locked # # # sequence 024878_024893 sequence 024894_024909 sequence 024910_024925 sequence 024926_024941 sequence 024942_024957 sequence 024958_024973 # Generee (sur '$LACT29') par : # # # # xivPdf 7 2 / 023374_023389 # # xivPdf 7 2 / 023390_023405 # # xivPdf 7 2 / 023406_023421 # # xivPdf 7 2 / 023422_023437 # # xivPdf 7 2 / 023438_023453 # # xivPdf 7 2 / 023454_023469 # # # # apres ajout de 'v $xiii/montagnes$FON ARRONDI_NIVEAU'. # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=16 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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/fract_2D.01$X # # $c profondeur=%d # # $c standard=FAUX # # $c $formatI | # # $c $xci/normalise.01$X # # $c R=$xiim/FRAC.3.%04d # # $c $formatI\n" # # $c ,(n-N0)+1 # # $c ,n # # $c ); # # $c } # # # # $c for (n=N0 ; n<=N ; n++) # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.3.%04d # # $c A2=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,N,n # # $c ); # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xTV/COTE.N # # $c $formatI\n" # # $c ,N # # $c ); # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c R=$xTV/COTE.n # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/minmax$X # # $c A1=$xTV/COTE.N # # $c A2=$xTV/COTE.n # # $c R=$xTV/TEXTURE.1 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/acces$X # # $c A=$xiim/FRAC.3.%04d # # $c standard=FAUX # # $c zero=FAUX # # $c $formatI | # # $c $xci/distance.01$X # # $c A2=$xTV/TEXTURE.1 # # $c $formatI | # # $c $xci/complement$X # # $c $formatI | # # $c $xci/seuil$X # # $c seuil=252 # # $c $formatI | # # $c $xci/dilate.01$X # # $c dilater=FAUX # # $c points=49 # # $c R=$xTV/TEXTURE.2 # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/complement$X # # $c A=$xTV/TEXTURE.2 # # $c $formatI | # # $c $xci/and$X # # $c A2=$xTV/TEXTURE.1 # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # $c printf("$xci/vraies_C$X # # $c A=$xTV/TEXTURE.3 # # $c p=$xiP/random.03 # # $c RVB=VRAI # # $c R=$xTV/TEXTURE.3 # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$ROUGE # # $c R=$xTV/TEXTURE.4$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$VERTE # # $c R=$xTV/TEXTURE.4$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/cache$X # # $c M=$xTV/TEXTURE.2 # # $c A=$xTV/TEXTURE.3$BLEUE # # $c R=$xTV/TEXTURE.4$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$ROUGE # # $c points=25 # # $c R=$xTV/TEXTURE.5$ROUGE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$VERTE # # $c points=25 # # $c R=$xTV/TEXTURE.5$VERTE # # $c $formatI\n" # # $c ); # # $c printf("$xci/convol.01$X # # $c A=$xTV/TEXTURE.4$BLEUE # # $c points=25 # # $c R=$xTV/TEXTURE.5$BLEUE # # $c $formatI\n" # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=FAUX # # $c R=$xiim/F2.L$M.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$ROUGE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d$ROUGE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$VERTE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d$VERTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c T=$xTV/TEXTURE.5$BLEUE # # $c avion=VRAI # # $c R=$xiim/F2.L$m.%04d$BLEUE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_04$X A=$xiim/F2.L$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$M$R04 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$M$R04 # # $Z $xcg/unite$Z $xiaf/F2.G2$M$R04 # # # # $Z $xci/reduction_04$X A=$xiim/F2.L$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$m$R04 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$m$R04 # # $Z $xcg/unite$Z $xiaf/F2.G2$m$R04 # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.L$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.G2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.L$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.G2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.G2$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.G2$m$R16 # # # # # # $Z $xci/reduction_04$Z $xiim/F2.L$M. $xiaf/F2.G2$M $Premiere $Derniere # # $Z $xci/reduction_16$Z $xiim/F2.L$M. $xiaf/F2.G2$M $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.G2$M$R04%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.G2$M$R16%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$M$R04%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$M$R16%s' RVB=VRAI # # # # $Z $xci/reduction_04$Z $xiim/F2.L$m. $xiaf/F2.G2$m $Premiere $Derniere # # $Z $xci/reduction_16$Z $xiim/F2.L$m. $xiaf/F2.G2$m $Premiere $Derniere # # # # $X $xci/genere$X c='ro $xiaf/F2.G2$m$R04%s' RVB=VRAI # # $X $xci/genere$X c='ro $xiaf/F2.G2$m$R16%s' RVB=VRAI # # # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$m$R04%s' RVB=VRAI # # $X $xci/genere$X c='$xcg/unite$Z $xiaf/F2.G2$m$R16%s' RVB=VRAI # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$M. 1 16 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$M. 1 16 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z "$xiim_LACT29/F2.L$m. $ROUGE" 1 16 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$m. 1 16 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.L$m. 1 16 RVB \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z "$xiim_LACT29/F2.L$m. $ROUGE" 1 16 $xiP/fractal.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.G2$M$R04 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.G2$M$R04 RVB rien # # record.01$Z $xiaf/F2.G2$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.G2$M$R16 RVB rien # # record.01$Z $xiaf/F2.G2$m$R04 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.G2$m$R04 RVB rien # # record.01$Z $xiaf/F2.G2$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.G2$m$R16 RVB rien # # # # ATTENTION, les enregistrements de la troisieme et de la sixieme sequence ont ete ajoutes # # artificiellement afin d'eviter un decalage, puisque l'enregistrement des sequences : # # # # xivPdf 7 2 / 023374_023389 # # xivPdf 7 2 / 023390_023405 # # # # avaient ete recommences. # sequence 024974_025101 sequence 025102_025229 # Generee (sur '$LACT29') par : # # # # xivPdf 7 2 / 023470_023597 # # xivPdf 7 2 / 023598_023725 # # # # apres ajout de 'v $xiii/montagnes$FON ARRONDI_NIVEAU'. # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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 if (n == N0) # # $c { # # $c printf("$xci/neutre$X # # $c A=$xiim/FRAC.1.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c else # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.1.%04d # # $c A2=$xTV/COTE # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.6 # # $c R=$xiim/F2.M$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.M$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.M$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.H1$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.M$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.H1$m$R16 # # # # # # $Z $xci/reduction_64$X A=$xiim/F2.M$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$M$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$M$R64 # # $Z $xcg/unite$Z $xiaf/F2.H1$M$R64 # # # # $Z $xci/reduction_64$X A=$xiim/F2.M$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H1$m$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H1$m$R64 # # $Z $xcg/unite$Z $xiaf/F2.H1$m$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.M$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.M$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.H1$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.H1$M$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H1$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H1$m$R64 $xiP/montagnes.91 rien # # # sequence 025230_025357 sequence 025358_025485 # Generee (sur '$LACT29') par : # # # # xivPdf 7 2 / 023726_023853 # # xivPdf 7 2 / 023854_023981 # # # # apres ajout de 'v $xiii/montagnes$FON ARRONDI_NIVEAU'. # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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 if (n == N0) # # $c { # # $c printf("$xci/neutre$X # # $c A=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c else # # $c { # # $c printf("$xci/minmax$X # # $c A1=$xiim/FRAC.X.%04d # # $c A2=$xTV/COTE # # $c standard=FAUX # # $c R=$xTV/COTE # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.6 # # $c R=$xiim/F2.N$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.N$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.N$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.H2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.N$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.H2$m$R16 # # # # # # $Z $xci/reduction_64$X A=$xiim/F2.N$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$M$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$M$R64 # # $Z $xcg/unite$Z $xiaf/F2.H2$M$R64 # # # # $Z $xci/reduction_64$X A=$xiim/F2.N$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.H2$m$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.H2$m$R64 # # $Z $xcg/unite$Z $xiaf/F2.H2$m$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.N$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.N$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.H2$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.H2$M$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H2$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.H2$m$R64 $xiP/montagnes.91 rien # # # sequence 025486_025613 sequence 025614_025741 sequence 025742_025869 sequence 025870_025997 # Generee (sur '$LACT29') par : # # # # # # $Z SET Premiere=1 # # $Z SET Derniere=128 # # # # $Z @ Nimages = $Derniere - $Premiere # # $Z @ Nimages = $Nimages + 1 # # # # # # $Z Pal # # # # $Z $xci/init$X \ # # $Z niveau=$BLANC \ # # $Z R=$xTV/TEXTURE \ # # $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/interpole.02$X # # $c A1=$xiim/FRAC.1.%04d # # $c A2=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c P=$xiim/FRAC.1.%04d # # $c R=$xTV/COTE.1 # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.1 # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.5 # # $c R=$xiim/F2.O$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.1 # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.O$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # # # $c printf("$xci/interpole.02$X # # $c A1=$xiim/FRAC.1.%04d # # $c A2=$xiim/FRAC.X.%04d # # $c standard=FAUX # # $c P=$xiim/FRAC.X.%04d # # $c R=$xTV/COTE.X # # $c $formatI\n" # # $c ,n,n,n # # $c ); # # # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.X # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=FAUX # # $c Ty=0.5 # # $c R=$xiim/F2.P$M.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c printf("$xci/montagne.01$X # # $c A=$xTV/COTE.X # # $c standard=FAUX # # $c renormaliser=FAUX # # $c T=$xTV/TEXTURE # # $c avion=VRAI # # $c R=$xiim/F2.P$m.%04d # # $c $formatI\n" # # $c ,n # # $c ); # # $c } # # $c } # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.O$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J1$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.J1$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.J1$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.O$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J1$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.J1$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.J1$m$R16 # # # # # # $Z $xci/reduction_64$X A=$xiim/F2.O$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J1$M$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.J1$M$R64 # # $Z $xcg/unite$Z $xiaf/F2.J1$M$R64 # # # # $Z $xci/reduction_64$X A=$xiim/F2.O$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J1$m$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.J1$m$R64 # # $Z $xcg/unite$Z $xiaf/F2.J1$m$R64 # # # # # # $Z $xci/reduction_16$X A=$xiim/F2.P$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J2$M$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.J2$M$R16 # # $Z $xcg/unite$Z $xiaf/F2.J2$M$R16 # # # # $Z $xci/reduction_16$X A=$xiim/F2.P$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J2$m$R16 \ # # $Z $formatI # # $Z ro $xiaf/F2.J2$m$R16 # # $Z $xcg/unite$Z $xiaf/F2.J2$m$R16 # # # # # # $Z $xci/reduction_64$X A=$xiim/F2.P$M. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J2$M$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.J2$M$R64 # # $Z $xcg/unite$Z $xiaf/F2.J2$M$R64 # # # # $Z $xci/reduction_64$X A=$xiim/F2.P$m. \ # # $Z premiere=$Premiere derniere=$Derniere \ # # $Z calculer=VRAI \ # # $Z moyenne=VRAI \ # # $Z R=$xiaf/F2.J2$m$R64 \ # # $Z $formatI # # $Z ro $xiaf/F2.J2$m$R64 # # $Z $xcg/unite$Z $xiaf/F2.J2$m$R64 # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/F2.O$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.O$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.P$M. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # $xci/disk_video_P$Z $xiim_LACT29/F2.P$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/F2.J1$M$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/F2.J1$M$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.J1$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.J1$m$R64 $xiP/montagnes.91 rien # # # # record.01$Z $xiaf/F2.J2$M$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.J2$M$R64 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.J2$m$R16 $xiP/montagnes.91 rien # # record.01$Z $xiaf/F2.J2$m$R64 $xiP/montagnes.91 rien # # # sequence 025998_026125 # Generee (sur '$LACT29') par : # # # # # # :Debut_listG_PAYT_1: # # # # $Z set _____images=$xiim/PAYT.1$m # # $m4 _____include(_____xivPdf_07_2/.PAYT.1.11._____U) # # $Z set _____animation=$xiaf/PAYT.71$m # # $m4 _____include(_____xivPdf_09_2/.LYAP.1.12._____U) # # # # :Fin_listG_PAYT_1: # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT29/PAYT.1$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYT.71$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYT.71$m$R64 $xiP/montagnes.91 rien # sequence 026126_026253 # Generee (sur '$LACT16') par : # # # # # # :Debut_listG_PAYT_2: # # # # $Z set _____images=$xiim/PAYT.2$m # # $m4 _____include(_____xivPdf_07_2/.PAYT.2.11._____U) # # $Z set _____animation=$xiaf/PAYT.F1$m # # $m4 _____include(_____xivPdf_09_2/.LYAP.1.12._____U) # # $Z set _____PaletteMPEG=$xiP/montagnes.91 # # $m4 _____include(_____xivPdf_06_2/.TUR2.1.11._____U) # # # # :Fin_listG_PAYT_2: # # # # # # Pal # # # # $xci/disk_video_P$Z $xiim_LACT16/PAYT.2$m. 1 128 $xiP/montagnes.91 \ # # 7 2 Initialisation Sequence \ # # "$formatI" $Gamma_lorenz # # # # # # xivPdf 3 2 # # # # record.01$Z $xiaf/PAYT.F1$m$R16 $xiP/montagnes.91 Initialisation # # record.01$Z $xiaf/PAYT.F1$m$R64 $xiP/montagnes.91 rien # ####################################################################################################################################### # # # 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 Non Deterministe. marqueur -------------------------------------------- Sequence 003875_003890 ralenti=8 Sequence 003907_003922 ralenti=8 Sequence 003939_003954 ralenti=8 Sequence 003923_003938 ralenti=8 # La methode iterative de generation des fractales (16 iterations). # Sequence 004339_004466 Sequence 004595_004722 # Zoom sur un champ fractal 2D et 3D. # Sequence 007229_007245 ralenti=8 Sequence 007263_007279 ralenti=8 # Zoom auto-similaire sur un champ fractal 2D et 3D. # Sequence 007348_007364 ralenti=8 # Zoom auto-similaire sur un objet fractal 3D. # Sequence 019481_019608 # Filaments fractals et dynamiques. # Sequence 011233_011360 # Rotation d'un champ fractal tridimensionnel (Noir et Blanc). # Sequence 021017_021144 Sequence 021401_021528 # Rotation d'un champ fractal tridimensionnel (couleurs) non periodique puis periodique. # sequence 022169_022296 sequence 022297_022424 sequence 022425_022552 Sequence 021913_022040 # Rotation d'un champ fractal tridimensionnel (couleurs) periodique et de densite variable # # avec filtrages, puis sans... # Sequence 021785_021912 # Translation d'un champ fractal tridimensionnel periodique dans son espace 3-tore. # sequence 001414_001541 sequence 007620_008643 Sequence 001926_002053 sequence 010820_010947 ralenti=2 sequence 010308_010435 Sequence 009156_009667 # Nuages seuls, puis nuages sur la montagne... # Sequence 002182_002309 # Lever de soleil sur la montagne avec les nuages qui passent... # Sequence 018411_018538 # Rotation dans l'espace de generation du champ fractal. # sequence 011627_011754 sequence 011755_011882 Sequence 011361_011488 sequence 024942_024957 ralenti=8 sequence 024894_024909 ralenti=8 # Un peu d'erosion... # Sequence 025102_025229 Sequence 024974_025101 # Un peu d'erosion "exotique"... # Sequence 012395_012522 Sequence 012523_012650 Sequence 017515_017642 # La Tour de Babel... # Sequence 016747_016874 Sequence 016875_017002 # Tremblement de terre... # Sequence 025486_025613 Sequence 025742_025869 # Tremblement de terre sur des montagnes "multi-fractales". # sequence 024110_024237 sequence 023982_024109 sequence 024366_024493 Sequence 024238_024365 sequence 024622_024749 Sequence 024500_024621 # Tremblement de terre sur des montagnes "multi-fractales" sans, puis avec de la neige... # Sequence 025998_026125 # Montagne archimedienne. # Sequence 026126_026253 # Montagne a "auto-produit generalise". # sequence 012779_012906 sequence 013035_013162 # The making of Monument Valley. # sequence 017643_017770 Sequence 017771_017898 Sequence 017899_018026 # L'erosion de Monument Valley. # Sequence 017131_017258 Sequence 017003_017130 # Waltzing Monument Valley. # Sequence 008644_008899 # La maree. # sequence 015595_015722 Sequence 015467_015594 sequence 015851_015978 Sequence 015723_015850 # Croissance de crateres... # Sequence 016235_016362 Sequence 016363_016490 # La formation de la Lune. # ####################################################################################################################################### # # # 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 ) : # # # #######################################################################################################################################