/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N S   D E S   P A R T I C U L E S  :                                                                     */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrq/particle.M51$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 1994??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D ' U N E   P A R T I C U L E   Q U E L C O N Q U E   ( D E B U T )  :                               */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
=define   _Particule                                                                                                                    \
                    STRU(__Particule)
TypedefP(Particule,_Particule)
TypedefS(A___Particule,Particule)
                                        /* Definition d'une particule. La definition du type 'Particule' apparait avant tout le      */
                                        /* reste a cause de son caractere recursif (voir 'DEFINITION_D_UNE_STRUCTURE_DE_CHAINAGE'    */
                                        /* et 'voisinage').                                                                          */

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D E   L A   L I S T E   D E   L ' E N S E M B L E   D E   P A R T I C U L E S   ( D E B U T )  :     */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
DEFINITION_D_UNE_STRUCTURE_DE_CHAINAGE(liste,Particule)
                                        /* Definition d'une structure de liste avec chainage avant et arriere...                     */