/*************************************************************************************************************************************/ /* */ /* 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