/*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N D ' U N E O U P L U S I E U R S S O U R C E S D E P O T E N T I E L : */ /* */ /* */ /* Author of '$xrr/N_corps.13$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 1998??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N D ' U N E O U P L U S I E U R S S O U R C E S D E P O T E N T I E L : */ /* */ /*************************************************************************************************************************************/ #define TOUTES_LES_INTERACTIONS_2_A_2_SONT_PRISES_EN_COMPTE \ VRAI DEFV(Local,DEFV(Logical,INIT(toutes_les_interactions_2_a_2_sont_prises_en_compte ,TOUTES_LES_INTERACTIONS_2_A_2_SONT_PRISES_EN_COMPTE ) ) ); /* Indique si toutes les interactions gravitationnelles 2 a 2 sont prises en compte ('VRAI') */ /* ce qui correspond a la "bonne physique" ou si l'on ne considere que les interactions */ /* entretenues avec un seul corps "source" du potentiel gravitationnel ('FAUX'). */ #define CORPS_SOURCE_DU_POTENTIEL \ PREMIER_POINT_DES_LISTES DEFV(Local,DEFV(Int,INIT(corps_source_du_potentiel,CORPS_SOURCE_DU_POTENTIEL))); /* Indique, si 'toutes_les_interactions_2_a_2_sont_prises_en_compte' est 'FAUX', le corps */ /* "source" du potentiel gravitationnel (c'est-a-dire l'"etoile"). */ /* */ /* Le 19980615182100, a l'occasion de la realisation de la sequence : */ /* */ /* xivPdf 11 2 / 015361_015872 */ /* */ /* a ete ajoutee la liste 'fichier_LISTE_SOURCE_DU_POTENTIEL' qui permet, lorsque */ /* 'EST_VRAI(toutes_les_interactions_2_a_2_sont_prises_en_compte)' d'inhiber selectivement */ /* (c'est-a-dire pour chaque corps pris individuellement) la possibilite de participer a */ /* l'attraction gravitationnelle a laquelle les autres corps sont soumis. Ainsi, cela */ /* permet, par exemple, d'avoir des systemes stellaires a plusieurs etoiles, sans malgre */ /* tout calculer l'ensemble des interactions entre les planetes... */