#!/bin/csh
#######################################################################################################################################
# #
# N O T A : #
# #
# #
# Author of '$xiaq/$Fnota' : #
# #
# Jean-Francois COLONNA (LACTAMME, AAAAMMJJhhmmss). #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# D E M O N S T R A T I O N S I N T E R E S S A N T E S : #
# #
#######################################################################################################################################
v $xiaq/DIEL.11$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 029266_029777 #
# #
# qui n'existe en fait reellement que sous la forme : #
# #
# xivPdf 1 1 / 029266_029734 #
# #
v $xiaq/DIEL.12$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 029735_030246 #
# #
v $xiaq/DIEL.13$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 031271_031782 #
# #
v $xiaq/DIEL.14$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 033319_033830 #
# #
v $xiaq/DIEL.15$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 033831_034342 #
# #
v $xiaq/DIEL.16$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 034343_034854 #
# #
v $xiaq/DIEL.17$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 035367_035878 #
# #
v $xiaq/DIEL.21$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 031783_032294 #
# #
v $xiaq/DIEL.22$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 032295_032806 #
# #
v $xiaq/DIEL.23$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 032807_033318 #
# #
v $xiaq/DIFF.11$R64 p=$xiP/gris.01 d=4
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 000001_000128 #
# #
# ATTENTION, cette animation semble montrer une plus forte concentration de particules au #
# centre de l'image ; en fait il n'en est rien, et l'illusion vient du fait que la source #
# lumineuse est au centre, et eclaire donc plus les particules qui y sont aussi... #
v $xiaq/DIFF.12$R64 p=$xiP/gris.01 d=4
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 000129_000256 #
# #
# (voir le ATTENTION de la sequence '000001_000128') #
v $xiaq/DIFF.21$R64 p=$xiP/gris.01 d=4
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 000257_000384 #
# #
# (voir le ATTENTION de la sequence '000001_000128') #
v $xiaq/DIFF.22$R64 p=$xiP/gris.01 d=4
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 000385_000512 #
# #
# (voir le ATTENTION de la sequence '000001_000128') #
v $xiaq/DIFF.23$R64 p=$xiP/gris.01 d=4
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 000513_000640 #
# #
# (voir le ATTENTION de la sequence '000001_000128') #
v $xiaq/DIFF.24$R64 p=$xiP/gris.01 d=4
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 000641_000768 #
# #
# (voir le ATTENTION de la sequence '000001_000128') #
v $xiaq/DIFF.31.0$R16 p=$xiP/gris.01
v $xiaq/DIFF.31.1$R16 p=$xiP/gris.01
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 001055_001070 #
# #
# avec "moyenne=FAUX" pour ".0", et moyenne=VRAI" pour ".1"... #
# #
# On notera la generation en mode 'Std' afin que la matrice '$xiaq/DIFF.31$R16' ressemble #
# a un echiquier 4x4 (voir le probleme des grains de ble sur l'echiquier...). #
v $xiaq/DIFF.32.0$R16 p=$xiP/gris.11
v $xiaq/DIFF.32.1$R16 p=$xiP/gris.11
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 001239_001254 #
# #
# avec "moyenne=FAUX" pour ".0", et moyenne=VRAI" pour ".1"... #
# #
# On notera la generation en mode 'Std' afin que la matrice '$xiaq/DIFF.32$R16' ressemble #
# a un echiquier 4x4 (voir le probleme des grains de ble sur l'echiquier...). #
v $xiaq/DIFF.32.0$R64 p=$xiP/gris.11
v $xiaq/DIFF.32.1$R64 p=$xiP/gris.11
# Generees par : $xci/puissances$X base=2 \ #
# p=0 d=15 > $xT/param11 #
# #
# Std #
# #
# $xrq/diffract.21$X R=$xw1/DIFF.5 np=16 \ #
# NOMBRE_D_ITERATIONS=$xT/param11 \ #
# logarithmique=VRAI trous=VRAI etalement=5 \ #
# $formatI #
# #
# puis : #
# #
# $MV $xw1/DIFF.50001 $xw1/DIFF.50032 #
# $MV $xw1/DIFF.50002 $xw1/DIFF.50033 #
# $MV $xw1/DIFF.50003 $xw1/DIFF.50034 #
# $MV $xw1/DIFF.50004 $xw1/DIFF.50035 #
# $MV $xw1/DIFF.50005 $xw1/DIFF.50036 #
# $MV $xw1/DIFF.50006 $xw1/DIFF.50037 #
# $MV $xw1/DIFF.50007 $xw1/DIFF.50038 #
# $MV $xw1/DIFF.50008 $xw1/DIFF.50039 #
# #
# $MV $xw1/DIFF.50009 $xw1/DIFF.50024 #
# $MV $xw1/DIFF.50010 $xw1/DIFF.50025 #
# $MV $xw1/DIFF.50011 $xw1/DIFF.50026 #
# $MV $xw1/DIFF.50012 $xw1/DIFF.50027 #
# $MV $xw1/DIFF.50013 $xw1/DIFF.50028 #
# $MV $xw1/DIFF.50014 $xw1/DIFF.50029 #
# $MV $xw1/DIFF.50015 $xw1/DIFF.50030 #
# $MV $xw1/DIFF.50016 $xw1/DIFF.50031 #
# #
# /||\ /||\ #
# || || #
# #
# numerotation numerotation #
# commencant commencant #
# a 1 a 0 #
# #
# avec "moyenne=FAUX" pour ".0", et moyenne=VRAI" pour ".1"... #
v $xiaq/DIFF.41$R16 p=$xiP/cercle.22 d=4 t=16
v $xiaq/DIFF.41$R64 p=$xiP/cercle.22 d=4 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 001746_001873 #
# #
# avec "moyenne=FAUX". #
v $xiaq/HSPH.21$R64
# Cette matrice a ete generee a l'aide du programme suivant : #
# #
# Std #
# #
# #define N 8 #
# #define L 6 #
# main() #
# { #
# int l,m,images=N*N; #
# for (l=0 ; l<=L ; l++) #
# { #
# for (m=(N-1) ; m>=0 ; m--) #
# { #
# images--; #
# if (m<=l) #
# { #
# printf("$xrq/Hspherik.21$X np=1 #
# l=%d m=%d #
# harmonique=FAUX #
# lent=FAUX #
# arbitraire=VRAI #
# ROTATION_OX=... #
# R=$xw1/HSPH.21. #
# $formatI" #
# ,l,m #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HSPH.21.0001$ROUGE #
# $xw1/HSPH.21.%04d$ROUGE" #
# ,images #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HSPH.21.0001$VERTE #
# $xw1/HSPH.21.%04d$VERTE" #
# ,images #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HSPH.21.0001$BLEUE #
# $xw1/HSPH.21.%04d$BLEUE" #
# ,images #
# ); #
# printf("\n"); #
# } #
# else #
# { #
# } #
# } #
# } #
# } #
# #
# avec : #
# #
# ROTATION_OX = 1.2 #
# #
# ATTENTION, pour obtenir la meme image, il convient de doubler l'angle indique ci-dessus, #
# et ce a cause d'un bug de '$xrq/nucleon.LX.2$I' (corrige le 1993061500) et qui avait pour #
# consequence d'appliquer deux fois chaque rotation (d'ou la necessite de doubler l'angle). #
# #
# puis a l'aides des commandes : #
# #
# Std #
# #
# $xci/reduction_64$X A=$xw1/HSPH.21. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# postfixe=$ROUGE #
# R=$xiaq/HSPH.21$R64$ROUGE #
# $xci/reduction_64$X A=$xw1/HSPH.21. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# postfixe=$VERTE #
# R=$xiaq/HSPH.21$R64$VERTE #
# $xci/reduction_64$X A=$xw1/HSPH.21. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# postfixe=$BLEUE #
# R=$xiaq/HSPH.21$R64$BLEUE #
# #
# les trous dans la sequence etant remplaces par du noir. On a ainsi le tableau suivant : #
# #
# Y ^ #
# | #
# Ymax |-------------------------------------------------------- #
# | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | #
# | | | | | | | | | #
# | [00] | | | | | | | | #
# |-------------------------------------------------------- #
# | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | #
# | | | | | | | | | #
# | [10] | [11] | | | | | | | #
# |-------------------------------------------------------- #
# | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | #
# | | | | | | | | | #
# | [20] | [21] | [22] | | | | | | #
# |-------------------------------------------------------- #
# | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | #
# | | | | | | | | | #
# | [30] | [31] | [32] | [33] | | | | | #
# |-------------------------------------------------------- #
# | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | #
# | | | | | | | | | #
# | [40] | [41] | [42] | [43] | [44] | | | | #
# |-------------------------------------------------------- #
# | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | #
# | | | | | | | | | #
# | [50] | [51] | [52] | [53] | [54] | [55] | | | #
# |-------------------------------------------------------- #
# | 08 | 09 | 10 | 11 | 12 |* 13 *|* 14 *| 15 | #
# | | | | | |******|******| | #
# | [60] | [61] | [62] | [63] | [64] |*[65]*|*[66]*| | #
# |-------------------------------------------------------- #
# | 00 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | #
# | | | | | | | | | #
# | | | | | | | | | #
# Ymin |----------------------------------------------------------> #
# Xmin Xmax X #
# #
# ou [ln] donne les ordres 'l' et 'n'. On notera que l'on s'arrete a l=6 a cause de la #
# variable 'ENTIER_DE_DEBORDEMENT_DE_FACT_Float' qui limite le nombre de factorielles que #
# l'on peut pre-calculer dans '$xrq/Legendre.31$I'. ATTENTION, a cause de ce qui vient #
# d'etre dit les images '[65]' et '[66]' sont mauvaises car elles reclament respectivement #
# le calcul de 22! et de 24!. D'ailleurs, je recalcule '$xiaq/HSPH.21$R64' en detruisant les #
# images '13' et '14', c'est plus honnete... #
# #
# Voir la sequence : #
# #
# xivPdf 1 2 / 001071_001098 #
# #
v $xiaq/HSPH.22$R64
# Cette matrice a ete generee a l'aide du programme suivant : #
# #
# Std #
# #
# #define N 8 #
# #define L 5 #
# main() #
# { #
# int l,m,images=N*N; #
# for (l=0 ; l<=L ; l++) #
# { #
# for (m=(N-1) ; m>=0 ; m--) #
# { #
# images--; #
# if (m<=l) #
# { #
# printf("$xrq/Hspherik.21$X np=1 #
# l=%d m=%d #
# harmonique=VRAI #
# lent=FAUX #
# arbitraire=FAUX #
# ROTATION_OX=... #
# r=0.025 #
# R=$xw1/HSPH.22. #
# $formatI" #
# ,l,m #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HSPH.22.0001$ROUGE #
# $xw1/HSPH.22.%04d$ROUGE" #
# ,images #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HSPH.22.0001$VERTE #
# $xw1/HSPH.22.%04d$VERTE" #
# ,images #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HSPH.22.0001$BLEUE #
# $xw1/HSPH.22.%04d$BLEUE" #
# ,images #
# ); #
# printf("\n"); #
# } #
# else #
# { #
# } #
# } #
# } #
# } #
# #
# avec : #
# #
# ROTATION_OX = 1.2 #
# #
# ATTENTION, pour obtenir la meme image, il convient de doubler l'angle indique ci-dessus, #
# et ce a cause d'un bug de '$xrq/nucleon.LX.2$I' (corrige le 1993061500) et qui avait pour #
# consequence d'appliquer deux fois chaque rotation (d'ou la necessite de doubler l'angle). #
# #
# puis a l'aides des commandes : #
# #
# Std #
# #
# $xci/reduction_64$X A=$xw1/HSPH.22. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# postfixe=$ROUGE #
# R=$xiaq/HSPH.22$R64$ROUGE #
# $xci/reduction_64$X A=$xw1/HSPH.22. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# postfixe=$VERTE #
# R=$xiaq/HSPH.22$R64$VERTE #
# $xci/reduction_64$X A=$xw1/HSPH.22. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# postfixe=$BLEUE #
# R=$xiaq/HSPH.22$R64$BLEUE #
# #
# Voir la sequence : #
# #
# xivPdf 1 2 / 001704_001724 #
# #
v $xiaq/HSPH.23$R64
# Cette image est identique a '$xiaq/HSPH.22$R64' si ce n'est que le ROUGE a ete remplace #
# par ROUGE+VERTE... #
# #
# Voir la sequence : #
# #
# xivPdf 1 2 / 001874_001894 #
# #
v $xiaq/HYDR.21.p$R04
v $xiaq/HYDR.21.p$R16
# Voir la sequence : #
# #
# xivPdf 6 2 / 001666_001793 #
# #
# ces images correspondant au traitement par '$xci/reduction_04$X' et '$xci/reduction_16$X' #
# des soixante-quatre premieres. #
v $xiaq/HYDR.31$R64 p=$xiP/cercle.22
v $xiaq/HYDR.31$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.31$M$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec mise a l'echelle #
# automatique, mais ATTENTION, la renormalisation de la densite de probabilite est #
# locale a chaque, et differe donc de l'une a l'autre, voir les images '$xiaq/HYDR.43$R64' #
# qui corrigent ce defaut...) : #
# #
# Std #
# #
# #define N 8 #
# main() #
# { #
# int l,m=0,n,images=N*N; #
# for (n=1 ; n<=N ; n++) #
# { #
# for (l=(N-1) ; l>=0 ; l--) #
# { #
# images--; #
# if (l<n) #
# { #
# printf("$xrq/hydrogene.31$X l=%d m=%d n=%d #
# auto=VRAI Ex=1.0 Ey=1.0 #
# R=$xw1/HYDR.31.%04d #
# $formatI" #
# ,l,m,n,images #
# ); #
# printf("\n"); #
# printf("$xci/montagne.01$X A=$xw1/HYDR.31.%04d #
# T=$xiio/BLANC #
# R=$xw1/HYDR.31$m.%04d #
# avion=VRAI #
# $formatI" #
# ,images,images #
# ); #
# printf("\n"); #
# printf("$xci/montagne.01$X A=$xw1/HYDR.31.%04d #
# T=$xiio/BLANC #
# R=$xw1/HYDR.31$M.%04d #
# avion=FAUX Ty=0.8 #
# $formatI" #
# ,images,images #
# ); #
# printf("\n"); #
# } #
# else #
# { #
# } #
# } #
# } #
# } #
# #
# puis a l'aides des commandes : #
# #
# Std #
# #
# $xci/reduction_64$X A=$xw1/HYDR.31. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# R=$xiaq/HYDR.31$R64 #
# $xci/reduction_64$X A=$xw1/HYDR.31$m. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# R=$xiaq/HYDR.31$m$R64 #
# $xci/reduction_64$X A=$xw1/HYDR.31$M. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# R=$xiaq/HYDR.31$M$R64 #
# #
# les trous dans les trois sequences etant remplaces par du noir. On a ainsi le tableau #
# suivant (ATTENTION, la normalisation des 36 images a ete faite independamment les unes #
# des autres...) : #
# #
# Y ^ #
# | #
# Ymax |-------------------------------------------------------- #
# | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | #
# | | | | | | | | | #
# | [10] | | | | | | | | #
# |-------------------------------------------------------- #
# | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | #
# | | | | | | | | | #
# | [20] | [21] | | | | | | | #
# |-------------------------------------------------------- #
# | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | #
# | | | | | | | | | #
# | [30] | [31] | [32] | | | | | | #
# |-------------------------------------------------------- #
# | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | #
# | | | | | | | | | #
# | [40] | [41] | [42] | [43] | | | | | #
# |-------------------------------------------------------- #
# | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | #
# | | | | | | | | | #
# | [50] | [51] | [52] | [53] | [54] | | | | #
# |-------------------------------------------------------- #
# | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | #
# | | | | | | | | | #
# | [60] | [61] | [62] | [63] | [64] | [65] | | | #
# |-------------------------------------------------------- #
# | 08 | 09 | 10 | 11 | 12 | 13 | 14 | 15 | #
# | | | | | | | | | #
# | [70] | [71] | [72] | [73] | [74] | [75] | [76] | | #
# |-------------------------------------------------------- #
# | 00 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | #
# | | | | | | | | | #
# | [80] | [81] | [82] | [83] | [84] | [85] | [86] | [87] | #
# Ymin |----------------------------------------------------------> #
# Xmin Xmax X #
# #
# ou [nl] donne les ordres 'n' et 'l'. #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 000839_000874 #
# xivPdf 1 2 / 000875_000910 #
# xivPdf 1 2 / 000911_000946 #
# #
v $xiaq/HYDR.32$R64 p=$xiP/cercle.22
v $xiaq/HYDR.32$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.32$M$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee de facon identique a '$xiaq/HYDR.31.*' en remplacant (avec #
# la meme echelle pour toutes les images, mais ATTENTION, la renormalisation de la densite #
# de probabilite est locale a chaque, et differe donc de l'une a l'autre, voir les images #
# '$xiaq/HYDR.44$R64' qui corrigent ce defaut...) : #
# #
# auto=VRAI Ex=1.0 Ey=1.0 #
# #
# par : #
# #
# auto=FAUX Ex=200.0 Ey=200.0 #
# #
# et #
# #
# HYDR.31 #
# #
# par : #
# #
# HYDR.32 #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 000947_000982 #
# xivPdf 1 2 / 000983_001018 #
# xivPdf 1 2 / 001019_001054 #
# #
v $xiaq/HYDR.40.1$R64 p=$xiP/gris.11
v $xiaq/HYDR.41.1$R64 p=$xiP/gris.11
v $xiaq/HYDR.42.1$R64 p=$xiP/gris.11
v $xiaq/HYDR.40.2$R64 p=$xiP/gris.11
v $xiaq/HYDR.41.2$R64 p=$xiP/gris.11
v $xiaq/HYDR.42.2$R64 p=$xiP/gris.11
# Cette matrice a ete generee a l'aide du programme suivant (avec mise a l'echelle #
# automatique) : #
# #
# $xci/valeurs_inte$X p=1 d=32 vD=0 vA=0.37 cubique=FAUX > $xT/param11 #
# #
# Std #
# #
# #define N 8 #
# main() #
# { #
# int l,m=0,n,images=N*N; #
# for (n=N ; n>=1 ; n--) #
# /* ATTENTION, les '$xiaq/HYDR.4?.1$R64' ont ete */ #
# /* generees avec : */ #
# /* */ #
# /* for (n=1 ; n<=N ; n++) */ #
# /* { */ #
# /* } */ #
# /* */ #
# /* et les '$xiaq/HYDR.4?.2$R64' avec donc : */ #
# /* */ #
# /* for (n=N ; n>=1 ; n--) */ #
# /* { */ #
# /* } */ #
# /* */ #
# { #
# for (l=(N-1) ; l>=0 ; l--) #
# { #
# images--; #
# if (l<n) #
# { #
# printf("$xrq/hydrogene.41$X np=32 #
# PARAMETRE_Z=$xT/param11 #
# l=%d m=%d n=%d #
# auto=VRAI #
# Ex=1.0 Ey=1.0 Ez=1.0 #
# spheriques=VRAI #
# independant=FAUX #
# R=$xw1/HYDR.49 #
# $formatI" #
# ,l,m,n #
# ); #
# printf("\n"); #
# printf("$xci/accumule.01$X A=$xw1/HYDR.49 #
# premiere=1 derniere=32 #
# r=VRAI attenuation=0 #
# R=$xw1/HYDR.40.%04d #
# $formatI" #
# ,images #
# ); #
# printf("\n"); #
# printf("$xci/accumule.01$X A=$xw1/HYDR.49 #
# premiere=1 derniere=32 #
# r=VRAI attenuation=1 #
# R=$xw1/HYDR.41.%04d #
# $formatI" #
# ,images #
# ); #
# printf("\n"); #
# printf("$xci/accumule.02$X A=$xw1/HYDR.49 #
# premiere=1 derniere=32 #
# binariser=VRAI #
# seuil=$GRIS_4 #
# trx=0 try=0 #
# R=$xw1/HYDR.42.%04d #
# $formatI" #
# ,images #
# ); #
# printf("\n"); #
# } #
# else #
# { #
# } #
# } #
# } #
# } #
# #
# puis a l'aides des commandes : #
# #
# Std #
# #
# $xci/reduction_64$X A=$xw1/HYDR.40. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# R=$xiaq/HYDR.40.2$R64 #
# $xci/reduction_64$X A=$xw1/HYDR.41. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# R=$xiaq/HYDR.41.2$R64 #
# $xci/reduction_64$X A=$xw1/HYDR.42. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# R=$xiaq/HYDR.42.2$R64 #
# #
# les trous dans les trois sequences etant remplaces par du noir. On a ainsi le tableau #
# suivant (ATTENTION, la normalisation des 36 images a ete faite independamment les unes #
# des autres...) pour '$xiaq/HYDR.4?.1$R64' : #
# #
# Y ^ #
# | #
# Ymax |-------------------------------------------------------- #
# | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | #
# | | | | | | | | | #
# | [10] | | | | | | | | #
# |-------------------------------------------------------- #
# | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | #
# | | | | | | | | | #
# | [20] | [21] | | | | | | | #
# |-------------------------------------------------------- #
# | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | #
# | | | | | | | | | #
# | [30] | [31] | [32] | | | | | | #
# |-------------------------------------------------------- #
# | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | #
# | | | | | | | | | #
# | [40] | [41] | [42] | [43] | | | | | #
# |-------------------------------------------------------- #
# | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | #
# | | | | | | | | | #
# | [50] | [51] | [52] | [53] | [54] | | | | #
# |-------------------------------------------------------- #
# | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | #
# | | | | | | | | | #
# | [60] | [61] | [62] | [63] | [64] | [65] | | | #
# |-------------------------------------------------------- #
# | 08 | 09 | 10 | 11 | 12 | 13 | 14 | 15 | #
# | | | | | | | | | #
# | [70] | [71] | [72] | [73] | [74] | [75] | [76] | | #
# |-------------------------------------------------------- #
# | 00 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | #
# | | | | | | | | | #
# | [80] | [81] | [82] | [83] | [84] | [85] | [86] | [87] | #
# Ymin |----------------------------------------------------------> #
# Xmin Xmax X #
# #
# #
# et pour '$xiaq/HYDR.4?.2$R64' : #
# #
# Y ^ #
# | #
# Ymax |-------------------------------------------------------- #
# | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | #
# | | | | | | | | | #
# | [80] | [81] | [82] | [83] | [84] | [85] | [86] | [87] | #
# |-------------------------------------------------------- #
# | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | #
# | | | | | | | | | #
# | [70] | [71] | [72] | [73] | [74] | [75] | [76] | | #
# |-------------------------------------------------------- #
# | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | #
# | | | | | | | | | #
# | [60] | [61] | [62] | [63] | [64] | [65] | | | #
# |-------------------------------------------------------- #
# | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | #
# | | | | | | | | | #
# | [50] | [51] | [52] | [53] | [54] | | | | #
# |-------------------------------------------------------- #
# | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | #
# | | | | | | | | | #
# | [40] | [41] | [42] | [43] | | | | | #
# |-------------------------------------------------------- #
# | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | #
# | | | | | | | | | #
# | [30] | [31] | [32] | | | | | | #
# |-------------------------------------------------------- #
# | 08 | 09 | 10 | 11 | 12 | 13 | 14 | 15 | #
# | | | | | | | | | #
# | [20] | [21] | | | | | | | #
# |-------------------------------------------------------- #
# | 00 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | #
# | | | | | | | | | #
# | [10] | | | | | | | | #
# Ymin |----------------------------------------------------------> #
# Xmin Xmax X #
# #
# ou [nl] donne les ordres 'n' et 'l'. #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 001099_001134 #
# xivPdf 1 2 / 001135_001170 #
# xivPdf 1 2 / 001171_001206 #
# #
# On notera que les trois images '$xiaq/HYDR.4?.1$R64' ont ete generees avant la modification #
# de la definition des coordonnees spheriques dans '$xrq/hydrogene.41$K' ; malgre le fait #
# qu'elles soient fausses, elles ont ete conservees parce que je n'aime pas jeter... #
v $xiaq/HYDR.43$R64 p=$xiP/cercle.22
v $xiaq/HYDR.43$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.43$M$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec mise a l'echelle #
# automatique, et renormalisation homogene sur l'ensemble des probabilite de presence) : #
# #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=VRAI m=FAUX l=FAUX > $xT/param11 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=VRAI l=FAUX > $xT/param12 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=FAUX l=VRAI > $xT/param13 #
# #
# Std #
# #
# $xrq/hydrogene.41$X np=64 \ #
# PARAMETRE_n=$xT/param11 \ #
# PARAMETRE_m=$xT/param12 \ #
# PARAMETRE_l=$xT/param13 \ #
# auto=VRAI Ex=1.0 Ey=1.0 \ #
# spheriques=VRAI independant=FAUX \ #
# R=$xw1/HYDR.4A. $formatI #
# #
# $xci/montagne.01$X A=$xw1/HYDR.4A.???? \ #
# T=$xiio/BLANC avion=VRAI \ #
# R=$xw1/HYDR.4A$m.???? $formatI #
# $xci/montagne.01$X A=$xw1/HYDR.4A.???? \ #
# T=$xiio/BLANC avion=FAUX Ty=0.8 \ #
# R=$xw1/HYDR.4A$M.???? $formatI #
# #
# On a ainsi le tableau suivant : #
# #
# Y ^ #
# | #
# Ymax |-------------------------------------------------------- #
# | 57 | 58 | 59 | 60 | 61 | 62 | 63 | 64 | #
# | | | | | | | | | #
# | [80] | [81] | [82] | [83] | [84] | [85] | [86] | [87] | #
# |-------------------------------------------------------- #
# | 49 | 50 | 51 | 52 | 53 | 54 | 55 | 56 | #
# | | | | | | | | | #
# | [70] | [71] | [72] | [73] | [74] | [75] | [76] | | #
# |-------------------------------------------------------- #
# | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | #
# | | | | | | | | | #
# | [60] | [61] | [62] | [63] | [64] | [65] | | | #
# |-------------------------------------------------------- #
# | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | #
# | | | | | | | | | #
# | [50] | [51] | [52] | [53] | [54] | | | | #
# |-------------------------------------------------------- #
# | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | #
# | | | | | | | | | #
# | [40] | [41] | [42] | [43] | | | | | #
# |-------------------------------------------------------- #
# | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | #
# | | | | | | | | | #
# | [30] | [31] | [32] | | | | | | #
# |-------------------------------------------------------- #
# | 09 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | #
# | | | | | | | | | #
# | [20] | [21] | | | | | | | #
# |-------------------------------------------------------- #
# | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | #
# | | | | | | | | | #
# | [10] | | | | | | | | #
# Ymin |----------------------------------------------------------> #
# Xmin Xmax X #
# #
# ou [nl] donne les ordres 'n' et 'l'. #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 001271_001306 #
# xivPdf 1 2 / 001343_001378 #
# xivPdf 1 2 / 001415_001450 #
# #
v $xiaq/HYDR.44$R64 p=$xiP/cercle.22
v $xiaq/HYDR.44$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.44$M$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec la meme echelle pour toutes #
# les images, et renormalisation homogene sur l'ensemble des probabilite de presence) : #
# #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=VRAI m=FAUX l=FAUX > $xT/param11 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=VRAI l=FAUX > $xT/param12 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=FAUX l=VRAI > $xT/param13 #
# #
# Std #
# #
# $xrq/hydrogene.41$X np=64 \ #
# PARAMETRE_n=$xT/param11 \ #
# PARAMETRE_m=$xT/param12 \ #
# PARAMETRE_l=$xT/param13 \ #
# auto=FAUX Ex=200.0 Ey=200.0 \ #
# spheriques=VRAI independant=FAUX \ #
# R=$xw1/HYDR.4B. $formatI #
# #
# $xci/montagne.01$X A=$xw1/HYDR.4B.???? \ #
# T=$xiio/BLANC avion=VRAI \ #
# R=$xw1/HYDR.4B$m.???? $formatI #
# $xci/montagne.01$X A=$xw1/HYDR.4B.???? \ #
# T=$xiio/BLANC avion=FAUX Ty=0.8 \ #
# R=$xw1/HYDR.4B$M.???? $formatI #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 001307_001342 #
# xivPdf 1 2 / 001380_001415 #
# xivPdf 1 2 / 001452_001487 #
# #
v $xiaq/HYDR.45$R16 p=$xiP/cercle.22
v $xiaq/HYDR.45$R64 p=$xiP/cercle.22
# Voir la sequence : #
# #
# xivPdf 1 2 / 003657_003784 #
# #
v $xiaq/HYDR.46$R16 p=$xiP/montagnes.01
v $xiaq/HYDR.46$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec mise a l'echelle #
# automatique, mais ATTENTION, alors que la meme renormalisation est faite pour toutes #
# les images des sequences '$xw1/HYDR.49', la renormalisation varie d'une telle sequence #
# a la suivante, ce qui signifie donc que les images de la sequence '$xw1/HYDR.46.' sont #
# renormalisees independamment les unes des autres...) : #
# #
# $xci/valeurs_inte$X p=1 d=32 vD=-0.50 vA=0.50 cubique=FAUX > $xT/param11 #
# #
# Std #
# #
# #define N 8 #
# main() #
# { #
# int l,m=0,n,images=N*N; #
# for (n=N ; n>=1 ; n--) #
# { #
# for (l=(N-1) ; l>=0 ; l--) #
# { #
# images--; #
# if (l<n) #
# { #
# printf("$xrq/hydrogene.41$X np=32 #
# PARAMETRE_Z=$xT/param11 #
# l=%d m=%d n=%d #
# auto=VRAI #
# Ex=1.0 Ey=1.0 Ez=1.0 #
# spheriques=VRAI #
# independant=FAUX #
# R=$xw1/HYDR.49 #
# $formatI" #
# ,l,m,n #
# ); #
# printf("\n"); #
# printf("$xrv/champs_5.20$X np=1 #
# A=$xw1/HYDR.49 #
# premiere=1 derniere=32 #
# pas=1 #
# px=16 py=16 #
# seuil=10 #
# ROTATION_OX=0.0 #
# ROTATION_OY=0.3 #
# ROTATION_OZ=0.0 #
# ZOOM=0.8 #
# ZminimumT=0.1 #
# Lx=100 Ly=100 Lz=1000 #
# evolution=VRAI #
# cRAYON=$xw1/HYDR.49 #
# facteurR=20 #
# R=$xw1/HYDR.46. #
# $formatI" #
# ); #
# printf("\n"); #
# printf("$MV $xw1/HYDR.46.0001$ROUGE #
# $xw1/HYDR.46.%04d" #
# ,images #
# ); #
# printf("\n"); #
# printf("$DELETE $xw1/HYDR.46.0001$VERTE"); #
# printf("\n"); #
# printf("$DELETE $xw1/HYDR.46.0001$BLEUE"); #
# printf("\n"); #
# } #
# else #
# { #
# } #
# } #
# } #
# } #
# #
# puis a l'aides des commandes : #
# #
# Std #
# #
# $xci/reduction_64$X A=$xw1/HYDR.46. #
# premiere=0 pas=1 moyenne=VRAI erreur=FAUX #
# BG=VRAI R_BG=$xiaq/HYDR.46$R16 #
# R=$xiaq/HYDR.46$R64 #
# ro $xiaq/HYDR.46$R16 #
# ro $xiaq/HYDR.46$R64 #
# #
# les trous dans la sequence etant remplaces par du noir. On a ainsi le tableau suivant #
# (ATTENTION, la normalisation des 36 images a ete faite independamment les unes des #
# autres...) : #
# #
# Y ^ #
# | #
# Ymax |-------------------------------------------------------- #
# | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | #
# | | | | | | | | | #
# | [80] | [81] | [82] | [83] | [84] | [85] | [86] | [87] | #
# |-------------------------------------------------------- #
# | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | #
# | | | | | | | | | #
# | [70] | [71] | [72] | [73] | [74] | [75] | [76] | | #
# |-------------------------------------------------------- #
# | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | #
# | | | | | | | | | #
# | [60] | [61] | [62] | [63] | [64] | [65] | | | #
# |-------------------------------------------------------- #
# | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | #
# | | | | | | | | | #
# | [50] | [51] | [52] | [53] | [54] | | | | #
# |-------------------------------------------------------- #
# | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | #
# | | | | | | | | | #
# | [40] | [41] | [42] | [43] | | | | | #
# |-------------------------------------------------------- #
# | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | #
# | | | | | | | | | #
# | [30] | [31] | [32] | | | | | | #
# |-------------------------------------------------------- #
# | 08 | 09 | 10 | 11 | 12 | 13 | 14 | 15 | #
# | | | | | | | | | #
# | [20] | [21] | | | | | | | #
# |-------------------------------------------------------- #
# | 00 | 01 | 02 | 03 | 04 | 05 | 06 | 07 | #
# | | | | | | | | | #
# | [10] | | | | | | | | #
# Ymin |----------------------------------------------------------> #
# Xmin Xmax X #
# #
# ou [nl] donne les ordres 'n' et 'l'. #
# #
# Voir la sequence : #
# #
# xivPdf 1 2 / 004385_004420 #
# #
v $xiaq/HYDR.4A$R64 p=$xiP/cercle.22
v $xiaq/HYDR.4A$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.4A$M$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec mise a l'echelle #
# automatique, et renormalisation locale a chaque champ des probabilite de presence) : #
# #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=VRAI m=FAUX l=FAUX > $xT/param11 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=VRAI l=FAUX > $xT/param12 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=FAUX l=VRAI > $xT/param13 #
# #
# Std #
# #
# $xrq/hydrogene.41$X np=64 \ #
# PARAMETRE_n=$xT/param11 \ #
# PARAMETRE_m=$xT/param12 \ #
# PARAMETRE_l=$xT/param13 \ #
# auto=VRAI Ex=1.0 Ey=1.0 \ #
# spheriques=FAUX independant=VRAI \ #
# R=$xw1/HYDR.5A. $formatI #
# #
# $xci/montagne.01$X A=$xw1/HYDR.5A.???? \ #
# T=$xiio/BLANC avion=VRAI \ #
# R=$xw1/HYDR.5A$m.???? $formatI #
# $xci/montagne.01$X A=$xw1/HYDR.5A.???? \ #
# T=$xiio/BLANC avion=FAUX Ty=0.8 \ #
# R=$xw1/HYDR.5A$M.???? $formatI #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 001488_001523 #
# xivPdf 1 2 / 001560_001595 #
# xivPdf 1 2 / 001632_001667 #
# #
v $xiaq/HYDR.4B$R64 p=$xiP/cercle.22
v $xiaq/HYDR.4B$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.4B$M$R64 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec la meme echelle pour toutes #
# les images, et renormalisation locale a chaque champ des probabilite de presence) : #
# #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=VRAI m=FAUX l=FAUX > $xT/param11 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=VRAI l=FAUX > $xT/param12 #
# $xrq/nombres_Q.01$X nD=1 nA=8 mD=0 mA=0 lD=0 lA=7 \ #
# n=FAUX m=FAUX l=VRAI > $xT/param13 #
# #
# Std #
# #
# $xrq/hydrogene.41$X np=64 \ #
# PARAMETRE_n=$xT/param11 \ #
# PARAMETRE_m=$xT/param12 \ #
# PARAMETRE_l=$xT/param13 \ #
# auto=FAUX Ex=200.0 Ey=200.0 \ #
# spheriques=FAUX independant=VRAI \ #
# R=$xw1/HYDR.5B. $formatI #
# #
# $xci/montagne.01$X A=$xw1/HYDR.5B.???? \ #
# T=$xiio/BLANC avion=VRAI \ #
# R=$xw1/HYDR.5B$m.???? $formatI #
# $xci/montagne.01$X A=$xw1/HYDR.5B.???? \ #
# T=$xiio/BLANC avion=FAUX Ty=0.8 \ #
# R=$xw1/HYDR.5B$M.???? $formatI #
# #
# Voir les sequences : #
# #
# xivPdf 1 2 / 001524_001559 #
# xivPdf 1 2 / 001596_001631 #
# xivPdf 1 2 / 001668_001703 #
# #
v $xiaq/HYDR.4G$R16 p=$xiP/cercle.22
v $xiaq/HYDR.4I$R16 p=$xiP/cercle.22
v $xiaq/HYDR.4G$m$R16 p=$xiP/montagnes.01
v $xiaq/HYDR.4G$M$R16 p=$xiP/montagnes.01
v $xiaq/HYDR.4K$M$R16 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec mise a l'echelle #
# automatique, et renormalisation locale a chaque champ des probabilite de presence) : #
# #
# $xrq/nombres_Q.01$X nD=1 nA=4 mD=0 mA=0 lD=0 lA=3 \ #
# n=VRAI m=FAUX l=FAUX > $xT/param11 #
# $xrq/nombres_Q.01$X nD=1 nA=4 mD=0 mA=0 lD=0 lA=3 \ #
# n=FAUX m=VRAI l=FAUX > $xT/param12 #
# $xrq/nombres_Q.01$X nD=1 nA=4 mD=0 mA=0 lD=0 lA=3 \ #
# n=FAUX m=FAUX l=VRAI > $xT/param13 #
# #
# Std #
# #
# $xrq/hydrogene.41$X np=16 \ #
# PARAMETRE_n=$xT/param11 \ #
# PARAMETRE_m=$xT/param12 \ #
# PARAMETRE_l=$xT/param13 \ #
# auto=VRAI Ex=1.0 Ey=1.0 \ #
# spheriques=FAUX independant=VRAI \ #
# R=$xw1/HYDR.6A. $formatI #
# #
# $xci/montagne.01$X A=$xw1/HYDR.6A.???? \ #
# T=$xiio/BLANC avion=VRAI \ #
# R=$xw1/HYDR.6A$m.???? $formatI #
# $xci/montagne.01$X A=$xw1/HYDR.6A.???? \ #
# T=$xiio/BLANC avion=FAUX Ty=0.8 \ #
# R=$xw1/HYDR.6A$M.???? $formatI #
# #
# $xci/coupe$X A=$xw1/HYDR.6A.???? \ #
# horizontale=VRAI verticale=FAUX \ #
# marquage=VRAI segments=VRAI \ #
# nch=$GRIS_4 nph=$BLANC \ #
# $formatI | #
# $xci/cache$X A=$xw1/HYDR.6A.???? \ #
# R=$xw1/HYDR.6C.???? $formatI #
# #
v $xiaq/HYDR.4H$R16 p=$xiP/cercle.22
v $xiaq/HYDR.4J$R16 p=$xiP/cercle.22
v $xiaq/HYDR.4H$m$R16 p=$xiP/montagnes.01
v $xiaq/HYDR.4H$M$R16 p=$xiP/montagnes.01
v $xiaq/HYDR.4L$M$R16 p=$xiP/montagnes.01
# Cette matrice a ete generee a l'aide du programme suivant (avec la meme echelle pour toutes #
# les images, et renormalisation locale a chaque champ des probabilite de presence) : #
# #
# $xrq/nombres_Q.01$X nD=1 nA=4 mD=0 mA=0 lD=0 lA=3 \ #
# n=VRAI m=FAUX l=FAUX > $xT/param11 #
# $xrq/nombres_Q.01$X nD=1 nA=4 mD=0 mA=0 lD=0 lA=3 \ #
# n=FAUX m=VRAI l=FAUX > $xT/param12 #
# $xrq/nombres_Q.01$X nD=1 nA=4 mD=0 mA=0 lD=0 lA=3 \ #
# n=FAUX m=FAUX l=VRAI > $xT/param13 #
# #
# Std #
# #
# $xrq/hydrogene.41$X np=16 \ #
# PARAMETRE_n=$xT/param11 \ #
# PARAMETRE_m=$xT/param12 \ #
# PARAMETRE_l=$xT/param13 \ #
# auto=FAUX Ex=32.0 Ey=32.0 \ #
# spheriques=FAUX independant=VRAI \ #
# R=$xw1/HYDR.6B. $formatI #
# #
# $xci/montagne.01$X A=$xw1/HYDR.6B.???? \ #
# T=$xiio/BLANC avion=VRAI \ #
# R=$xw1/HYDR.6B$m.???? $formatI #
# $xci/montagne.01$X A=$xw1/HYDR.6B.???? \ #
# T=$xiio/BLANC avion=FAUX Ty=0.8 \ #
# R=$xw1/HYDR.6B$M.???? $formatI #
# #
# $xci/coupe$X A=$xw1/HYDR.6B.???? \ #
# horizontale=VRAI verticale=FAUX \ #
# marquage=VRAI segments=VRAI \ #
# nch=$GRIS_4 nph=$BLANC \ #
# $formatI | #
# $xci/cache$X A=$xw1/HYDR.6B.???? \ #
# R=$xw1/HYDR.6D.???? $formatI #
# #
v $xiaq/HYDR.61$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.61$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 004421_004548 #
# #
# avec "moyenne=VRAI". Mais, ATTENTION, le mouvement n'est pas periodique au cours de cette #
# animation, car en effet, pour ce faire, il aurait fallu que le temps 't' soit dans [0,36], #
# ou '36' est le 'PPCM' de (1,4,9)... #
v $xiaq/HYDR.62$R16 p=$xiP/gris.31 d=0 t=16
v $xiaq/HYDR.62$R64 p=$xiP/gris.31 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 004677_004804 #
# #
# avec "moyenne=VRAI". Voir les commentaires sur l'aliasing dans cette sequence, ce qui #
# justifient alors la palette de couleurs utilisee... #
v $xiaq/HYDR.62$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.62$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005445_005572 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.62$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.62$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005957_006084 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.63$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.63$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 004805_004932 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.63$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.63$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005573_005700 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.63$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.63$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006085_006212 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.64$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.64$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 004933_005060 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.64$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.64$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005701_005828 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.64$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.64$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006213_006340 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.65$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.65$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005061_005188 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.65$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.65$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005829_005956 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.65$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.65$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006341_006468 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.66$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.66$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006469_006596 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.67$m$R16
v $xiaq/HYDR.67$m$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005189_005316 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.67$M$R16
v $xiaq/HYDR.67$M$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 005317_005444 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6B$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.6B$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006597_006724 #
# #
# avec "moyenne=VRAI". Voir les commentaires sur l'aliasing des sequences '$xiaq/HYDR.62$R16' #
# et '$xiaq/HYDR.62$R64' corrige ici en trichant sur les periodes (voir le commentaire de #
# la sequence video...) ; la variable 't' varie donc dans [0,8] et non plus dans [0,36]... #
v $xiaq/HYDR.6B$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6B$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007365_007492 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6B$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6B$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007877_008004 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6C$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.6C$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006725_006852 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6C$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6C$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007493_007620 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6C$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6C$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 008005_008132 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6D$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.6D$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 006853_006980 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6D$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6D$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007621_007748 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6D$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6D$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 008133_008260 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6E$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.6E$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 006981_007108 #
# xivPdf 1 2 / 009669_009796 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6E$m$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6E$m$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007749_007876 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6E$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6E$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 008261_008388 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6F$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.6F$R16 p=$xiP/orange.11 d=0 t=16
v $xiaq/HYDR.6F$R64 p=$xiP/cercle.32 d=0 t=64
v $xiaq/HYDR.6F$R64 p=$xiP/orange.11 d=0 t=64
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 008389_008516 #
# xivPdf 1 2 / 008517_008644 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6G$m$R16
v $xiaq/HYDR.6G$m$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007109_007236 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6G$M$R16
v $xiaq/HYDR.6G$M$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 007237_007364 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6H$R16
v $xiaq/HYDR.6H$R64
v $xiaq/HYDR.7H$R16
v $xiaq/HYDR.7H$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 008645_008772 #
# #
# avec "moyenne=VRAI". Enfin, '$xiaq/HYDR.7H.??' est obtenue en rehaussant la luminance a #
# l'aide de la commande '$xci/substitue$Z' avec la palette '$xiP/gris.11'. #
v $xiaq/HYDR.6H$R16$DROITE
v $xiaq/HYDR.6H$R16$GAUCHE
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 010053_010180 #
# xivPdf 1 2 / 010181_010308 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6I$M$R16 p=$xiP/montagnes.01 d=0 t=16
v $xiaq/HYDR.6I$M$R64 p=$xiP/montagnes.01 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 008773_008900 #
# #
# avec "moyenne=VRAI". On notera l'absence des images : #
# #
# $xiaq/HYDR.6I$m$R16 #
# $xiaq/HYDR.6I$m$R64 #
# #
# due au fait que d'une part les images de base de type '$m' n'etaient plus disponibles, et #
# que d'autre part la vue d'avion est beaucoup plus difficile a lire que la vue de cote pour #
# ce type d'image... #
v $xiaq/HYDR.6J$R16 p=$xiP/cercle.32 d=0 t=16
v $xiaq/HYDR.6J$R64 p=$xiP/cercle.32 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 008901_009028 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6K$Fi$R16 p=$xiP/cercle.11 d=0 t=16
v $xiaq/HYDR.6K$Fi$R16 p=$xiP/fractal.11 d=0 t=16
v $xiaq/HYDR.6K$Fi$R16 p=$xiP/orange.11 d=0 t=16
v $xiaq/HYDR.6K$Fi$R16 p=$xiP/rouge_jaune d=0 t=16
v $xiaq/HYDR.6K$Fi$R64 p=$xiP/cercle.11 d=0 t=64
v $xiaq/HYDR.6K$Fi$R64 p=$xiP/fractal.11 d=0 t=64
v $xiaq/HYDR.6K$Fi$R64 p=$xiP/orange.11 d=0 t=64
v $xiaq/HYDR.6K$Fi$R64 p=$xiP/rouge_jaune d=0 t=64
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 009157_009284 #
# xivPdf 1 2 / 009285_009412 #
# xivPdf 1 2 / 009413_009540 #
# xivPdf 1 2 / 009541_009668 #
# #
# avec "moyenne=VRAI". #
v $xiaq/HYDR.6M$R16 p=$xiP/gris.31
v $xiaq/HYDR.6M$R16 p=$xiP/gris.31 d=0 t=16
v $xiaq/HYDR.6M$R64 p=$xiP/gris.31
v $xiaq/HYDR.6M$R64 p=$xiP/gris.31 d=0 t=64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 010309_010436 #
# #
# On verra a ce propos le commentaire relatif a cette sequence ; il precise les conditions #
# de renormalisation... #
v $xiaq/HYDR.6Q$R16$DROITE
v $xiaq/HYDR.6Q$R16$GAUCHE
v $xiaq/HYDR.6Q$R64$DROITE
v $xiaq/HYDR.6Q$R64$GAUCHE
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 010565_010692 #
# xivPdf 1 2 / 010693_010820 #
# #
# On verra a ce propos le commentaire relatif a ces sequences ; il precise les conditions #
# de renormalisation... #
v $xiaq/HYDR.6S$R16$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6S$R16$GAUCHE p=$xiP/gris.01
v $xiaq/HYDR.6S$R16$DROITE
v $xiaq/HYDR.6S$R16$GAUCHE
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 011077_011204 #
# xivPdf 1 2 / 010821_010948 #
# xivPdf 1 2 / 011205_011332 #
# xivPdf 1 2 / 010949_011076 #
# #
# On verra a ce propos le commentaire relatif a ces sequences ; il precise les conditions #
# de renormalisation. Elles ont ete obtenues avec '$xci/regroupe_16$Z'... #
v $xiaq/HYDR.6U$R16
v $xiaq/HYDR.6U$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 011333_011460 #
# #
# On verra a ce propos le commentaire relatif a cette sequence ; il precise les conditions #
# de renormalisation... #
v $xiaq/HYDR.6W$R16$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6W$R16$GAUCHE p=$xiP/gris.01
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 011589_011716 #
# xivPdf 1 2 / 011717_011844 #
# #
# On verra a ce propos le commentaire relatif a ces sequences ; il precise les conditions #
# de renormalisation. #
v $xiaq/HYDR.6Y$R16
v $xiaq/HYDR.6Y$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 011461_011588 #
# #
# On verra a ce propos le commentaire relatif a cette sequence ; il precise les conditions #
# de renormalisation... #
v $xiaq/HYDR.6b$R16
v $xiaq/HYDR.6b$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 013893_014020 #
# #
# On verra a ce propos le commentaire relatif a cette sequence ; il precise les conditions #
# de renormalisation... #
v $xiaq/HYDR.6c$R16$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6c$R64$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6c$R16$GAUCHE p=$xiP/gris.01
v $xiaq/HYDR.6c$R64$GAUCHE p=$xiP/gris.01
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 012357_012484 #
# xivPdf 1 2 / 012485_012612 #
# #
# On verra a ce propos le commentaire relatif a ces sequences ; il precise les conditions #
# de renormalisation. #
v $xiaq/HYDR.6d$R16$DROITE p=$xiP/enfer.03
v $xiaq/HYDR.6d$R16$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6d$R16$DROITE p=$xiP/trou_noir.A4
v $xiaq/HYDR.6d$R16$DROITE p=$xiP/trou_noir.A4 t=16 d=0
v $xiaq/HYDR.6d$R64$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6d$R64$DROITE p=$xiP/trou_noir.A4
v $xiaq/HYDR.6d$R64$DROITE p=$xiP/trou_noir.A4 t=64 d=0
v $xiaq/HYDR.6d$R16$GAUCHE p=$xiP/enfer.03
v $xiaq/HYDR.6d$R16$GAUCHE p=$xiP/gris.01
v $xiaq/HYDR.6d$R16$GAUCHE p=$xiP/trou_noir.A4
v $xiaq/HYDR.6d$R16$GAUCHE p=$xiP/trou_noir.A4 t=16 d=0
v $xiaq/HYDR.6d$R64$GAUCHE p=$xiP/gris.01
v $xiaq/HYDR.6d$R64$GAUCHE p=$xiP/trou_noir.A4 t=64 d=0
# Ces animations correspondent aux sequences : #
# #
# xivPdf 1 2 / 012613_012740 #
# xivPdf 1 2 / 012741_012868 #
# #
# On verra a ce propos le commentaire relatif a ces sequences ; il precise les conditions #
# de renormalisation. #
v $xiaq/HYDR.6f$R16
v $xiaq/HYDR.6f$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 014064_014191 #
# #
v $xiaq/HYDR.81$m$R16
v $xiaq/HYDR.81$m$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 014896_015023 #
# #
v $xiaq/HYDR.81$M$R16
v $xiaq/HYDR.81$M$R64
# Ces animations correspondent a la sequence : #
# #
# xivPdf 1 2 / 015024_015151 #
# #
v $xiaq/HYDR.91$MPEG
v $xiaq/HYDR.91$R16 p=$xiP/trou_noir.A4
v $xiaq/HYDR.91$R16 p=$xiP/trou_noir.A4 t=16 d=0
v $xiaq/HYDR.91$R64 p=$xiP/trou_noir.A4
v $xiaq/HYDR.91$R64 p=$xiP/trou_noir.A4 t=64 d=0
# Generee (sur '$LACT16' puis sur '$LACT1B') par : #
# #
# #
# :Debut_listG_HYDR_91_16: #
# #
# $Z Pal #
# #
# $Z SET NPremiere=1 #
# $Z SET NDerniere=64 #
# #
# $Z SET MPremiere=1 #
# $Z SET MDerniere=127 #
# #
# $Z SET _____images=$xTV/HYDR.2 #
# $Z set _____imagesR1=$xiirq/HY.91.0011 #
# $Z set _____imagesR2=$xiirq/HY.91.0020 #
# $Z set _____animation=$xiaq/HYDR.91 #
# #
# $Z $DELETE $xT/PARAMZ #
# $Z $xci/valeurs_inte$X \ #
# $Z p=$MPremiere d=$MDerniere \ #
# $Z vD=-0.5 vA=+0.5 \ #
# $Z cubique=FAUX \ #
# $Z > $xT/PARAMZ #
# #
# $c #include <stdio.h> #
# #
# $c #define N0 NPremiere #
# $c #define N NDerniere #
# #
# $c #define M0 MPremiere #
# $c #define M MDerniere #
# #
# $c #define T0 0.0 #
# $c #define TN 8.0 #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c double temps; #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c temps = T0 + (((TN-T0)*(n-N0))/(N-N0)); #
# $c printf("$xrq/hydrogene.61$X #
# $c np=%d #
# $c PARAMETRE_Z=$xT/PARAMZ #
# $c temps=%f #
# $c spheriques=VRAI #
# $c T1=1 T2=4 T3=8 #
# $c A=1.0 #
# $c B=1.5 C=1.0 #
# $c D=1.0 E=1.0 F=1.0 #
# $c ZX=VRAI #
# $c R=$xTV/HYDR.1. #
# $c $formatI\n" #
# $c ,(M-M0)+1,temps #
# $c ); #
# $c printf("$xci/accumule.01$X #
# $c A=$xTV/HYDR.1. #
# $c premiere=%d #
# $c derniere=%d #
# $c try=0 trx=0 #
# $c attenuation=0 #
# $c R=$_____images.%04d #
# $c $formatI\n" #
# $c ,M0,M,n #
# $c ); #
# $c } #
# $c } #
# #
# $Z set NuMeRo=`GetPost $_____imagesR1` #
# #
# $Z $xci/neutre$X \ #
# $Z A=$_____images$NuMeRo \ #
# $Z R=$_____imagesR1 \ #
# $Z $formatI #
# #
# $Z set NuMeRo=`GetPost $_____imagesR2` #
# #
# $Z $xci/neutre$X \ #
# $Z A=$_____images$NuMeRo \ #
# $Z R=$_____imagesR2 \ #
# $Z $formatI #
# #
# $Z SET Premiere=$NPremiere #
# $Z SET Derniere=$NDerniere #
# #
# $m4 _____include(_____xivPdf_09_2/.LYAP.1.12._____U) #
# #
# $Z SET _____ImageT=$_____images. #
# $Z set _____Animation=$_____animation #
# $Z SET _____PaletteMPEG=$xiP/trou_noir.A4 #
# $Z set _____PostFixeMP=$MPEG #
# $m4 _____include(_____xiirs/.MOBI.13.1._____U) #
# #
# :Fin_listG_HYDR_91_16: #
# #
# #
# Donne une nouvelle version de l'animation 'v $xiaq/HYDR.6d$R16$DROITE p=$xiP/trou_noir.A4' #
# calculee avec la bonne resolution et donc sans artefacts... #
# #
# On notera que 'MDerniere' est impair afin que '$xT/PARAMZ' ait un point "milieu" (=0)... #
v $xiaq/HYDR.A1$MPEG
v $xiaq/HYDR.A1$R16 p=$xiP/trou_noir.A4
v $xiaq/HYDR.A1$R16 p=$xiP/trou_noir.A4 t=16 d=0
v $xiaq/HYDR.A1$R64 p=$xiP/trou_noir.A4
v $xiaq/HYDR.A1$R64 p=$xiP/trou_noir.A4 t=64 d=0
# Generee (sur '$CMAP28' puis sur '$LACT1B') par : #
# #
# #
# :Debut_listG_HYDR_A1_16: #
# #
# $Z Pal #
# #
# $Z setenv xTV $xT #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# #
# $Z SET NPremiere=1 #
# $Z SET NDerniere=64 #
# #
# $Z SET MPremiere=1 #
# $Z SET MDerniere=127 #
# #
# $Z SETENV _____images_2 $xTV/HYDR.2 #
# #
# $Z set _____animation=$xiaq/HYDR.A1 #
# #
# $Z setenv PaRaM_Z $xTV/PARAMZ #
# $Z $DELETE $PaRaM_Z #
# $Z $xci/valeurs_inte$X \ #
# $Z p=$MPremiere d=$MDerniere \ #
# $Z vD=-0.5 vA=+0.5 \ #
# $Z cubique=FAUX \ #
# $Z > $PaRaM_Z #
# #
# $Z FilSTmpB FHyDrOgEnE #
# #
# $c #include <stdio.h> #
# #
# $c #define N0 NPremiere #
# $c #define N NDerniere #
# #
# $c #define M0 MPremiere #
# $c #define M MDerniere #
# #
# $c #define T0 0.0 #
# $c #define TN 8.0 #
# #
# $c #define A0 0.0 #
# $c #define AN (2*3.14159265358979312) #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c double temps; #
# #
# $c n = 20; #
# $c temps = T0 + (((TN-T0)*(n-1))/(128-1)); #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double angle = A0 + (((AN-A0)*(n-N0))/(N-N0)); #
# #
# $c printf("echo %cFileTmpB _____images_1 #
# $c $K_QD$K_VIDE$K_QD #
# $c %cHYDR%c #
# $c $xTV ; #
# $c $xrq/hydrogene.61$X #
# $c np=%d #
# $c PARAMETRE_Z=$PaRaM_Z #
# $c temps=%f #
# $c spheriques=VRAI #
# $c T1=1 T2=4 T3=8 #
# $c A=1.0 #
# $c B=1.5 C=1.0 #
# $c D=1.0 E=1.0 F=1.0 #
# $c ZX=VRAI #
# $c ROTATION_OY=%f #
# $c R=$_____images_1. #
# $c $formatI ; #
# $c $xci/accumule.01$X #
# $c A=$_____images_1. #
# $c premiere=%d #
# $c derniere=%d #
# $c try=0 trx=0 #
# $c attenuation=0 #
# $c R=$_____images_2.%04d #
# $c $formatI ; #
# $c FileTmpE _____images_1%c #
# $c >> $FHyDrOgEnE\n" #
# $c ,'\'' #
# $c ,'"','"' #
# $c ,(M-M0)+1,temps,angle #
# $c ,M0,M,n #
# $c ,'\'' #
# $c ); #
# $c } #
# $c } #
# #
# $Z ro $FHyDrOgEnE #
# $Z $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z $FHyDrOgEnE" \ #
# $Z compatibilite_parallele_14=FAUX \ #
# $Z NP=`calculINS $ProcessorNumber/2` #
# #
# Le nombre de processeurs disponibles est divise par 2 car, en effet, les images #
# 'v $xiaq/HYDR.A1$R16' et 'v $xiaq/HYDR.A2$R16' ont ete calculees en meme temps... #
# #
# $Z FilSTmpE FHyDrOgEnE #
# #
# $Z SET Premiere=$NPremiere #
# $Z SET Derniere=$NDerniere #
# $Z set _____images=$_____images_2 #
# #
# $m4 _____include(_____xivPdf_09_2/.LYAP.1.12._____U) #
# #
# $Z set _____ImageT=$_____images_2. #
# $Z set _____Animation=$_____animation #
# $Z SET _____PaletteMPEG=$xiP/trou_noir.A4 #
# $Z set _____PostFixeMP=$MPEG #
# $m4 _____include(_____xiirs/.MOBI.13.1._____U) #
# #
# :Fin_listG_HYDR_A1_16: #
# #
# #
# Donne une rotation autour de l'axe OY de l'image 'v $xiirq/HY.92.0020 p=$xiP/trou_noir.A4'. #
# #
# On notera le 'n=20' et le 'temps=...' (avec 'N0=1' et 'N=128') destines a generer une #
# sequence d'images compatible avec l'image 'v $xiirq/HY.92.0020 p=$xiP/trou_noir.A4' qui #
# est donc l'image numero '0020' d'une sequence {1,...,128}. #
v $xiaq/HYDR.A2$MPEG
v $xiaq/HYDR.A2$R16 p=$xiP/trou_noir.A4
v $xiaq/HYDR.A2$R16 p=$xiP/trou_noir.A4 t=16 d=0
v $xiaq/HYDR.A2$R64 p=$xiP/trou_noir.A4
v $xiaq/HYDR.A2$R64 p=$xiP/trou_noir.A4 t=16 d=0
# Generee (sur '$LACT18' puis sur '$LACT1B') par : #
# #
# #
# :Debut_listG_HYDR_A2_16: #
# #
# $Z Pal #
# #
# $Z setenv xTV $xT #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# #
# $Z SET NPremiere=1 #
# $Z SET NDerniere=64 #
# #
# $Z SET MPremiere=1 #
# $Z SET MDerniere=127 #
# #
# $Z SETENV _____images_2 $xTV/HYDR.2 #
# #
# $Z set _____animation=$xiaq/HYDR.A2 #
# #
# $Z setenv PaRaM_Z $xTV/PARAMZ #
# $Z $DELETE $PaRaM_Z #
# $Z $xci/valeurs_inte$X \ #
# $Z p=$MPremiere d=$MDerniere \ #
# $Z vD=-0.5 vA=+0.5 \ #
# $Z cubique=FAUX \ #
# $Z > $PaRaM_Z #
# #
# $Z FilSTmpB FHyDrOgEnE #
# #
# $c #include <stdio.h> #
# #
# $c #define N0 NPremiere #
# $c #define N NDerniere #
# #
# $c #define M0 MPremiere #
# $c #define M MDerniere #
# #
# $c #define T0 0.0 #
# $c #define TN 8.0 #
# #
# $c #define A0 +((2*3.14159265358979312)/8) #
# $c #define AN -((2*3.14159265358979312)/8) #
# #
# $c int main() #
# $c { #
# $c int n; #
# $c double temps; #
# #
# $c n = 20; #
# $c temps = T0 + (((TN-T0)*(n-1))/(128-1)); #
# #
# $c for (n=N0 ; n<=N ; n++) #
# $c { #
# $c double angle = A0 + (((AN-A0)*(n-N0))/(N-N0)); #
# #
# $c printf("echo %cFileTmpB _____images_1 #
# $c $K_QD$K_VIDE$K_QD #
# $c %cHYDR%c #
# $c $xTV ; #
# $c $xrq/hydrogene.61$X #
# $c np=%d #
# $c PARAMETRE_Z=$PaRaM_Z #
# $c temps=%f #
# $c spheriques=VRAI #
# $c T1=1 T2=4 T3=8 #
# $c A=1.0 #
# $c B=1.5 C=1.0 #
# $c D=1.0 E=1.0 F=1.0 #
# $c ZX=VRAI #
# $c ROTATION_OY=%f #
# $c R=$_____images_1. #
# $c $formatI ; #
# $c $xci/accumule.01$X #
# $c A=$_____images_1. #
# $c premiere=%d #
# $c derniere=%d #
# $c try=0 trx=0 #
# $c attenuation=0 #
# $c R=$_____images_2.%04d #
# $c $formatI ; #
# $c FileTmpE _____images_1%c #
# $c >> $FHyDrOgEnE\n" #
# $c ,'\'' #
# $c ,'"','"' #
# $c ,(M-M0)+1,temps,angle #
# $c ,M0,M,n #
# $c ,'\'' #
# $c ); #
# $c } #
# $c } #
# #
# $Z ro $FHyDrOgEnE #
# $Z $xcg/parallele.1N$X commande="$xcs/Linda$vv$Z $FHyDrOgEnE" \ #
# $Z compatibilite_parallele_14=FAUX \ #
# $Z NP=`calculINS $ProcessorNumber/2` #
# #
# Le nombre de processeurs disponibles est divise par 2 car, en effet, les images #
# 'v $xiaq/HYDR.A2$R16' et 'v $xiaq/HYDR.A1$R16' ont ete calculees en meme temps... #
# #
# $Z FilSTmpE FHyDrOgEnE #
# #
# $Z SET Premiere=$NPremiere #
# $Z SET Derniere=$NDerniere #
# $Z set _____images=$_____images_2 #
# #
# $m4 _____include(_____xivPdf_09_2/.LYAP.1.12._____U) #
# #
# $Z set _____ImageT=$_____images_2. #
# $Z set _____Animation=$_____animation #
# $Z SET _____PaletteMPEG=$xiP/trou_noir.A4 #
# $Z set _____PostFixeMP=$MPEG #
# $m4 _____include(_____xiirs/.MOBI.13.1._____U) #
# #
# :Fin_listG_HYDR_A2_16: #
# #
# #
# Donne une rotation autour de l'axe OY de l'image 'v $xiirq/HY.92.0020 p=$xiP/trou_noir.A4', #
# pouvant etre vue comme un stereogramme... #
# #
# On notera le 'n=20' et le 'temps=...' (avec 'N0=1' et 'N=128') destines a generer une #
# sequence d'images compatible avec l'image 'v $xiirq/HY.92.0020 p=$xiP/trou_noir.A4' qui #
# est donc l'image numero '0020' d'une sequence {1,...,128}. #
v $xiaq/FPRO.11$R16 p=$xiP/cercle.32 t=16
v $xiaq/FPRO.11$R64 p=$xiP/cercle.32 t=64
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 002490_002617 #
# #
v $xiaq/FPRO.11$M$R16 p=$xiP/montagnes.01 t=16 d=0 ralenti=32
v $xiaq/FPRO.11$M$R64 p=$xiP/montagnes.01 t=64 d=0 ralenti=32
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 002618_002745 #
# #
v $xiaq/FPRO.11$m$R16 p=$xiP/montagnes.01 t=16 d=0 ralenti=32
v $xiaq/FPRO.11$m$R64 p=$xiP/montagnes.01 t=64 d=0 ralenti=32
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 002746_002873 #
# #
v $xiaq/FPRO.11$m$R16
v $xiaq/FPRO.11$m$R64
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 003002_003129 #
# #
v $xiaq/FPRO.11$M$R16$ROUGE p=$xiP/gris.01 t=16 d=0 ralenti=32
v $xiaq/FPRO.11$M$R16$VERTE p=$xiP/gris.01 t=16 d=0 ralenti=32
v $xiaq/FPRO.11$M$R16
v $xiaq/FPRO.11$M$R64$ROUGE p=$xiP/gris.01 t=64 d=0 ralenti=32
v $xiaq/FPRO.11$M$R64$VERTE p=$xiP/gris.01 t=64 d=0 ralenti=32
v $xiaq/FPRO.11$M$R64
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 003145_003272 #
# #
v $xiaq/FPRO.12$M$R16
v $xiaq/FPRO.12$M$R64
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 003273_003400 #
# #
v $xiaq/FPRO.13$R16 p=$xiP/cercle.32 t=16
v $xiaq/FPRO.14$R16 p=$xiP/cercle.32
v $xiaq/FPRO.13$R64 p=$xiP/cercle.32 t=64
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 003401_003528 #
# #
# sans et avec cadre (0.9)... #
v $xiaq/FPRO.13$M$R16 p=$xiP/montagnes.01 t=16 d=0 ralenti=32
v $xiaq/FPRO.14$M$R16 p=$xiP/montagnes.01
v $xiaq/FPRO.13$M$R64 p=$xiP/montagnes.01 t=64 d=0 ralenti=32
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 003529_003656 #
# #
# sans et avec cadre (1.0)... #
v $xiirq/MESO.11.0064
v $xiirq/MESO.11.0128
v $xiaq/MESO.11$R16
v $xiaq/MESO.11$R64
# Generee (sur '$LACT18') par : #
# #
# #
# :Debut_listG_MESO_11: #
# #
# $Z Pal #
# #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# $Z setenv xTV $xTG #
# #
# $Z set Premiere=1 #
# $Z set Derniere=128 #
# #
# $Z set Nimages=`calcul $Derniere-$Premiere+1` #
# #
# $Z set _____ImageT=$xTV/MESON.11 #
# #
# $Z $xrq/meson.L0$X \ #
# $Z np=$Nimages \ #
# $Z Lz=1 \ #
# $Z N_log_N=VRAI \ #
# $Z postfixe_en_queue=VRAI \ #
# $Z R=$_____ImageT \ #
# $Z incomplets=FAUX \ #
# $Z $formatI #
# #
# $Z set MiLiEu=`calcul $Premiere+($Nimages/2)-1` #
# $Z set PaRaMeTrEs="premiere=$MiLiEu derniere=$MiLiEu" #
# $Z set DeRnIeRe=`$xci/nombres$X $PaRaMeTrEs A="$K_VIDE"` #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$_____ImageT.$DeRnIeRe%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiirq/MESO.11.$DeRnIeRe%s \ #
# $Z $formatI #
# #
# $Z set PaRaMeTrEs="premiere=$Derniere derniere=$Derniere" #
# $Z set DeRnIeRe=`$xci/nombres$X $PaRaMeTrEs A="$K_VIDE"` #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$_____ImageT.$DeRnIeRe%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiirq/MESO.11.$DeRnIeRe%s \ #
# $Z $formatI #
# #
# $Z set _____images=$_____ImageT #
# $Z set _____animation=$xiaq/MESO.11 #
# $m4 _____include(_____xivPdf_09_2/.REFL.c.14._____U) #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$xiaq/MESO.11$R16%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiaq/MESO.11$R16%s \ #
# $Z $formatI #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$xiaq/MESO.11$R64%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiaq/MESO.11$R64%s \ #
# $Z $formatI #
# #
# :Fin_listG_MESO_11: #
# #
# #
# Cette image fut rendue necessaire par 'v $xiMd/ArtEtMathematiques.01$m4 MESO.11+P_R16'... #
v $xiaq/NUCL.12$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 036007_036134 #
# #
v $xiaq/NUCL.13$R16
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 1 / 036135_036250 #
# #
v $xiirq/NUCL.O1.0064
v $xiirq/NUCL.O1.0128
v $xiaq/NUCL.O1$R16
v $xiaq/NUCL.O1$R64
# Generee (sur '$LACT18') par : #
# #
# #
# :Debut_listG_NUCL_O1: #
# #
# $Z Pal #
# #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# $Z setenv xTV $xTG #
# #
# $Z set Premiere=1 #
# $Z set Derniere=128 #
# #
# $Z set Nimages=`calcul $Derniere-$Premiere+1` #
# #
# $Z set _____ImageT=$xTV/NUCLEON.O1 #
# #
# $Z $xrq/nucleon.L0$X \ #
# $Z np=$Nimages \ #
# $Z Lz=1 \ #
# $Z N_log_N=VRAI \ #
# $Z postfixe_en_queue=VRAI \ #
# $Z R=$_____ImageT \ #
# $Z incomplets=FAUX \ #
# $Z $formatI #
# #
# $Z set MiLiEu=`calcul $Premiere+($Nimages/2)-1` #
# $Z set PaRaMeTrEs="premiere=$MiLiEu derniere=$MiLiEu" #
# $Z set DeRnIeRe=`$xci/nombres$X $PaRaMeTrEs A="$K_VIDE"` #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$_____ImageT.$DeRnIeRe%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiirq/NUCL.O1.$DeRnIeRe%s \ #
# $Z $formatI #
# #
# $Z set PaRaMeTrEs="premiere=$Derniere derniere=$Derniere" #
# $Z set DeRnIeRe=`$xci/nombres$X $PaRaMeTrEs A="$K_VIDE"` #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$_____ImageT.$DeRnIeRe%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiirq/NUCL.O1.$DeRnIeRe%s \ #
# $Z $formatI #
# #
# $Z set _____images=$_____ImageT #
# $Z set _____animation=$xiaq/NUCL.O1 #
# $m4 _____include(_____xivPdf_09_2/.REFL.c.14._____U) #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$xiaq/NUCL.O1$R16%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiaq/NUCL.O1$R16%s \ #
# $Z $formatI #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$xiaq/NUCL.O1$R64%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiaq/NUCL.O1$R64%s \ #
# $Z $formatI #
# #
# :Fin_listG_NUCL_O1: #
# #
v $xiaq/SYNA.11$R16 p=$xiP/cercle.32
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 002234_002361 #
# #
# obtenue par '$xci/reduction_16$X' avec un pas de 4. #
v $xiaq/SYNA.12$R16 p=$xiP/cercle.32
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 002362_002489 #
# #
# obtenue par '$xci/reduction_16$X' avec un pas de 4. #
v $xiaq/PROTON.I1$R64 p=$xiP/universel.21 d=4
v $xiaq/PROTON.J2$R64 p=$xiP/universel.21 d=4
v $xiaq/PROTON.J3$R64 p=$xiP/universel.21 d=4
# V --> QxAQxG, V --> GxGxG et V --> GxGxGxG, ph=1.0e-25. #
v $xiaq/PROTON.J4$R64 p=$xiP/universel.21 d=4
# V --> QxAQxG, V --> GxGxG et V --> GxGxGxG, G --> QxAQ, G --> GxG, Q --> QxG, ph=1.0e-25. #
v $xiaq/PROTON.J5$R64 p=$xiP/universel.11 d=4
# Film sans les trainees. #
v $xiaq/PROTON.J6$R64 p=$xiP/universel.11 d=4
# Film avec les trainees. #
v $xiaq/VIDE.11$R16
v $xiaq/VIDE.11$R64
# Cette animation correspond a la sequence : #
# #
# xivPdf 1 2 / 015152_015351 #
# #
v $xiirq/VIDE.21.0064
v $xiirq/VIDE.21.0128
v $xiaq/VIDE.21$R16
v $xiaq/VIDE.21$R64
# Generee (sur '$LACT18') par : #
# #
# #
# :Debut_listG_VIDE_21: #
# #
# $Z Pal #
# #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# $Z setenv xTV $xTG #
# #
# $Z set Premiere=1 #
# $Z set Derniere=128 #
# #
# $Z set Nimages=`calcul $Derniere-$Premiere+1` #
# #
# $Z set _____ImageT=$xTV/VIDE.21 #
# #
# $Z $xrq/vide.L0$X \ #
# $Z np=$Nimages \ #
# $Z Lz=1 \ #
# $Z N_log_N=VRAI \ #
# $Z postfixe_en_queue=VRAI \ #
# $Z R=$_____ImageT \ #
# $Z incomplets=FAUX \ #
# $Z $formatI #
# #
# $Z set MiLiEu=`calcul $Premiere+($Nimages/2)-1` #
# $Z set PaRaMeTrEs="premiere=$MiLiEu derniere=$MiLiEu" #
# $Z set DeRnIeRe=`$xci/nombres$X $PaRaMeTrEs A="$K_VIDE"` #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$_____ImageT.$DeRnIeRe%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiirq/VIDE.21.$DeRnIeRe%s \ #
# $Z $formatI #
# #
# $Z set PaRaMeTrEs="premiere=$Derniere derniere=$Derniere" #
# $Z set DeRnIeRe=`$xci/nombres$X $PaRaMeTrEs A="$K_VIDE"` #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$_____ImageT.$DeRnIeRe%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiirq/VIDE.21.$DeRnIeRe%s \ #
# $Z $formatI #
# #
# $Z set _____images=$_____ImageT #
# $Z set _____animation=$xiaq/VIDE.21 #
# $m4 _____include(_____xivPdf_09_2/.REFL.c.14._____U) #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$xiaq/VIDE.21$R16%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiaq/VIDE.21$R16%s \ #
# $Z $formatI #
# #
# $Z execRVB $xci/acces$X \ #
# $Z A=$xiaq/VIDE.21$R64%s \ #
# $Z renormaliser=VRAI \ #
# $Z R=$xiaq/VIDE.21$R64%s \ #
# $Z $formatI #
# #
# :Fin_listG_VIDE_21: #
# #
#######################################################################################################################################
# #
# I M A G E S L E S P L U S P E R T I N E N T E S : #
# #
#######################################################################################################################################
v $xiaq/DIEL.23$R16
# Interaction electron-positon. #
v $xiaq/HSPH.23$R64
# Les harmoniques spheriques. #
v $xiaq/HYDR.44$m$R64 p=$xiP/montagnes.01
v $xiaq/HYDR.44$M$R64 p=$xiP/montagnes.01
# Densite de probabilite de presence de l'electron dans l'atome d'hydrogene. #
v $xiaq/HYDR.6G$m$R16
v $xiaq/HYDR.6G$M$R16
# Superpositions lineaires d'etats propres de l'atome d'Hydrogene (calcul 2D, visualisation #
# 3D vue de dessus et vue de cote, en utilisant la couleur pour visualiser quelques #
# "sous-combinaisons d'etats propres utilises). #
v $xiaq/HYDR.6H$R16
# Superpositions lineaires d'etats propres de l'atome d'Hydrogene (calcul 2D, visualisation #
# 3D "atomise"). #
v $xiaq/HYDR.6M$R16 p=$xiP/gris.31
v $xiaq/HYDR.6S$R16$DROITE
v $xiaq/HYDR.6S$R16$GAUCHE
v $xiaq/HYDR.6d$R16$DROITE p=$xiP/gris.01
v $xiaq/HYDR.6d$R16$DROITE p=$xiP/trou_noir.A4
v $xiaq/HYDR.6d$R64$DROITE p=$xiP/trou_noir.A4 t=64 d=0
v $xiaq/HYDR.6d$R16$GAUCHE p=$xiP/gris.01
v $xiaq/HYDR.6d$R16$GAUCHE p=$xiP/trou_noir.A4
v $xiaq/HYDR.6d$R64$GAUCHE p=$xiP/trou_noir.A4 t=64 d=0
v $xiaq/HYDR.6f$R16
# Superpositions lineaires d'etats propres de l'atome d'Hydrogene (calcul 3D, visualisation #
# 3D). #