/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        S I M U L A T I O N   D E   L A   " D Y N A M I Q U E "   I N T E R N E   D ' U N   " D I - E L E C T R O N "  :           */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*                                                   ..          -o-..  .                               .                            */
/*                                                   o%-         :%O    .:.                ....---...                                */
/*                                            .        -.       ooo%% o%Oo.   .......                                                */
/*                                                      .. --.. :::- .-.                                                             */
/*                                                       .oOo.   .:-.:                                                               */
/*                                                        .-o..o%Oo.                                                                 */
/*                                                          . ..   ..                                                                */
/*                                                           .  .   .                                                                */
/*                                                            -. .  .                                                                */
/*                                                            O#:.-:O%.                                                              */
/*                                                            :o:%%ooo                                                               */
/*                                                               .-  OO%-                                                            */
/*                                                                 .oO:.                                                             */
/*                                                                . .  .                                                             */
/*                                                                   . .                                                             */
/*                                                        ...         .  .O%.      :Oo                                               */
/*                                                       ::.           ...:o        -o%O                                             */
/*                                                       -O%O     -.    .. ..      .  --                                             */
/*                                                            .%%oo...   .. ..  ..                                                   */
/*                                                              ..     ...-. ...                                                     */
/*                                                                         .-::                                                      */
/*                                                                           .:Oo                                                    */
/*                                                                             -O%o                                                  */
/*                                                                               -.                                                  */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrq/di_elec.L0$K' :                                                                                            */
/*                                                                                                                                   */
/*                    Jean-Francois COLONNA (LACTAMME, 1994??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        I N T E R F A C E   ' listG '  :                                                                                           */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        :Debut_listG:                                                                                                              */
/*        :Fin_listG:                                                                                                                */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D I R E C T I V E S   S P E C I F I Q U E S   D E   C O M P I L A T I O N  :                                               */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
@define   PRAGMA_CPP_____MODULE_NON_DERIVABLE

@define   PRAGMA_CL_____MODULE_NON_OPTIMISABLE

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        F I C H I E R S   D ' I N C L U D E S   G E N E R A U X  :                                                                 */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
                                        /* Nota : les fichiers d'includes generaux ci-apres ne peuvent etre references dans le       */
                                        /* fichier "nucleon.L1.I" (malheureusement) a cause du fonctionnement de la commande         */
                                        /* '$xcc/cl$Z' qui n'explore pas recursivement les fichiers d'includes...                    */

#include  INCLUDES_BASE

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        O P T I O N S   D E   C O M P I L A T I O N  :                                                                             */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#define   __VERSION__GENERATION_D_UN_DI_ELECTRON                                                                                        \
                                        /* Definition du type de particule que l'on va generer ; etant dans '$xrq/di_elec.L0$K',     */ \
                                        /* il s'agit bien entendu d'un systeme a deux electrons en interaction.                      */

#nodefine VRAIES_SPHERES_PLEINES_TRIDIMENSIONNELLES                                                                                     \
                                        /* Definitions de la visualisation d'une sphere, avec le choix entre deux modules :          */ \
                                        /*                                                                                           */ \
                                        /*        #include  xrq/nucleon.LS.1.I"        : fausse sphere creuse tridimensionnelle,     */ \
                                        /*        #include  xrq/nucleon.LS.2.I"        : vraie sphere pleine tridimensionnelle.      */ \
                                        /*                                                                                           */

                                        /* On notera que l'on fait disparaitre la possibilite d'interpoler uniquement par des        */
                                        /* splines (voir '$xrq/nucleon.L0$K'), car, en effet, cela ne sert plus a rien...            */

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        F I C H I E R S   D ' I N C L U D E S   S P E C I F I Q U E S  :                                                           */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#include  xrq/nucleon.L1.I"
                                        /* Definitions de compilation.                                                               */
#include  xrq/nucleon.L2.I"
                                        /* Definitions des constantes universelles.                                                  */
#include  xrq/nucleon.L3.I"
#include  xrv/particule.41.I"
                                        /* Definitions du temps.                                                                     */
#include  xrq/nucleon.Lc.I"
                                        /* Definitions de l'espace physique (debut).                                                 */
#include  xrq/nucleon.L4.I"
                                        /* Definitions des differents espaces.                                                       */
#include  xrq/nucleon.LF.I"
                                        /* Definitions de la trace "ecrite" des evenements.                                          */
                                        /* On notera que "nucleon.LF.I" est ici depuis que "nucleon.L8.I" utilise la procedure       */
                                        /* 'TRACE_D_UN_EVENEMENT(...)' lorsqu'une particule sort de l'Univers...                     */
#include  xrq/nucleon.L5.I"
                                        /* Definitions des descriptions des particules.                                              */
#include  xrq/nucleon.L7.I"
                                        /* Definitions de la geometrie.                                                              */
#include  xrq/di_elec.Lh.I"
                                        /* Definitions du coloriage du "di-electron".                                                */
#include  xrq/di_elec.L6.I"
                                        /* Definitions du "di-electron".                                                             */
#include  xrq/nucleon.L8.I"
                                        /* Definitions des familles de particules.                                                   */
#include  xrq/nucleon.L9.I"
                                        /* Definitions du deplacement des particules.                                                */
#include  xrq/nucleon.LA.I"
                                        /* Definitions de l'interception d'une particule par un gluon.                               */
#include  xrq/nucleon.LB.I"
                                        /* Definitions des evenements et du generateur aleatoire.                                    */
#include  xrq/nucleon.LC.I"
                                        /* Definitions des elements geometriques aleatoires.                                         */
#include  xrq/nucleon.LD.I"
                                        /* Definitions de la charge de couleurs.                                                     */

#define   VOISINAGE_D_INTERACTION_1_POUR_2_PARTICULES                                                                                   \
                    GRO2(GRO4(FRA10(FRA10(RAYON_D_UN_HADRON))))                                                                         \
                                        /* ATTENTION : la valeur de 'VOISINAGE_D_INTERACTION_1_POUR_2_PARTICULES' est plus grande    */ \
                                        /* dans '$xrq/di_elec.L0$K' que dans '$xrq/nucleon.LE$I', et ce afin de favoriser au         */ \
                                        /* mieux l'absorbtion, par des electrons, des photons qui doivent les intercepter...         */ \
                                        /*                                                                                           */ \
                                        /* ATTENTION, le parametre 'VOISINAGE_D_INTERACTION_1_POUR_2_PARTICULES' est utilise pour    */ \
                                        /* definir le parametre 'ADOLESCENCE_D_UNE_PARTICULE' dans '$xrq/di_elec.LH$I', ainsi        */ \
                                        /* que 'VOISINAGE_D_INTERACTION_2_POUR_2_PARTICULES' dans '$xrq/di_elec.LJ$I'...             */
#define   DISTANCE_DE_PERTURBATION_D_UNE_POSITION                                                                                       \
                    FZERO                                                                                                               \
                                        /* ATTENTION : la valeur de 'DISTANCE_DE_PERTURBATION_D_UNE_POSITION' est choisie nulle      */ \
                                        /* dans '$xrq/di_elec.L0$K' afin de garantir que tout le monde restera dans le plan          */ \
                                        /* (OX,OY)...                                                                                */
#include  xrq/nucleon.LE.I"
                                        /* Definitions des rotations de l'espace.                                                    */

                                        /* On notera que "nucleon.LF.I" a ete deplace depuis que "nucleon.L8.I" utilise la procedure */
                                        /* 'TRACE_D_UN_EVENEMENT(...)' lorsqu'une particule sort de l'Univers...                     */

#define   AUTO_REGULER_LE_MODELE                                                                                                        \
                    FAUX
#include  xrq/nucleon.LL.2.I"
                                        /* Definitions de l'auto-regulation du modele.                                               */
#include  xrq/nucleon.LG.I"
                                        /* Definitions de l'exageration des angles de polarisation.                                  */

                                        /* On notera que "di_elec.LH.I" a ete place derriere "di_elec.LJ.I" depuis que celui-ci      */
                                        /* utilise la procedure 'ORIENTATION_ALEATOIRE_DE_L_AXE_OZ(...)'.                            */
#include  xrq/di_elec.LI.I"
                                        /* Definitions des fluctuations quantiques du vide.                                          */
#include  xrq/di_elec.LJ.I"
                                        /* Definitions des evenements conditionnels pour les particules.                             */
#include  xrq/di_elec.LH.I"
                                        /* Definitions des collisions entre particules.                                              */
#include  xrq/nucleon.LK.I"
                                        /* Definitions des nuages de particules virtuelles.                                          */

                                        /* On notera que "nucleon.LL.2.I" a ete deplace depuis l'introduction d'une nouvelle         */
                                        /* methode d'auto-regulation par 'REGUL?(...)'.                                              */
#include  xrq/di_elec.LM.I"
                                        /* Definitions du modele de la structure dynamique du "di-electron" (debut).                 */

#define   NOMBRE_DE_POINTS_DU_NOYAU_DE_CONVOLUTION                                                                                      \
                    UN
#include  xrq/nucleon.LN.I"
                                        /* Definitions de la generation des images.                                                  */
#include  xrq/nucleon.LO.I"
                                        /* Definitions de l'edition de la geometrie.                                                 */
#include  xrq/nucleon.LP.I"
                                        /* Definitions de l'anti-aliasing.                                                           */
#include  xrq/nucleon.LQ.I"
#include  xrq/di_elec.LQ.I"
                                        /* Definitions de la source lumineuse.                                                       */
#include  xrq/nucleon.LR.2.I"
                                        /* Definitions des fondus.                                                                   */
#include  xrq/nucleon.LS.I"
                                        /* Definitions de la visualisation d'une sphere.                                             */
#include  xrq/nucleon.LT.2.I"
                                        /* Definitions des differentes translations et rotations.                                    */

#define   PROFONDEUR_MINIMALE                                                                                                           \
                    GRO4(FRA4(COORDONNEE_BARYCENTRIQUE_MAXIMALE))
#define   PROFONDEUR_MAXIMALE                                                                                                           \
                    GRO4(FRA4(COORDONNEE_BARYCENTRIQUE_MAXIMALE))
#include  xrq/nucleon.Ld.I"
                                        /* Definitions de la gestion du depth-cueing.                                                */
#include  xrq/nucleon.Le.I"
                                        /* Definitions de la gestion du zoom.                                                        */
#include  xrq/nucleon.LU.I"
                                        /* Definitions de la visualisation des particules.                                           */
#include  xrq/nucleon.LV.I"
                                        /* Definitions de la memorisation du champ global.                                           */
#include  xrq/nucleon.LW.2.I"
                                        /* Definitions des differentes initialisations.                                              */
#include  xrq/nucleon.LX.2.I"
                                        /* Definitions de l'interpolation des parametres.                                            */
#include  xrq/nucleon.LY.2.I"
                                        /* Definitions des verifications de coherence.                                               */
#include  xrq/di_elec.LZ.I"
                                        /* Definitions du modele de la structure dynamique du "di-electron" (suite).                 */
#include  xrq/di_elec.La.2.I"
                                        /* Definitions de l'edition des parametres.                                                  */

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        S I M U L A T I O N   D E   L A   S T R U C T U R E   D Y N A M I Q U E   D U   " D I - E L E C T R O N "   ( F I N )  :   */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
BCommande(nombre_d_arguments,arguments)
/*-----------------------------------------------------------------------------------------------------------------------------------*/
     Bblock
     /*..............................................................................................................................*/
     DEBUT_DE_L_INITIALISATION_DE_L_UNIVERS;
                                        /* Debut d'initialisation de l'univers de la simulation.                                     */
     DEBUT_DE_L_INITIALISATION_DES_INTERPOLATIONS;
                                        /* Debut d'initialisation des differentes interpolations.                                    */
     DEBUT_D_INITIALISATION_DE_LA_SYNTHESE_D_IMAGE;
                                        /* Debut d'initialisation de la synthese d'image.                                            */

#include  xrv/champs_5.1A.I"

     GET_ARGUMENTSv(nombre_d_arguments
                   ,BLOC(GET_ARGUMENT_L("parametres=",editer_les_parametres);

                         PROCESS_ARGUMENTS_GEOMETRIQUES;

                         PROCESS_ARGUMENT_FICHIER("LUMINANCE="
                                                 ,fichier_LUMINANCE
                                                 ,liste_LUMINANCE
                                                 ,LUMINANCE_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );

                         PROCESS_ARGUMENT_FICHIER("CHAMP_ELECTRIQUE_X="
                                                 ,fichier_CHAMP_ELECTRIQUE_X
                                                 ,liste_CHAMP_ELECTRIQUE_X
                                                 ,CHAMP_ELECTRIQUE_X_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );
                         PROCESS_ARGUMENT_FICHIER("CHAMP_ELECTRIQUE_Y="
                                                 ,fichier_CHAMP_ELECTRIQUE_Y
                                                 ,liste_CHAMP_ELECTRIQUE_Y
                                                 ,CHAMP_ELECTRIQUE_Y_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );
                         PROCESS_ARGUMENT_FICHIER("CHAMP_ELECTRIQUE_Z="
                                                 ,fichier_CHAMP_ELECTRIQUE_Z
                                                 ,liste_CHAMP_ELECTRIQUE_Z
                                                 ,CHAMP_ELECTRIQUE_Z_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );

                         PROCESS_ARGUMENT_FICHIER("CHAMP_MAGNETIQUE_X="
                                                 ,fichier_CHAMP_MAGNETIQUE_X
                                                 ,liste_CHAMP_MAGNETIQUE_X
                                                 ,CHAMP_MAGNETIQUE_X_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );
                         PROCESS_ARGUMENT_FICHIER("CHAMP_MAGNETIQUE_Y="
                                                 ,fichier_CHAMP_MAGNETIQUE_Y
                                                 ,liste_CHAMP_MAGNETIQUE_Y
                                                 ,CHAMP_MAGNETIQUE_Y_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );
                         PROCESS_ARGUMENT_FICHIER("CHAMP_MAGNETIQUE_Z="
                                                 ,fichier_CHAMP_MAGNETIQUE_Z
                                                 ,liste_CHAMP_MAGNETIQUE_Z
                                                 ,CHAMP_MAGNETIQUE_Z_IMPLICITE
                                                 ,gTRANSFORMAT_31
                                                  );

                         GET_ARGUMENT_L("images=",memoriser_les_images);
                         GET_ARGUMENT_I("simultanees=",nombre_d_images_simultanees_moins_une);
                         GET_ARGUMENT_L("synchroniser=",synchroniser_la_generation_des_images);

                         GET_ARGUMENT_C("imageR=""R=",nom_imageR);

                         GET_ARGUMENT_L("rapide=",forcer_le_mode_rapide_de_la_synthese_d_image);
                         GET_ARGUMENT_L("tri=",trier_la_liste_des_points);
                         GET_ARGUMENT_L("tri_automatique=""tri_auto="
                                       ,choisir_automatiquement_la_methode_de_tri_d_une_liste_de_points
                                        );
                                        /* Introduit le 20170608095534                                                               */
                         GET_ARGUMENT_L("tri_N2=""N_carre=""N_au_carre=""N_AU_CARRE=""N2="
                                       ,utiliser_le_tri_d_une_liste_quelconque_VERSION_N_AU_CARRE
                                        );
                         GET_ARGUMENT_N("tri_NlogN=""NlN=""N_log_N=""N1=",utiliser_le_tri_d_une_liste_quelconque_VERSION_N_AU_CARRE);
                         GET_ARGUMENT_L("IFGT_N_carre=""IFGT_N_au_carre=""IFGT_N_AU_CARRE=""IFGT_N2="
                                       ,TRI_D_UNE_LISTE_QUELCONQUE_VERSION_N_AU_CARRE_____faire_un_IFGT
                                        );
                                        /* Les parametres "N_log_N=", "IFGT_N_carre=",... ont ete introduits le 20111028201456...    */
                         GET_ARGUMENT_L("message_N_carre=""message_N_au_carre=""message_N_AU_CARRE=""mN2="
                                       ,TRI_D_UNE_LISTE_QUELCONQUE_VERSION_N_AU_CARRE_____editer_le_message_de_duree_excessive
                                        );
                                        /* Arguments introduits le 20120509095649...                                                 */

                         GET_ARGUMENT_L("cNOIR=",convoluer_le_NOIR);
                         GET_ARGUMENT_L("noyau_variable=",convolution_a_noyau_variable);
                         GET_ARGUMENT_I("convolution=",nombre_de_points_du_noyau_de_convolution);
                         GET_ARGUMENT_F("facteur=",facteur_du_nombre_de_points_du_noyau_de_convolution);

                         GET_ARGUMENT_P("noir=""NOIR=",niveau_de_NOIR_remonte);

                         GET_ARGUMENT_L("trainees=",generer_les_trainees);
                         GET_ARGUMENT_L("renormaliser_brutalement=""rb=",renormaliser_brutalement_les_trainees);
                                        /* Arguments introduits le 20241121175558...                                                 */
                         GET_ARGUMENT_L("renormaliser=",renormaliser_les_trainees);
                         GET_ARGUMENT_I("mode_des_trainees=""mode=",mode_de_generation_des_trainees);
                         GET_ARGUMENT_F("attenuation_des_trainees=",facteur_d_attenuation_des_trainees);
                         GET_ARGUMENT_F("attenuation_des_images=",facteur_d_attenuation_des_images);

                         GET_ARGUMENT_L("champ=",memoriser_le_champ_global);
                         GET_ARGUMENT_L("dominant=",visualiser_les_particules_REELLES_dominantes);
                         GET_ARGUMENT_C("imageC=""C=",nom_imageC);

                         GET_ARGUMENT_L("messages=""incomplets=",editer_les_messages_des_processus_incomplets);

                         GET_ARGUMENT_F("minimum=""Zminimum=",profondeur_minimale);
                         GET_ARGUMENT_F("maximum=""Zmaximum=",profondeur_maximale);
                         GET_ARGUMENT_F("minimumT=""ZminimumT=",profondeur_minimale_de_troncation);
                         GET_ARGUMENT_F("maximumT=""ZmaximumT=",profondeur_maximale_de_troncation);

                         GET_ARGUMENT_P("siR=",seuil_inferieur_du_ROUGE);
                         GET_ARGUMENT_P("ssR=",seuil_superieur_du_ROUGE);
                         GET_ARGUMENT_P("siV=",seuil_inferieur_du_VERTE);
                         GET_ARGUMENT_P("ssV=",seuil_superieur_du_VERTE);
                         GET_ARGUMENT_P("siB=",seuil_inferieur_du_BLEUE);
                         GET_ARGUMENT_P("ssB=",seuil_superieur_du_BLEUE);

                         GET_ARGUMENT_F("attenuation_au_bord=",attenuation_au_bord_d_un_disque);
                         GET_ARGUMENT_F("Dinterieur=",derivee_a_l_interieur_de_la_couronne);
                         GET_ARGUMENT_F("Dexterieur=",derivee_a_l_exterieur_de_la_couronne);

                         GET_ARGUMENT_L("vqr=""vqR=""vQR=",visualiser_les_electrons_REELs);
                         GET_ARGUMENT_L("vqv=""vqV=""vQV=",visualiser_les_electrons_VIRTUELs);

                         GET_ARGUMENT_L("vaqr=""vaqR=""vAQR=",visualiser_les_anti_electrons_REELs);
                         GET_ARGUMENT_L("vaqv=""vaqV=""vAQV=",visualiser_les_anti_electrons_VIRTUELs);

                         GET_ARGUMENT_L("vnr=""vnR=""vNR=",visualiser_les_neutrinos_REELs);
                         GET_ARGUMENT_L("vnv=""vnV=""vNV=",visualiser_les_neutrinos_VIRTUELs);

                         GET_ARGUMENT_L("vpr=""vpR=""vPR=",visualiser_les_photons_REELs);
                         GET_ARGUMENT_L("vpv=""vpV=""vPV=",visualiser_les_photons_VIRTUELs);

                         GET_ARGUMENT_L("vzr=""vzR=""vZR=",visualiser_les_z0s_REELs);
                         GET_ARGUMENT_L("vzv=""vzV=""vZV=",visualiser_les_z0s_VIRTUELs);

                         GET_ARGUMENT_F("reR=""rER=",rayon_de_visualisation_d_un_electron_REEL);
                         GET_ARGUMENT_F("reV=""rEV=",rayon_de_visualisation_d_un_electron_VIRTUEL);
                         GET_ARGUMENT_F("rn=""rN=",rayon_de_visualisation_d_un_neutrino);
                         GET_ARGUMENT_I("nnsP=",nombre_negatif_de_spheres_pour_les_photons);
                         GET_ARGUMENT_I("npsP=",nombre_positif_de_spheres_pour_les_photons);
                         GET_ARGUMENT_F("dvP=",fraction_de_la_vitesse_pour_les_photons);
                         GET_ARGUMENT_F("rp=""rP=",rayon_de_visualisation_d_un_photon);
                         GET_ARGUMENT_F("ap=""aP=",amplitude_de_pulsation_d_un_photon);
                         GET_ARGUMENT_F("pp=",periode_de_pulsation_d_un_photon);
                                        /* Le parametre "pP=" a ete supprime le 20061211134010 pour cause de definition multiple...  */
                         GET_ARGUMENT_F("fp=""fP=",phase_de_pulsation_d_un_photon);
                         GET_ARGUMENT_I("nnsZ=",nombre_negatif_de_spheres_pour_les_z0s);
                         GET_ARGUMENT_I("npsZ=",nombre_positif_de_spheres_pour_les_z0s);
                         GET_ARGUMENT_F("dvZ=",fraction_de_la_vitesse_pour_les_z0s);
                         GET_ARGUMENT_F("rz=",rayon_de_visualisation_d_un_z0);

                         GET_ARGUMENT_L("trace=",tracer_les_evenements);

                         GET_ARGUMENT_L("chronometrer=",chronometrer_la_simulation);

                         GET_ARGUMENT_L("geometrie=""fichier=",creer_la_base_de_donnees_geometriques);
                         GET_ARGUMENT_L("ecf=",editer_la_couleur_en_flottant);

                         GET_ARGUMENT_F("couronne=",epaisseur_de_la_couronne_d_anti_aliasing);
                         GET_ARGUMENT_F("anti_aliasing=",attenuation_d_anti_aliasing_au_bord);

                         GET_ARGUMENT_F("Lx=",ASD1(Lsource,x));
                         GET_ARGUMENT_F("Ly=",ASD1(Lsource,y));
                         GET_ARGUMENT_F("Lz=",ASD1(Lsource,z));
                         GET_ARGUMENT_F("speculaire=",intensite_speculaire);

                         GET_ARGUMENT_L("randomiser=",randomiser_la_visualisation_des_particules);
                         GET_ARGUMENT_F("ri=""interieur=",rayon_interieur_relatif_d_une_particule);
                         GET_ARGUMENT_F("re=""exterieur=",rayon_exterieur_relatif_d_une_particule);
                         GET_ARGUMENT_F("seuil=",seuil_de_randomisation_des_particules);

                         GET_ARGUMENT_F("stereo=",decalage_angulaire_pour_la_stereoscopie);

                         GET_ARGUMENT_I("graine=""g=",graine_du_generateur_d_evenements);
                         GET_ARGUMENT_L("affiner_rdn=",rdnIFnD_____affiner_la_generation);
                         GET_ARGUMENT_L("iterer_rdn=",rdnIFnD_____iterer_la_generation);

                         GET_ARGUMENT_F("position=""fluctuation_position=",distance_de_perturbation_d_une_position);
                         GET_ARGUMENT_F("fluctuation_direction=""direction=",taux_de_fluctuation_d_une_direction);

                         GET_ARGUMENT_L("binariser_couleur=""binariser=",binariser_les_charges_de_couleur);
                         GET_ARGUMENT_F("moderateur=",moderateur_de_la_perturbation_aleatoire_additive_des_trois_composantes);
                         GET_ARGUMENT_L("majorer=",majorer_la_composante_preponderante_de_la_charge_de_couleurs);

                         GET_ARGUMENT_F("ecev=""eceV=",exageration_de_la_charge_des_electrons_et_des_anti_electrons_virtuels);

                         GET_ARGUMENT_F("EX=",champ_electrique_X);
                         GET_ARGUMENT_F("EY=",champ_electrique_Y);
                         GET_ARGUMENT_F("EZ=",champ_electrique_Z);

                         GET_ARGUMENT_F("BX=",champ_magnetique_X);
                         GET_ARGUMENT_F("BY=",champ_magnetique_Y);
                         GET_ARGUMENT_F("BZ=",champ_magnetique_Z);

                         GET_ARGUMENT_L("electron_1=",initialiser_avec_l_electron_1_REEL);
                         GET_ARGUMENT_L("electron_2=",initialiser_avec_l_electron_2_REEL);
                         GET_ARGUMENT_L("anti_electron=",initialiser_avec_l_anti_electron_REEL);
                         GET_ARGUMENT_L("neutrino=",initialiser_avec_le_neutrino_REEL);

                         GET_ARGUMENT_F("ralentissement=",echelle_de_temps);
                         PROCESS_ARGUMENT_F("t0=",instant_initial
                                           ,BLOC(VIDE;)
                                           ,BLOC(RE_INITIALISATION_DE_L_HORLOGE;
                                                 )
                                            );
                         GET_ARGUMENT_F("ph=""T=",periode_initiale_de_l_horloge);
                         GET_ARGUMENT_I("p0=",numero_de_la_periode_courante);
                         GET_ARGUMENT_I("pV=",numero_de_la_premiere_periode_a_visualiser);

                         GET_ARGUMENT_F("vmeae=",vitesse_moyenne_des_electrons_et_des_anti_electrons);

                         GET_ARGUMENT_F("dvmer=""der=",duree_de_vie_moyenne_des_electrons_reels);
                         GET_ARGUMENT_F("dvmaer=""daer=",duree_de_vie_moyenne_des_anti_electrons_reels);
                         GET_ARGUMENT_F("dvmev=""dev=",duree_de_vie_moyenne_des_electrons_virtuels);
                         GET_ARGUMENT_F("dvmaev=""daev=",duree_de_vie_moyenne_des_anti_electrons_virtuels);
                         GET_ARGUMENT_F("dvmpr=""dpr=",duree_de_vie_moyenne_des_photons_reels);
                         GET_ARGUMENT_F("dvmpv=""dpv=",duree_de_vie_moyenne_des_photons_virtuels);
                         GET_ARGUMENT_F("dvmnr=""dnr=",duree_de_vie_moyenne_des_neutrinos_reels);
                         GET_ARGUMENT_F("dvmnv=""dnv=",duree_de_vie_moyenne_des_neutrinos_virtuels);
                         GET_ARGUMENT_F("dzr=""dvmzr=",duree_de_vie_moyenne_des_z0s_reels);
                         GET_ARGUMENT_F("dzv=""dvmzv=",duree_de_vie_moyenne_des_z0s_virtuels);

                         GET_ARGUMENT_F("fadv=",facteur_d_allongement_de_la_duree_de_vie_moyenne_des_particules_collisionnables);
                         GET_ARGUMENT_F("vol=""dv=",duree_de_vol_maximale_relative_a_la_duree_de_vie_moyenne);

                         GET_ARGUMENT_I("particules=",nombre_maximal_de_particules_dans_le_proton);
                         GET_ARGUMENT_I("photonsR=",nombre_maximal_de_photons_REELs_du_di_electron);
                         GET_ARGUMENT_I("photonsV=",nombre_maximal_de_photons_VIRTUELs_du_di_electron);
                         GET_ARGUMENT_I("z0sR=",nombre_maximal_de_z0s_REELs_du_di_electron);
                         GET_ARGUMENT_I("z0sV=",nombre_maximal_de_z0s_VIRTUELs_du_di_electron);
                         GET_ARGUMENT_L("auto_reguler=",auto_reguler_le_modele);
                         GET_ARGUMENT_F("Tregulation=",taux_d_auto_regulation);
                         GET_ARGUMENT_I("Eregulation=",demi_exposant_d_auto_regulation);
                         GET_ARGUMENT_F("Cregulation=",coefficient_d_auto_regulation);

                         GET_ARGUMENT_F("exageration=",exageration_des_angles_de_polarisation);

                         GET_ARGUMENT_I("nv=""nf=""nefqv=",nombre_d_evenements_pour_les_fluctuations_quantiques_du_vide);
                         GET_ARGUMENT_F("pv=",probabilite_d_evenement_conditionnel_pour_un_point_du_vide);
                         GET_ARGUMENT_F("p_V=",probabilite_de_INCHANGE_V);

                         GET_ARGUMENT_F("frpV=",facteur_reductif_des_probabilites_relatives_aux_electrons_et_anti_electrons_virtuels);

                         GET_ARGUMENT_F("pe=",probabilite_d_evenement_conditionnel_pour_un_electron);
                         GET_ARGUMENT_F("p_E=",probabilite_de_INCHANGE_E);
                         GET_ARGUMENT_F("p_E___ExP=",probabilite_de_ELECTROWEAK_EMISSION_E___ExP);
                         GET_ARGUMENT_F("a_E___ExP=",angle_polarisation_de_ELECTROWEAK_EMISSION_E___ExP);
                         GET_ARGUMENT_L("i_E___ExP=",interception_par_un_photon_lors_de_ELECTROWEAK_EMISSION_E___ExP);
                         GET_ARGUMENT_F("p_i_E___ExP="
                                       ,probabilite_d_interception_par_un_photon_lors_de_ELECTROWEAK_EMISSION_E___ExP
                                        );
                         GET_ARGUMENT_F("p_E___ExZ=",probabilite_de_ELECTROWEAK_EMISSION_E___ExZ);
                         GET_ARGUMENT_F("a_E___ExZ=",angle_polarisation_de_ELECTROWEAK_EMISSION_E___ExZ);
                         GET_ARGUMENT_L("i_E___ExZ=",interception_par_un_z0_lors_de_ELECTROWEAK_EMISSION_E___ExZ);

                         GET_ARGUMENT_F("pae=",probabilite_d_evenement_conditionnel_pour_un_anti_electron);
                         GET_ARGUMENT_F("p_AE=",probabilite_de_INCHANGE_AE);
                         GET_ARGUMENT_F("p_AE___AExP=",probabilite_de_ELECTROWEAK_EMISSION_AE___AExP);
                         GET_ARGUMENT_F("a_AE___AExP=",angle_polarisation_de_ELECTROWEAK_EMISSION_AE___AExP);
                         GET_ARGUMENT_L("i_AE___AExP=",interception_par_un_photon_lors_de_ELECTROWEAK_EMISSION_AE___AExP);
                         GET_ARGUMENT_F("p_i_AE___AExP="
                                       ,probabilite_d_interception_par_un_photon_lors_de_ELECTROWEAK_EMISSION_AE___AExP
                                        );
                         GET_ARGUMENT_F("p_AE___AExZ=",probabilite_de_ELECTROWEAK_EMISSION_AE___AExZ);
                         GET_ARGUMENT_F("a_AE___AExZ=",angle_polarisation_de_ELECTROWEAK_EMISSION_AE___AExZ);
                         GET_ARGUMENT_L("i_AE___AExZ=",interception_par_un_z0_lors_de_ELECTROWEAK_EMISSION_AE___AExZ);

                         GET_ARGUMENT_F("p_ExP___E=",probabilite_de_ELECTROWEAK_ABSORBTION_ExP___E);
                         GET_ARGUMENT_F("k_E_ExZ___E=",participation_E_ELECTROWEAK_ABSORBTION_ExZ___E);
                         GET_ARGUMENT_F("k_Z_ExZ___E=",participation_Z_ELECTROWEAK_ABSORBTION_ExZ___E);
                         GET_ARGUMENT_F("p_AExP___AE=",probabilite_de_ELECTROWEAK_ABSORBTION_AExP___AE);
                         GET_ARGUMENT_F("k_AE_AExZ___AE=",participation_AE_ELECTROWEAK_ABSORBTION_AExZ___AE);
                         GET_ARGUMENT_F("k_Z_AExZ___AE=",participation_Z_ELECTROWEAK_ABSORBTION_AExZ___AE);

                         GET_ARGUMENT_F("pP=",probabilite_d_evenement_conditionnel_pour_un_photon);
                                        /* Le parametre "pp=" a ete change en "pP=" le 20061211133246 pour cause de definition       */
                                        /* multiple.                                                                                 */
                         GET_ARGUMENT_F("p_P=",probabilite_de_INCHANGE_P);
                         GET_ARGUMENT_F("p_P___ExAE=",probabilite_de_ELECTROWEAK_TRANSFORMATION_P___ExAE);
                         GET_ARGUMENT_F("a_P___ExAE=",angle_polarisation_de_ELECTROWEAK_TRANSFORMATION_P___ExAE);

                         GET_ARGUMENT_F("pZ=",probabilite_d_evenement_conditionnel_pour_un_z0);
                                        /* Le parametre "pz=" a ete change en "pZ=" le 20061211133246 pour cause de definition       */
                                        /* multiple.                                                                                 */
                         GET_ARGUMENT_F("p_Z=",probabilite_de_INCHANGE_Z);
                         GET_ARGUMENT_F("p_Z___ExAE=",probabilite_de_ELECTROWEAK_TRANSFORMATION_Z___ExAE);
                         GET_ARGUMENT_F("a_Z___ExAE=",angle_polarisation_de_ELECTROWEAK_TRANSFORMATION_Z___ExAE);

                         GET_ARGUMENT_F("pN=",probabilite_d_evenement_conditionnel_pour_un_neutrino);
                                        /* Le parametre "pn=" a ete change en "pN=" le 20061211133246 par symetrie avec ce qui       */
                                        /* a et efait pour "pp=" et "pz="...                                                         */
                         GET_ARGUMENT_F("p_N=",probabilite_de_INCHANGE_N);
                         GET_ARGUMENT_F("p_N___NxZ=",probabilite_de_ELECTROWEAK_EMISSION_N___NxZ);
                         GET_ARGUMENT_F("a_N___NxZ=",angle_polarisation_de_ELECTROWEAK_EMISSION_N___NxZ);

                         GET_ARGUMENT_F("p_ExZ___E=",probabilite_de_ELECTROWEAK_ABSORBTION_ExZ___E);
                         GET_ARGUMENT_F("k_E_ExP___E=",participation_E_ELECTROWEAK_ABSORBTION_ExP___E);
                         GET_ARGUMENT_F("k_P_ExP___E=",participation_P_ELECTROWEAK_ABSORBTION_ExP___E);
                         GET_ARGUMENT_F("p_AExZ___AE=",probabilite_de_ELECTROWEAK_ABSORBTION_AExZ___AE);
                         GET_ARGUMENT_F("k_AE_AExP___AE=",participation_AE_ELECTROWEAK_ABSORBTION_AExP___AE);
                         GET_ARGUMENT_F("k_P_AExP___AE=",participation_P_ELECTROWEAK_ABSORBTION_AExP___AE);

                         GET_ARGUMENT_F("p_ExAE___P=",probabilite_de_ELECTROWEAK_TRANSFORMATION_ExAE___P);
                         GET_ARGUMENT_F("p_ExAE___Z=",probabilite_de_ELECTROWEAK_TRANSFORMATION_ExAE___Z);

                         GET_ARGUMENT_F("majorite=""adolescence=",adolescence_d_une_particule);
                         GET_ARGUMENT_F("1voisinage2=""1v2=""1D1D2=",voisinage_1_D1_D2);
                         GET_ARGUMENT_F("2voisinage2=""2v2=""2D1D2=",voisinage_2_D1_D2);

                         GET_ARGUMENT_F("VX0e1R=",VX_electron_1_REEL);
                         GET_ARGUMENT_F("VY0e1R=",VY_electron_1_REEL);
                         GET_ARGUMENT_F("VZ0e1R=",VZ_electron_1_REEL);

                         GET_ARGUMENT_F("VX0e2R=",VX_electron_2_REEL);
                         GET_ARGUMENT_F("VY0e2R=",VY_electron_2_REEL);
                         GET_ARGUMENT_F("VZ0e2R=",VZ_electron_2_REEL);

                         GET_ARGUMENT_F("VX0aeR=",VX_anti_electron_REEL);
                         GET_ARGUMENT_F("VY0aeR=",VY_anti_electron_REEL);
                         GET_ARGUMENT_F("VZ0aeR=",VZ_anti_electron_REEL);

                         GET_ARGUMENT_F("VX0nR=",VX_neutrino_REEL);
                         GET_ARGUMENT_F("VY0nR=",VY_neutrino_REEL);
                         GET_ARGUMENT_F("VZ0nR=",VZ_neutrino_REEL);

                         GET_ARGUMENT_L("caracteristique=",prendre_en_compte_les_distances_caracteristiques);
                         )
                    );

     EDITION_EVENTUELLE_DES_PARAMETRES;

     FIN_DE_L_INITIALISATION_DES_INTERPOLATIONS;
                                        /* Fin d'initialisation des differentes interpolations. ATTENTION : il est imperatif que     */
                                        /* 'FIN_DE_L_INITIALISATION_DES_INTERPOLATIONS' et 'FIN_DE_L_INITIALISATION_DE_L_UNIVERS'    */
                                        /* soient dans cet ordre tres precis, car l'initialisation de l'univers met en place les     */
                                        /* particules REELles dont la position n'est connue que via les parametres d'interpolation.  */
     FIN_DE_L_INITIALISATION_DE_L_UNIVERS;
                                        /* Fin d'initialisation de l'univers de la simulation. ATTENTION : il est imperatif que      */
                                        /* 'FIN_DE_L_INITIALISATION_DES_INTERPOLATIONS' et 'FIN_DE_L_INITIALISATION_DE_L_UNIVERS'    */
                                        /* soient dans cet ordre tres precis, car l'initialisation de l'univers met en place les     */
                                        /* particules REELles dont la position n'est connue que via les parametres d'interpolation.  */
     FIN_D_INITIALISATION_DE_LA_SYNTHESE_D_IMAGE;
                                        /* Fin d'initialisation de la synthese d'image...                                            */
     QUELQUES_VERIFICATIONS_AU_DEBUT_DE_LA_SIMULATION;
                                        /* Quelques verifications sur la coherence des parametres...                                 */

     MEMORISATION_EVENTUELLE_DU_CHAMP_GLOBAL;
                                        /* Memorisation eventuelle du champ global...                                                */

     SIMULATION_DE_LA_STRUCTURE_DYNAMIQUE_D_UN_DI_ELECTRON;
                                        /* Simulation de la structure dynamique du "di-electron".                                    */

     EDITION_EVENTUELLE_DES_PARAMETRES;

     RETU_Commande;
     Eblock
ECommande



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