/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        G E S T I O N   D E   L A   T A I L L E   D E S   S P H E R E S   R E P R E S E N T A T I V E S  :                         */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrv/champs_5.1B$I' :                                                                                           */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 1993??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        G E S T I O N   D E   L A   T A I L L E   D E S   S P H E R E S   R E P R E S E N T A T I V E S  :                         */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#TestADef PUISSANCE_DU_RAYON_DE_VISUALISATION                                                                                           \
                    TROIS
DEFV(Local,DEFV(Float,INIT(puissance_du_rayon_de_visualisation,PUISSANCE_DU_RAYON_DE_VISUALISATION)));
                                        /* Inverse de la puissance a laquelle est eleve un niveau de gris afin de donner au facteur  */
                                        /* 'facteur_du_rayon_de_visualisation' pres le rayon de la sphere. La valeur implicite est   */
                                        /* telle que le volume de la sphere de materialisation est proportionnel au niveau de gris.  */

#define   RAYON_DES_SPHERES_REPRESENTATIVES(facteur,grandeur)                                                                           \
                    MUL2(facteur                                                                                                        \
                        ,PUIX(grandeur                                                                                                  \
                             ,INVZ(puissance_du_rayon_de_visualisation)                                                                 \
                              )                                                                                                         \
                         )                                                                                                              \
                                        /* Definition d'une fonction faissant passer d'une certaine grandeur au rayon des spheres    */ \
                                        /* representatives...                                                                        */

#define   PROCESS_ARGUMENTS_DE_DEFINITION_DU_RAYON_DES_SPHERES_REPRESENTATIVES                                                          \
                    Bblock                                                                                                              \
                                                                                                                                        \
                    DEBUT_D_IMBRICATION_DES_____gPROCESS_PARAMETRE_____SECONDAIRES;                                                     \
                                        /* Introduit le 20060208111854 ('v $xig/fonct$vv$DEF _IMBRICATION_DES__gPROCESS_PARAMETRE'). */ \
                                                                                                                                        \
                    GET_ARGUMENT_F("puissance=",puissance_du_rayon_de_visualisation);                                                   \
                                                                                                                                        \
                    FIN___D_IMBRICATION_DES_____gPROCESS_PARAMETRE_____SECONDAIRES;                                                     \
                                        /* Introduit le 20060208111854 ('v $xig/fonct$vv$DEF _IMBRICATION_DES__gPROCESS_PARAMETRE'). */ \
                                                                                                                                        \
                    Eblock