/*************************************************************************************************************************************/
/* */
/* F O N C T I O N D E M E M O R I S A T I O N D U P O I N T C O U R A N T : */
/* */
/* */
/* Author of '$xrv/champs_5.27$I' : */
/* */
/* Jean-Francois Colonna (LACTAMME, 1998??????????). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* I N S T R U C T I O N S P O U R L A G E S T I O N D U R A Y O N : */
/* */
/*************************************************************************************************************************************/
#nodefine PROJECTION_DU_RAYON_VERSION_19980000000000
#define PROJECTION_DU_RAYON_VERSION_19971113103239
/* ATTENTION, pour regenerer exactement des images anterieures au 19971113103239, il */
/* conviendra de prendre pour 'projeter_correctement_le_rayon_avec_le_ZOOM' la valeur */
/* 'FAUX' et pour 'projeter_correctement_le_rayon_une_seule_fois' la valeur 'FAUX'. */
/* Cela se fera donc avec les options : */
/* */
/* rayon_correct_ZOOM=FAUX */
/* rayon_correct_une_seule_fois=FAUX */
/* */
#define PROJETER_CORRECTEMENT_LE_RAYON_AVEC_LE_ZOOM \
VRAI
DEFV(Local,DEFV(Logical,INIT(projeter_correctement_le_rayon_avec_le_ZOOM,PROJETER_CORRECTEMENT_LE_RAYON_AVEC_LE_ZOOM)));
/* Indique si l'on doit projeter correctement le rayon des particules ('VRAI') en gerant */
/* correctement le rapport de zoom ou pas ('FAUX'). */
/* */
/* ATTENTION, le 19971113103239 avec l'introduction de la nouvelle option destinee a */
/* corriger un gros defaut ('projeter_correctement_le_rayon_une_seule_fois'), il a fallu */
/* prendre comme valeur par defaut 'PROJETER_CORRECTEMENT_LE_RAYON_AVEC_LE_ZOOM' la */
/* valeur 'VRAI' au lieu de 'FAUX'. Les options 'projeter_correctement_le_rayon_*' a */
/* a 'FAUX' et a 'VRAI' donne (enfin...) un rendu correct des rayons des particules... */
/* */
/* ATTENTION, le 19971113110740, j'ai inverse le "sens" de cette option, car telle qu'elle */
/* etait definie anterieurement, je commettais une erreur de logique... */
#define PROJETER_CORRECTEMENT_LE_RAYON_UNE_SEULE_FOIS \
VRAI
DEFV(Local,DEFV(Logical,INIT(projeter_correctement_le_rayon_une_seule_fois,PROJETER_CORRECTEMENT_LE_RAYON_UNE_SEULE_FOIS)));
/* Indique si l'on doit projeter correctement le rayon des particules ('VRAI') une seule */
/* fois ('v $xrv/champs_5.1C$I Projection_O') ou bien deux fois ('FAUX'), la premiere etant */
/* faite ici ('v $xrv/champs_5.26$I Projection_O'). Ceci a ete ajoute le 19971113103239 afin */
/* d'assurer une compatibilite avec les generations anterieures. Cette modification a */
/* impliquer le cahngement de la valeur de 'PROJETER_CORRECTEMENT_LE_RAYON_AVEC_LE_ZOOM'. */
#define FAIRE_LA_DIFFERENCE_ENTRE_rayon_reel_absolu_ET_rayon_reel_de_visualisation \
VRAI
DEFV(Local,DEFV(Logical,INIT(faire_la_difference_entre_rayon_reel_absolu_et_rayon_reel_de_visualisation
,FAIRE_LA_DIFFERENCE_ENTRE_rayon_reel_absolu_ET_rayon_reel_de_visualisation
)
)
);
/* Cet indicateur logique a ete ajoute le 20000223160827 pour essayer de comprendre la */
/* quasi-impossibilite de regenerer la sequence : */
/* */
/* xivPdf 9 2 / 016031_016542 */
/* */
/* lors du calcul de la sequence : */
/* */
/* xivPdf 9 2 / 028319_028830 */
/* */
/* ceci pouvant etre du justement a l'introduction de 'rayon_reel_absolu' le 19991216165710. */
/* Apparemment ce n'est pas la cause du probleme, ou autre chose s'y superpose. Il semble */
/* qu'il y ait deux problemes : */
/* */
/* 1-La sequence des evenements n'est pas reproductible exactement : cela semble du */
/* a l'introduction de la fonction 'LONGUEUR(...)' dans 'v $xrq/nucleon.L4$I LONGUEUR' */
/* le 19991224100516 pour la definition du format des images. Cette fonction introduit */
/* une variation "infime" d'une unite certainement suffisante pour expliquer (via la */
/* "sensibilite aux conditions initiales") ce phenomene. Moralite : il est possible de */
/* reconstituer approximativement la sequence anterieure des evenements au debut de la */
/* simulation en reprenant les memes parametres... */
/* */
/* 2-Le rayon de visualiation des particules est plus grand aujourd'hui. Mystere... */
/* En fait les manipulations effectuees laissent supposer que cela vient des options */
/* d'anti-aliasing comme : */
/* */
/* couronne= */
/* attenuation_au_bord= */
/* */
/* Le 20000301085218, il a ete deplace de '$xrv/champs_5.26$I' a '$xrv/champs_5.27$I'... */
/* */
/* Le 20000310174034, j'ai poursuivi des tests intensifs en redescendant sur '$LACT27' et */
/* sous 'olivier' une sauvegarde du 19990922184116, puis en validant toutes les mises a */
/* jour effectuees depuis. Rien d'anormal ne fut trouve. J'ai verifie de plus la coherence */
/* des utilisations de 'Arayon' et de 'Vrayon' ; tout est correct, ce qui avait deja ete */
/* verifie avec cet indicateur. En fait, a l'aide de la sequence : */
/* */
/* xivPdf 9 2 / 028831_029342 */
/* */
/* en faisant : */
/* */
/* set _____RayonsP=0.048 */
/* set _____MinimumR=1.0 */
/* set _____IntermediaireR=1.0 */
/* set _____MaximumR=1.0 */
/* */
/* ou le rayon '0.048' est obtenu par : */
/* */
/* --------- dimension verticale de l'espace [-1,+1] */
/* | */
/* \|/ */
/* */
/* 2 * 28 <-- $_____DistanceY */
/* 0.048 = -------- */
/* 575 */
/* */
/* ^ */
/* | */
/* ------- $dimY */
/* */
/* on trouve sur la premiere image des spheres tangentes (via '$xiP/masque'), ce qui montre */
/* donc que les rayons sont (aujourd'hui) corrects... */