/*************************************************************************************************************************************/ /* */ /* 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 '$xrk/attractor.15$I' : */ /* */ /* Jean-Francois Colonna (LACTAMME, 1992??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* D O N N E E S P O U R L A 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 : */ /* */ /*************************************************************************************************************************************/ DEFV(Float,INIT(Xf,FLOT__UNDEF)); DEFV(Float,INIT(Yf,FLOT__UNDEF)); DEFV(Float,INIT(Zf,FLOT__UNDEF)); /* Pour definir les coordonnees {x,y,z} de la particule dans [0,1] ; cette facon de */ /* proceder est liee au fait que d'introduire directement les expressions du type : */ /* 'X_PHYSIQUE_DANS_01(...)' dans 'store_point_3D(...)' conduit a generer des expressions */ /* trop longues a compiler... */ DEFV(Float,INIT(rayon_reel_de_visualisation,FLOT__UNDEF)); /* Rayon reellement utilise pour visualiser la particule dans [0,1]. */