/*************************************************************************************************************************************/ /* */ /* D E F I N I T I O N S R E L A T I V E S A U R E C U I T S I M U L E : */ /* */ /* */ /* Author of '$xrk/recuit_2D.15$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 1994??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P R O C E D U R E S D ' A C C E S A U X D I F F E R E N T E S L I S T E S : */ /* */ /*************************************************************************************************************************************/ #define ACCES_CIBLE(point) \ IdTb1(liste_des_points_dans_leurs_positions_theoriques \ ,INDX(point,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a un point du reseau de numero donne 'point' dans sa position theorique. */ #define ACCES_POINT(point) \ IdTb1(liste_des_points_dans_leurs_positions_courantes \ ,INDX(point,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a un point du reseau de numero donne 'point' dans sa position courante. */ #define ACCES_SAUVEGARDE_POINT(point) \ IdTb1(Sliste_des_points_dans_leurs_positions_courantes \ ,INDX(point,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a la sauvegarde d'un point du reseau de numero donne 'point'. */ #define ACCES_DISTANCE(pointI,pointJ) \ IdTb2(matrice_des_distances \ ,INDX(pointI,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ,INDX(pointJ,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a la distance entre deux points du reseaux de numeros donnes 'pointI' et 'pointJ'. */ #define ACCES_CONNEXION(pointI,pointJ) \ IdTb2(matrice_des_connexions \ ,INDX(pointI,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ,INDX(pointJ,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a l'etat de connexion entre deux points du reseaux de numeros donnes 'pointI' et */ \ /* 'pointJ'. */ #define ACCES_ROUGE(point) \ IdTb1(liste_ROUGE \ ,INDX(point,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a la composante 'ROUGE' du point de numero donne 'point'. */ #define ACCES_VERTE(point) \ IdTb1(liste_VERTE \ ,INDX(point,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a la composante 'VERTE' du point de numero donne 'point'. */ #define ACCES_BLEUE(point) \ IdTb1(liste_BLEUE \ ,INDX(point,PREMIER_POINT_DU_RESEAU) \ ,NOMBRE_DE_POINTS_DU_RESEAU \ ) \ /* Acces a la composante 'BLEUE' du point de numero donne 'point'. */