#!/bin/csh
#######################################################################################################################################
# #
# N O T A : #
# #
# #
# Author of '$xiirq/$Fnota' : #
# #
# Jean-Francois COLONNA (LACTAMME, AAAAMMJJhhmmss). #
# #
#######################################################################################################################################
#######################################################################################################################################
# #
# I M A G E S I N T E R E S S A N T E S : #
# #
#######################################################################################################################################
v $xiirq/DIEL.11
v $xiirq/DIEL.11$m
# La premiere de ces deux images correspond a la derniere image de la sequence : #
# #
# xivPdf 1 1 / 029266_029777 #
# #
# qui n'existe en fait reellement que sous la forme : #
# #
# xivPdf 1 1 / 029266_029734 #
# #
# alors que la seconde est sa mise en montagne par la procedure suivante : #
# #
# $xci/substitue$X A=$xiirq/DIEL.11.? substitution=L_SUBSTITUTION_02 $formatI | #
# $xci/montagne.01$X A=$xiirq/DIEL.11.? R=$xiirq/DIEL.11$m.? avion=VRAI $formatI #
# #
v $xiirq/DIFF.11 p=$xiP/gris.01
# Images generees par : #
# #
# Std #
# #
# $xrq/diffract.21$X np=1 \ #
# NOMBRE_D_ITERATIONS= \ #
# convolution=FAUX \ #
# R=... \ #
# $formatI #
# #
# avec : #
# #
# #
# NOMBRE_D_ITERATIONS=5000000 #
# #
v $xiirq/DIFF.12 p=$xiP/gris.01
# Images generees par : #
# #
# Std #
# #
# $xci/repeat.01$Z 0 508 4 \ #
# '$xci/coupe$X A=$xiirq/DIFF.11 \ #
# horizontale=FAUX \ #
# verticale=VRAI \ #
# segments=VRAI \ #
# x=`$xci/coordonnees$X x=$n $formatI` \ #
# R=$xw1/DIFF.6$n \ #
# $formatI' #
# #
# puis : #
# #
# $xci/accumule.01$X A=$xw1/DIFF.6 premiere=0 derniere=508 pas=4 \ #
# renormaliser=VRAI \ #
# R=$xiirq/DIFF.12 \ #
# $formatI #
# #
v $xiirq/FPRO.13.pl p=$xiP/cercle.32
v $xiirq/FPRO.13.pl$M p=$xiP/montagnes.91
# Image generee par : #
# #
# Std #
# #
# $xrq/f_propres.11$X imaginaire=FAUX theta=0 alpha=1 beta=0 $formatI ... #
# #
# la mise en montagne ayant ete effectuee par : #
# #
# $xrv/champs_5.10$X np=1 px=8 py=8 \ #
# facteurZ=0.5 facteurR=6 \ #
# ROTATION_OX=5 ZOOM=0.8 \ #
# $formatI #
# #
# puis renormalisation de la composante '$ROUGE' par '$xci/acces$X'... #
v $xiirq/FPRO.13.mo p=$xiP/cercle.32
v $xiirq/FPRO.13.mo$M p=$xiP/montagnes.91
# Image generee par : #
# #
# Std #
# #
# $xrq/f_propres.11$X imaginaire=FAUX theta=0 alpha=0 beta=1 $formatI ... #
# #
# la mise en montagne ayant ete effectuee par : #
# #
# $xrv/champs_5.10$X np=1 px=8 py=8 \ #
# facteurZ=1.0 facteurR=6 \ #
# ROTATION_OX=5 ZOOM=0.8 \ #
# $formatI #
# #
# puis renormalisation de la composante '$ROUGE' par '$xci/acces$X'... #
v $xiirq/FPRO.13.ga p=$xiP/cercle.32
v $xiirq/FPRO.13.ga$M p=$xiP/montagnes.91
# Image generee par : #
# #
# Std #
# #
# $xrq/f_propres.11$X imaginaire=FAUX theta=0 alpha=1 beta=1 $formatI ... #
# #
# la mise en montagne ayant ete effectuee par : #
# #
# $xrv/champs_5.10$X np=1 px=8 py=8 \ #
# facteurZ=0.5 facteurR=6 \ #
# ROTATION_OX=5 ZOOM=0.8 \ #
# $formatI #
# #
# puis renormalisation de la composante '$ROUGE' par '$xci/acces$X'... #
v $xiirq/FPRO.13.dr p=$xiP/cercle.32
v $xiirq/FPRO.13.dr$M p=$xiP/montagnes.91
# Image generee par : #
# #
# Std #
# #
# $xrq/f_propres.11$X imaginaire=FAUX theta=$pi alpha=1 beta=1 $formatI ... #
# #
# la mise en montagne ayant ete effectuee par : #
# #
# $xrv/champs_5.10$X np=1 px=8 py=8 \ #
# facteurZ=0.5 facteurR=6 \ #
# ROTATION_OX=5 ZOOM=0.8 \ #
# $formatI #
# #
# puis renormalisation de la composante '$ROUGE' par '$xci/acces$X'... #
v $xiirq/HYDR.11
# Image simpliste de l'atome d'Hydrogene generee a l'aide de la commande : #
# #
# Std #
# #
# $xrv/particule.10$X np=1 iterations=257 \ #
# LISTE_X=... LISTE_Y=... LISTE_Z=... \ #
# LISTE_RAYON=... \ #
# LISTE_ROUGE=... LISTE_VERTE=... LISTE_BLEUE=... \ #
# ZOOM=0.85 ROTATION_OX=1.9 Lz=1000 \ #
# R=$xiirq/HYDR.11 \ #
# $formatI #
# #
# avec : #
# #
# Rayon(proton) = 0.20 #
# Rayon(electron) = 0.04 (0.08 pour le 154ieme) #
# #
# les coordonnees 'Z' etant generees par '$xci/valeurs_inte$X' et par '$xci/valeurs_trig$X' #
# pour 'X' et 'Y' ('alpha' et 'beta' valant respectivement 0.5 et 0.0 pour 'X' et l'inverse #
# pour 'Y'). Le noyau etant au point {0.5,0.5,0.0}. #
# #
# Enfin, le proton est le premier de chacune des listes ci-dessus, suivi ensuite de 256 #
# electrons (regulierement espaces sur le cercle...). #
v $xiirq/HYDR.21.86
v $xiirq/HYDR.21.86$DROITE
v $xiirq/HYDR.21.86$GAUCHE
v $xiirq/HYDR.21.87
v $xiirq/HYDR.21.88
# Images generees par : #
# #
# Std #
# #
# $xrq/hydrogene.21$X np=1 \ #
# pu=0.31415926535897932 pv=0.31415926535897932 \ #
# ROTATION_OX=... \ #
# r=100000 lent=FAUX densite=FAUX \ #
# n=8 l=6 \ #
# stereo=... \ #
# R=... \ #
# $formatI #
# #
# avec : #
# #
# stereo=0 #
# stereo=+0.08 ($DROITE) #
# stereo=-0.08 ($GAUCHE) #
# #
# 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). #
# #
# Enfin, '$xiirq/HYDR.21.87' et '$xiirq/HYDR.21.88' furent obtenues par : #
# #
# $xci/substitue$Z $xiirq/HYDR.21.86 $xiP/gris.11 $xiirq/HYDR.21.87 #
# $xci/acces_RVB.11$Z $xiirq/HYDR.21.87 $xiirq/HYDR.21.88 #
# #
v $xiirq/HYDR.21.86.1
# Image generee par : #
# #
# Std #
# #
# $xci/un_sur_z.01$X A=$xiirq/HYDR.21.86$ROUGE $formatI | #
# $xci/filtre.01$X N=$xiio/GAUSS.8110 R=$xiirq/HYDR.21.86.1$ROUGE \ #
# $formatI #
# $xci/un_sur_z.01$X A=$xiirq/HYDR.21.86$VERTE $formatI | #
# $xci/filtre.01$X N=$xiio/GAUSS.8110 R=$xiirq/HYDR.21.86.1$VERTE \ #
# $formatI #
# $xci/un_sur_z.01$X A=$xiirq/HYDR.21.86$BLEUE $formatI | #
# $xci/filtre.01$X N=$xiio/GAUSS.8110 R=$xiirq/HYDR.21.86.1$BLEUE \ #
# $formatI #
# #
v $xiirq/HYDR.21.86.2
# Image generee par : #
# #
# Std #
# #
# $xci/z_carre.01$X A=$xiirq/HYDR.21.86$ROUGE \ #
# R=$xiirq/HYDR.21.86.2$ROUGE \ #
# $formatI #
# $xci/z_carre.01$X A=$xiirq/HYDR.21.86$VERTE \ #
# R=$xiirq/HYDR.21.86.2$VERTE \ #
# $formatI #
# $xci/z_carre.01$X A=$xiirq/HYDR.21.86$BLEUE \ #
# R=$xiirq/HYDR.21.86.2$BLEUE \ #
# $formatI #
# #
v $xiirq/HYDR.21.86.p
# Image generee par : #
# #
# Std #
# #
# $xci/multi_02.04$X A1=$xiirq/HYDR.21.86.1$ROUGE \ #
# A2=$xiirq/HYDR.21.86.2$ROUGE \ #
# Cx=2 Cy=2 T=$xiio/FRAC2.090$N \ #
# R=$xiirq/HYDR.21.86.p$ROUGE \ #
# $formatI #
# $xci/multi_02.04$X A1=$xiirq/HYDR.21.86.1$VERTE \ #
# A2=$xiirq/HYDR.21.86.2$VERTE \ #
# Cx=2 Cy=2 T=$xiio/FRAC2.090$N \ #
# R=$xiirq/HYDR.21.86.p$VERTE \ #
# $formatI #
# $xci/multi_02.04$X A1=$xiirq/HYDR.21.86.1$BLEUE \ #
# A2=$xiirq/HYDR.21.86.2$BLEUE \ #
# Cx=2 Cy=2 T=$xiio/FRAC2.090$N \ #
# R=$xiirq/HYDR.21.86.p$BLEUE \ #
# $formatI #
# #
# voir a ce propos la sequence : #
# #
# xivPdf 6 2 / 001538_001665 #
# #
v $xiirq/HYDR.6B.01 p=$xiP/gris.01
v $xiirq/HYDR.6B.02$DROITE p=$xiP/cercle.32
v $xiirq/HYDR.6B.02$GAUCHE p=$xiP/cercle.32
# Images generees respectivement par : #
# #
# Std #
# #
# $xci/accumule.01$X A=$xw1/HYDR.6B \ #
# premiere=1 derniere=128 \ #
# R=$xiirq/HYDR.6B.01 \ #
# $formatI #
# #
# $xci/accumule.02$X A=$xw1/HYDR.6B \ #
# premiere=1 derniere=128 \ #
# stereo=+0.5 \ #
# R=$xiirq/HYDR.6B.02$DROITE \ #
# $formatI #
# $xci/accumule.02$X A=$xw1/HYDR.6B \ #
# premiere=1 derniere=128 \ #
# stereo=-0.5 \ #
# R=$xiirq/HYDR.6B.02$GAUCHE \ #
# $formatI #
# #
# voir a ce propos les sequences : #
# #
# xivPdf 1 2 / 006597_006724 #
# #
v $xiirq/HYDR.6C.01 p=$xiP/gris.01
v $xiirq/HYDR.6C.02$DROITE p=$xiP/cercle.32
v $xiirq/HYDR.6C.02$GAUCHE p=$xiP/cercle.32
# Images generees respectivement par : #
# #
# Std #
# #
# $xci/accumule.01$X A=$xw1/HYDR.6C \ #
# premiere=1 derniere=128 \ #
# R=$xiirq/HYDR.6C.01 \ #
# $formatI #
# #
# $xci/accumule.02$X A=$xw1/HYDR.6C \ #
# premiere=1 derniere=128 \ #
# stereo=+0.5 \ #
# R=$xiirq/HYDR.6C.02$DROITE \ #
# $formatI #
# $xci/accumule.02$X A=$xw1/HYDR.6C \ #
# premiere=1 derniere=128 \ #
# stereo=-0.5 \ #
# R=$xiirq/HYDR.6C.02$GAUCHE \ #
# $formatI #
# #
# voir a ce propos les sequences : #
# #
# xivPdf 1 2 / 006725_006852 #
# #
v $xiirq/HYDR.6D.01 p=$xiP/gris.01
v $xiirq/HYDR.6D.02$DROITE p=$xiP/cercle.32
v $xiirq/HYDR.6D.02$GAUCHE p=$xiP/cercle.32
# Images generees respectivement par : #
# #
# Std #
# #
# $xci/accumule.01$X A=$xw1/HYDR.6D \ #
# premiere=1 derniere=128 \ #
# R=$xiirq/HYDR.6D.01 \ #
# $formatI #
# #
# $xci/accumule.02$X A=$xw1/HYDR.6D \ #
# premiere=1 derniere=128 \ #
# stereo=+0.5 \ #
# R=$xiirq/HYDR.6D.02$DROITE \ #
# $formatI #
# $xci/accumule.02$X A=$xw1/HYDR.6D \ #
# premiere=1 derniere=128 \ #
# stereo=-0.5 \ #
# R=$xiirq/HYDR.6D.02$GAUCHE \ #
# $formatI #
# #
# voir a ce propos les sequences : #
# #
# xivPdf 1 2 / 006853_006980 #
# #
v $xiirq/HYDR.6E.01 p=$xiP/gris.01
v $xiirq/HYDR.6E.02$DROITE p=$xiP/cercle.32
v $xiirq/HYDR.6E.02$GAUCHE p=$xiP/cercle.32
# Images generees respectivement par : #
# #
# Std #
# #
# $xci/accumule.01$X A=$xw1/HYDR.6E \ #
# premiere=1 derniere=128 \ #
# R=$xiirq/HYDR.6E.01 \ #
# $formatI #
# #
# $xci/accumule.02$X A=$xw1/HYDR.6E \ #
# premiere=1 derniere=128 \ #
# stereo=+0.5 \ #
# R=$xiirq/HYDR.6E.02$DROITE \ #
# $formatI #
# $xci/accumule.02$X A=$xw1/HYDR.6E \ #
# premiere=1 derniere=128 \ #
# stereo=-0.5 \ #
# R=$xiirq/HYDR.6E.02$GAUCHE \ #
# $formatI #
# #
# voir a ce propos les sequences : #
# #
# xivPdf 1 2 / 009669_009796 #
# #
v $xiirq/HYDR.6K.01$Fi p=$xiP/cercle.32
v $xiirq/HYDR.6K.01$Fi p=$xiP/arc_ciel.01 animation=VRAI d=1
# Image generee par : #
# #
# Std #
# #
# $xci/accumule.02$X A=$xw1/HYDR.6K$Fi \ #
# premiere=1 derniere=128 \ #
# R=$xiirq/HYDR.6K$Fi \ #
# $formatI #
# #
# voir a ce propos les sequences : #
# #
# xivPdf 1 2 / 009157_009284 #
# xivPdf 1 2 / 009285_009412 #
# xivPdf 1 2 / 009413_009540 #
# xivPdf 1 2 / 009541_009668 #
# #
v $xiirq/HY.6d.0020$DROITE p=$xiP/trou_noir.A4
# Cette image est l'image '0020' de la sequence : #
# #
# xivPdf 1 2 / 013765_013892 #
# #
# apres avoir subi un reformatage du type : #
# #
# Pal #
# #
# $xci/format.01$X A=$xw1/HY$DROITE.6d.0020 \ #
# XminR=0 XmaxR=868 YminR=0 YmaxR=640 \ #
# methode=2 \ #
# R=$xT/HYDROGENE \ #
# $formatI #
# $xci/format.01$X A=$xT/HYDROGENE \ #
# $formatR_Pal #
# methode=7 \ #
# R=$xiirq/HY.6d.0020$DROITE \ #
# Xmin=0 Xmax=868 Ymin=0 Ymax=640 #
# #
# afin de supprimer les artefacts sur les bords de l'image dus au fait que les images de #
# cette animation ont ete calculees en format 'Puq', puis reformatees... #
v $xiirq/HY.6d.0020$DROITE.1 p=$xiP/gris.01
v $xiirq/HY.6d.0020$DROITE.1 p=$xiP/plan.02
# Generee (sur '$LACT16') par : #
# #
# #
# :Debut_listG_HY_6d_0020_d_1: #
# #
# $Z Pal #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# $Z $xci/filtre.01$X \ #
# $Z A=$xiirq/HY.6d.0020$DROITE \ #
# $Z N=$xTV/GAUSS \ #
# $Z seuil=240 \ #
# $Z R=$xiirq/HY.6d.0020$DROITE.1 \ #
# $Z $formatI #
# #
# :Fin_listG_HY_6d_0020_d_1: #
# #
# #
# qui montre la version "graphique" de l'image 'v $xiirq/HY.6d.0020$DROITE'... #
v $xiirq/HYDR.71.n1l0m0 p=$xiP/gris.01
# Cette image est l'accumulation de la sequence : #
# #
# xivPdf 1 2 / 006853_006980 #
# #
# grace a la commande '$xci/accumule.01$X' avec les arguments : #
# #
# attenuation=1 #
# #
v $xiirq/HYDR.81.n1l0m0 p=$xiP/trou_noir.A4
v $xiirq/HYDR.81.n1l0m0 p=$xiP/trou_noir.B4
# Cette image est l'accumulation des sequences (suivant la palette utilisee) : #
# #
# xivPdf 1 2 / 014384_014511 #
# xivPdf 1 2 / 014640_014767 #
# #
v $xiirq/HYDR.82.n1l0m0 p=$xiP/trou_noir.A4
v $xiirq/HYDR.82.n1l0m0 p=$xiP/trou_noir.B4
# Cette image est l'accumulation des sequences (suivant la palette utilisee) : #
# #
# xivPdf 1 2 / 014512_014639 #
# xivPdf 1 2 / 014768_014895 #
# #
v $xiirq/HY.91.0011 p=$xiP/plan.02
v $xiirq/HY.91.0011 p=$xiP/plan.04
v $xiirq/HY.91.0011 p=$xiP/trou_noir.A4
# Cette image est l'image '0011' de l'animation 'v $xiaq/HYDR.91$R16'. #
# #
# Donne une nouvelle version de l'image 'v $xiirq/HY.6d.0020$DROITE p=$xiP/trou_noir.A4' #
# calculee avec la bonne resolution et donc sans artefacts... #
v $xiirq/HY.91.0020 p=$xiP/plan.02
v $xiirq/HY.91.0020 p=$xiP/plan.04
v $xiirq/HY.91.0020 p=$xiP/trou_noir.A4
# Cette image est l'image '0020' de l'animation 'v $xiaq/HYDR.91$R16'. #
# #
# Cette image a ete conservee en plus de 'v $xiirq/HY.91.0011' pour eviter de creer des #
# problemes transitoires avec le site '$WWW'. En effet, dans un premier temps l'image de #
# remplacement de 'v $xiirq/HY.91.0011' fut 'v $xiirq/HY.92.0020' qui, par malheur, fut #
# appelee appelee 'v $xiirq/HY.91.0020'. Je me suis alors rendu compte que son calcul avait #
# ete fait avec 128 images, alors que 'v $xiirq/HY.91.0011', venant de 'v $xiaq/HYDR.91$R16', #
# elle n'en avait demande que 64. Il y avait donc incoherence, d'ou ce "traffic"... #
# Voici un resume de cette chronologie : #
# #
# 1-le 20060612092047, calcul de 'v $xiirq/HY.91.0020' (aujourd'hui 'v $xiirq/HY.92.0020') #
# via {Debut_listG_HY_91_0020,Fin_listG_HY_91_0020} ci-apres, a l'aide d'une sequence de #
# 128 images. #
# #
# 2-le 20060612151334, calcul de 'v $xiaq/HYDR.91$R16' et memorisation de l'image '0020' #
# de la sequence correspondante ('v $xiaq/$Fnota Debut_listG_HYDR_91_16') qui ne comporte #
# que 64 images. L'image '0020' n'est donc pas identique a l'image '0020' de la sequence #
# de 128 images precedentes. Malheureusement (et ceci "en aveugle"), cette image '0020' #
# appelee alors '$xiirq/HY.91.0020' est mise en service dans '$xiMi'. #
# #
# 3-le 20060614090553, me rendant compte de cela, afin de ne pas perdre le resultat du #
# calcul {Debut_listG_HY_91_0020,Fin_listG_HY_91_0020} ci-apres, je le rebaptise #
# {Debut_listG_HY_92_0020,Fin_listG_HY_92_0020}. Puis, pour ne pas perturber '$xiMi', #
# j'y conserve une image 'HY.91.0020' puis je cree 'HY.91.0011' qui est alors la vraie #
# remplacante de 'HY.6d.0020$DROITE'... #
# #
v $xiirq/HY.92.0020 p=$xiP/plan.02
v $xiirq/HY.92.0020 p=$xiP/plan.04
v $xiirq/HY.92.0020 p=$xiP/trou_noir.A4
# Generee (sur '$LACT16') par : #
# #
# #
# :Debut_listG_HY_92_0020: #
# #
# $Z Pal #
# #
# $Z SET Premiere=1 #
# $Z SET Derniere=128 #
# #
# $Z set _____images=$xiirq/HY.92 #
# #
# $Z $DELETE $xT/PARAMZ #
# $Z $xci/valeurs_inte$X \ #
# $Z p=$Premiere d=$Derniere \ #
# $Z vD=-0.5 vA=+0.5 \ #
# $Z cubique=FAUX \ #
# $Z > $xT/PARAMZ #
# #
# $c #include <stdio.h> #
# #
# $c #define N0 Premiere #
# $c #define N Derniere #
# #
# $c #define M0 N0 #
# $c #define M (N-1) #
# $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 if (n==20) #
# $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. #
# $c $formatI\n" #
# $c ,(M-M0)+1,temps #
# $c ); #
# $c printf("$xci/accumule.01$X #
# $c A=$xTV/HYDR. #
# $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 else #
# $c { #
# $c } #
# $c } #
# $c } #
# #
# :Fin_listG_HY_92_0020: #
# #
# #
# Donne une nouvelle version de l'image 'v $xiirq/HY.6d.0020$DROITE p=$xiP/trou_noir.A4' #
# calculee avec la bonne resolution et donc sans artefacts... #
# #
# On notera que 'M=(N-1)' est impair afin que '$xT/PARAMZ' est un point "milieu" (=0)... #
# #
# On notera que l'image 'v $xiirq/HY.92.0020' est differente de 'v $xiirq/HY.91.0020' car, #
# en effet, le nombre d'images utilisees est different : 128 et 64 respectivement. Ceci #
# explique donc que l'image qui remplace 'v $xiirq/HY.6d.0020$DROITE' est en fait l'image #
# 'v $xiirq/HY.91.0011' et non pas '$xiirq/HY.91.0020'... #
v $xiirq/MESO.11.0064
v $xiirq/MESO.11.0128
# Correspond aux images de la sequence : #
# #
# 'v $xiaq/MESO.11$R16' #
# #
v $xiirq/NUCL.O1.0064
v $xiirq/NUCL.O1.0128
# Correspond aux images de la sequence : #
# #
# 'v $xiaq/NUCL.O1$R16' #
# #
v $xiirq/PROTON.E1 p=$xiP/proton.21
# Paires de quarks virtuels, vue de dessus. #
v $xiirq/PROTON.D3 p=$xiP/proton.21
# Paires de quarks virtuels, vue de cote. #
v $xiirq/PROTON.F1 p=$xiP/proton.31
# Vertex de gluons. #
v $xiirq/PROTON.G2 p=$xiP/proton.31
# Degrade de gluons. #
v $xiirq/PROTON.G5 p=$xiP/proton.31
# Proton fractal, vue de loin. #
v $xiirq/PROTON.G6 p=$xiP/proton.31
# Proton fractal, vue de pres. #
v $xiirq/PROTON.G9 p=$xiP/proton.31
# Feu d'artifices fractal, sans depth-cueing, vue de pres. #
v $xiirq/PROTON.GA p=$xiP/proton.31
# Feu d'artifices fractal, avec depth-cueing, vue de pres. #
v $xiirq/PROTON.GB p=$xiP/proton.42
# Feu d'artifices fractal, sans depth-cueing, gluons degrades, vue de pres. #
v $xiirq/PROTON.GC p=$xiP/proton.42
# Feu d'artifices fractal, avec depth-cueing, gluons degrades, vue de pres. #
v $xiirq/PROTON.GD p=$xiP/proton.42
# Feu d'artifices fractal, avec depth-cueing, gluons degrades, vue de loin. #
v $xiirq/PROTON.I3$STEREO p=$xiP/universel.11
# Vue anaglyphique. #
v $xiirq/PROTON.I1 p=$xiP/universel.11
# Degrade de couleurs. #
v $xiirq/PROTON.J1 p=$xiP/universel.21
# Image fixe du type '$xiaq/PROTON.J2$R64'. #
v $xiirq/PROTON.J2 p=$xiP/gris.01
# Accumulation "motion blur" de '$xiaq/PROTON.J5$R64', ph=1.0e-26. #
v $xiirq/NUCL.L3$DROITE
v $xiirq/NUCL.L3$GAUCHE
# Images de bases non convoluees generees par '$xrq/nucleon.LC$Z', #
v $xiirq/NUCL.L3.1$DROITE
v $xiirq/NUCL.L3.1$GAUCHE
# Images '$xiirq/NUCL.L3$DROITE' et '$GAUCHE' avec une legere brume enveloppante, #
v $xiirq/NUCL.L3.3$DROITE
v $xiirq/NUCL.L3.3$GAUCHE
# Images '$xiirq/NUCL.L3$DROITE' et '$GAUCHE' avec une forte brume enveloppante. #
v $xiirq/NUCL.L3.4$DROITE
# Generee (sur '$LACT18') par : #
# #
# #
# :Debut_listG_NUCL_L3_4_DROITE: #
# #
# $Z Pal #
# #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# $Z setenv xTV $xTG #
# #
# $Z $xci/gauss$X \ #
# $Z c=64 \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $Z execRVB $xci/filtre.01$X \ #
# $Z A=$xiirq/NUCL.L3$DROITE%s \ #
# $Z N=$xTV/GAUSS \ #
# $Z avertir_non_implicite=FAUX \ #
# $Z seuil=246 \ #
# $Z R=$xTV/NUCL.L3%s \ #
# $Z $formatI #
# #
# $Z $xci/luminance.01$X \ #
# $Z A=$xTV/NUCL.L3 \ #
# $Z $formatI | \ #
# $Z $xci/acces$X \ #
# $Z renormaliser=VRAI \ #
# $Z $formatI | \ #
# $Z $xci/vraies_C$X \ #
# $Z p=$xiP/gris.01 \ #
# $Z R=$xTV/BRUME \ #
# $Z $formatI #
# #
# $Z $xci/vitre.53$Z \ #
# $Z $xiirq/NUCL.L3$DROITE \ #
# $Z $xTV/BRUME \ #
# $Z $xiirq/NUCL.L3.4$DROITE #
# #
# :Fin_listG_NUCL_L3_4_DROITE: #
# #
v $xiirq/NUCL.L3.4$GAUCHE
# Generee (sur '$LACT18') par : #
# #
# #
# :Debut_listG_NUCL_L3_4_GAUCHE: #
# #
# $Z Pal #
# #
# $Z setenv LONGUEUR_NOMS $xLONGUEUR_NOMS #
# $Z setenv xTV $xTG #
# #
# $Z $xci/gauss$X \ #
# $Z c=64 \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $Z execRVB $xci/filtre.01$X \ #
# $Z A=$xiirq/NUCL.L3$GAUCHE%s \ #
# $Z N=$xTV/GAUSS \ #
# $Z avertir_non_implicite=FAUX \ #
# $Z seuil=246 \ #
# $Z R=$xTV/NUCL.L3%s \ #
# $Z $formatI #
# #
# $Z $xci/luminance.01$X \ #
# $Z A=$xTV/NUCL.L3 \ #
# $Z $formatI | \ #
# $Z $xci/acces$X \ #
# $Z renormaliser=VRAI \ #
# $Z $formatI | \ #
# $Z $xci/vraies_C$X \ #
# $Z p=$xiP/gris.01 \ #
# $Z R=$xTV/BRUME \ #
# $Z $formatI #
# #
# $Z $xci/vitre.53$Z \ #
# $Z $xiirq/NUCL.L3$GAUCHE \ #
# $Z $xTV/BRUME \ #
# $Z $xiirq/NUCL.L3.4$GAUCHE #
# #
# :Fin_listG_NUCL_L3_4_GAUCHE: #
# #
v $xiirq/NUCL.L4$DROITE
v $xiirq/NUCL.L4$GAUCHE
# Images de bases convoluees generees par '$xrq/nucleon.LC$Z', #
v $xiirq/NUCL.L4.1$DROITE
v $xiirq/NUCL.L4.1$GAUCHE
# Images '$xiirq/NUCL.L4$DROITE' et '$GAUCHE' avec une legere brume enveloppante, #
v $xiirq/NUCL.L4.3$DROITE
v $xiirq/NUCL.L4.3$GAUCHE
# Images '$xiirq/NUCL.L4$DROITE' et '$GAUCHE' avec une forte brume enveloppante. #
# ATTENTION : les images (L5,L6) sont identiques aux images (L3,L4), si ce n'est qu'elles #
# ont ete generees apres la modification de l'algorithme d'auto-regulation... #
v $xiirq/NUCL.L7.1
v $xiirq/NUCL.L7.3
v $xiirq/NUCL.L8.1
v $xiirq/NUCL.L8.3
# Images calculees a l'aide de '$xrq/nucleon.LC$Z' en mode 'Std', et en inhibant la vision #
# stereoscopique. Les parametres de rayon etaient les suivants : #
# #
# rqR=0.0400e-15 #
# rqV=0.0400e-15 #
# #
# c'est-a-dire un peu trop grand... #
v $xiirq/NUCL.LA.1$Fi
v $xiirq/NUCL.LA.2
v $xiirq/NUCL.NA.1$Fi
v $xiirq/NUCL.NA.2
# Images calculees a partir de '$xiirq/NUCL.L8' a l'aide de : #
# #
# Std #
# #
# $xci/un_sur_z.01$X ... | $xci/filtre.01$X ... s=64 #
# #
# et : #
# #
# $xci/z_carre.01$X ... #
# #
# et en enlevant dans les deux cas (par symetrie...) le bord de chacune d'entre-elles a #
# l'aide du complement de '$xiio/CADRE$R01' car, en effet, '$xci/filtre.01$X' a pour #
# effet secondaire de periodiser l'image ce qui se voit sur ce type d'image (qui a beacoup #
# de fond NOIR...). #
# #
# Les images '$xiirq/NUCL.NA*' resultant de l'application de '$xci/substitue$Z' avec la #
# palette '$xiP/gris.11' aux images '$xiirq/NUCL.LA*'. #
v $xiirq/NUCL.LA.3
v $xiirq/NUCL.LA.3$Fi
# Image calculee par le produit des deux precedentes par : #
# #
# Std #
# #
# $xci/multi_02.04$X A1=... A2=... T=$xiio/FRAC2.090$N Cx=1 Cy=1 R=... #
# #
# puis : #
# #
# $xci/filtre.01$X ... s=128 #
# #
v $xiirq/NUCL.LB.1$DROITE
v $xiirq/NUCL.LB.1$GAUCHE
v $xiirq/NUCL.LB.3$DROITE
v $xiirq/NUCL.LB.3$GAUCHE
v $xiirq/NUCL.LB$Fi$DROITE
v $xiirq/NUCL.LB$Fi$GAUCHE
v $xiirq/NUCL.LB$DROITE
v $xiirq/NUCL.LB$GAUCHE
v $xiirq/NUCL.LC.1$DROITE
v $xiirq/NUCL.LC.1$GAUCHE
v $xiirq/NUCL.LC.3$DROITE
v $xiirq/NUCL.LC.3$GAUCHE
v $xiirq/NUCL.LC$DROITE
v $xiirq/NUCL.LC$GAUCHE
# Images calculees a l'aide de '$xrq/nucleon.LC$Z' en mode 'Std' avec la nouvelle valeur #
# pour les rayons, soit : #
# #
# rqR=0.0300e-15 #
# rqV=0.0300e-15 #
# #
v $xiirq/NUCL.LD.1$DROITE
v $xiirq/NUCL.LD.1$GAUCHE
# Images obtenues par : #
# #
# Std #
# #
# $xci/distance.01$X A1=$xiirq/NUCL.LC.1.?.? A2=$xiirq/NUCL.LC.3.?.? \ #
# $formatI | #
# $xci/acces$X renormaliser=VRAI R=$xiirq/NUCL.LD.1.?.? \ #
# $formatI #
# #
v $xiirq/NUCL.LD.2$DROITE
v $xiirq/NUCL.LD.2$GAUCHE
# Images obtenues par : #
# #
# Std #
# #
# $xci/distance.01$X A1=$xiirq/NUCL.LC.1.?.? A2=$xiirq/NUCL.LB$Fi.?.? \ #
# $formatI | #
# $xci/acces$X renormaliser=VRAI R=$xiirq/NUCL.LD.2.?.? \ #
# $formatI #
# #
v $xiirq/NUCL.LE.1$DROITE
v $xiirq/NUCL.LE.1$GAUCHE
# Images obtenues par : #
# #
# Std #
# #
# $xci/multi_02.04$X A1=$xiirq/NUCL.LC.1.?.? A2=$xiirq/NUCL.LC.3.?.? \ #
# T=$xiio/ETOILE.11 \ #
# $formatI | #
# $xci/acces$X renormaliser=VRAI R=$xiirq/NUCL.LE.1.?.? \ #
# $formatI #
# #
v $xiirq/NUCL.LE.2$DROITE
v $xiirq/NUCL.LE.2$GAUCHE
# Images obtenues par : #
# #
# Std #
# #
# $xci/multi_02.04$X A1=$xiirq/NUCL.LC.1.?.? A2=$xiirq/NUCL.LB$Fi.?.? \ #
# T=$xiio/ETOILE.11 \ #
# $formatI | #
# $xci/acces$X renormaliser=VRAI R=$xiirq/NUCL.LE.2.?.? \ #
# $formatI #
# #
v $xiirq/VIDE.11
v $xiirq/VIDE.12
# Generee (sur '$LACT15') par : #
# #
# #
# :Debut_listG_VIDE_11: #
# #
# $Z Pal #
# #
# $Z $xrq/vide.L3$Z #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/accumule.01$X \\\ #
# $Z A=$xiim/VIDE. \\\ #
# $Z postfixe=%s \\\ #
# $Z premiere=1 derniere=200 \\\ #
# $Z depart=0.2 arrivee=1.0 \\\ #
# $Z lineaire=VRAI \\\ #
# $Z maximum=VRAI \\\ #
# $Z R=$xiirq/VIDE.11%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# $Z $xci/gauss$X \ #
# $Z R=$xTV/GAUSS \ #
# $Z $formatI #
# #
# $Z $xci/luminance.01$X \ #
# $Z AR=$xiirq/VIDE.11$ROUGE \ #
# $Z AV=$xiirq/VIDE.11$VERTE \ #
# $Z AB=$xiirq/VIDE.11$BLEUE \ #
# $Z R=$xTV/LUMINANCE \ #
# $Z $formatI #
# #
# $Z $xci/filtre.01$X \ #
# $Z A=$xTV/LUMINANCE \ #
# $Z N=$xTV/GAUSS \ #
# $Z seuil=253 \ #
# $Z R=$xTV/FILTRAGE \ #
# $Z $formatI #
# #
# $Z eval `$xci/genere$X \\\ #
# $Z commande='($xci/neutre$X \\\ #
# $Z A=$xTV/FILTRAGE \\\ #
# $Z R=$xTV/FILTRAGE%s \\\ #
# $Z $formatI)' \\\ #
# $Z en_tete=FAUX RVB=VRAI separateur=VRAI` #
# #
# $Z $xci/vitre.53$Z \ #
# $Z $xiirq/VIDE.11 \ #
# $Z $xTV/FILTRAGE \ #
# $Z $xiirq/VIDE.12 #
# #
# :Fin_listG_VIDE_11: #
# #
v $xiirq/VIDE.21.0064
v $xiirq/VIDE.21.0128
# Correspond aux images de la sequence : #
# #
# 'v $xiaq/VIDE.21$R16' #
# #
#######################################################################################################################################
# #
# 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 $xiirq/HYDR.11
# L'atome d'hydrogene vu naivement comme un systeme solaire... #
v $xiirq/HYDR.21.86
v $xiirq/HYDR.21.86$ROUGE p=$xiP/fractal.91 animation=VRAI NOIR=FAUX d=1
v $xiirq/HYDR.21.86$ROUGE p=$xiP/orange.11 animation=VRAI NOIR=FAUX d=1
# Visualisation de la densite de probabilite de presence de l'electron dans l'hydrogene a #
# l'etat n=8 l=6. #
v $xiirq/HYDR.21.86.p
v $xiirq/HYDR.21.86.p$ROUGE p=$xiP/fractal.91 animation=VRAI NOIR=FAUX d=1
v $xiirq/HYDR.21.86.p$ROUGE p=$xiP/dentscie.01 animation=VRAI NOIR=FAUX d=1
# Et variation artistique... #
v $xiirq/HY.6d.0020$DROITE p=$xiP/trou_noir.A4
# Une superposition d'etats propres de l'atome d'Hydrogene. #
v $xiirq/PROTON.GD p=$xiP/proton.42
# Feu d'artifices fractal, avec depth-cueing, gluons degrades, vue de loin. #
Gamma $Gamma_nucleon_LX ; v $xiirq/NUCL.L6.3$DROITE
Gamma $Gamma_nucleon_LX ; v $xiirq/NUCL.L6.3$GAUCHE
# Vue stereoscopique du proton avec forte brume enveloppante. #
v $xiirq/NUCL.LD.2$DROITE
# Vue tres floue et lumineuse de l'interieur du proton. #