/*************************************************************************************************************************************/ /* */ /* 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.1E$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 1994??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* L I B E R A T I O N D E S L I S T E S U T I L E S : */ /* */ /*************************************************************************************************************************************/ /* Les 'ADRESSE_PLUS_DEFINIE's ci-dessous ont ete introduits le 20050221172751... */ FdTb1(liste_BLEUE,NOMBRE_DE_POINTS_DU_RESEAU,Float,ADRESSE_PLUS_DEFINIE); FdTb1(liste_VERTE,NOMBRE_DE_POINTS_DU_RESEAU,Float,ADRESSE_PLUS_DEFINIE); FdTb1(liste_ROUGE,NOMBRE_DE_POINTS_DU_RESEAU,Float,ADRESSE_PLUS_DEFINIE); /* Definition des couleurs arbitraires des points... */ FdTb2(matrice_des_connexions,NOMBRE_DE_POINTS_DU_RESEAU,NOMBRE_DE_POINTS_DU_RESEAU,Logical,ADRESSE_PLUS_DEFINIE); /* Definition de la matrice des connexions entre les points du reseau. */ /* */ /* ATTENTION : jusqu'au 20080225160205 c'etait 'FdTb1(...)' qui etait utilise ici, tres */ /* certainement par erreur... */ FdTb2(matrice_des_distances,NOMBRE_DE_POINTS_DU_RESEAU,NOMBRE_DE_POINTS_DU_RESEAU,Float,ADRESSE_PLUS_DEFINIE); /* Definition de la matrice des distances entre les points... */ /* */ /* ATTENTION : jusqu'au 20080225160205 c'etait 'FdTb1(...)' qui etait utilise ici, tres */ /* certainement par erreur... */ FdTb1(Sliste_des_points_dans_leurs_positions_courantes,NOMBRE_DE_POINTS_DU_RESEAU,pointF_3D,ADRESSE_PLUS_DEFINIE); FdTb1(liste_des_points_dans_leurs_positions_courantes,NOMBRE_DE_POINTS_DU_RESEAU,pointF_3D,ADRESSE_PLUS_DEFINIE); /* Definition de la liste des points du reseau dans leurs positions courantes et de sa */ /* sauvegarde... */ FdTb1(liste_des_points_dans_leurs_positions_theoriques,NOMBRE_DE_POINTS_DU_RESEAU,pointF_3D,ADRESSE_PLUS_DEFINIE); /* Definition de la liste des points du reseau dans leurs positions esperees a la fin du */ /* processus... */ /* Les 'ADRESSE_PLUS_DEFINIE's ci-dessus ont ete introduits le 20050221172751... */ Eblock /* ATTENTION : le 'Bblock' associe est dans '$recuit_2D.1D$I'... */