/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        T E S T   D E   L A   G E N E R A T I O N   D E S   C H A M P S   " T R E F L E "                                          */
/*        E T   " T R O I S - G A U S S I E N S "   T R A N S L A T A B L E S  :                                                     */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrq/trefle.90$I' :                                                                                             */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20061212110638).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        M A C R O S   U T I L E S  :                                                                                               */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
-define   TRACE_D_UN_POINT_D_UN_DOUBLET(contexte,niveau_de_marquage,grossissement_des_disques)                                          \
                                        /* Trace d'un point d'un doublet (couleur,anti-couleur).                                     */ \
                    Bblock                                                                                                              \
                    DEFV(pointF_3D,sommet_courant);                                                                                     \
                    RCG(contexte);                                                                                                      \
                                        /* Recuperation du contexte graphique...                                                     */ \
                    GET_CURSOR(ASD1(sommet_courant,x),ASD1(sommet_courant,y),ASD1(sommet_courant,z));                                   \
                                        /* Positionnement sur le point courant.                                                      */ \
                    store_disque(NOIR,niveau_de_marquage                                                                                \
                                ,ImageR                                                                                                 \
                                ,_cDENORMALISE_OX(ASD1(sommet_courant,x))                                                               \
                                ,_cDENORMALISE_OY(ASD1(sommet_courant,y))                                                               \
                                ,_cDENORMALISE_OZ(ASD1(sommet_courant,z))                                                               \
                                ,grossissement_des_disques(INTE(SCALING_OXY(FLOT(rayon_des_disques))))                                  \
                                ,BI_DIMENSIONNEL                                                                                        \
                                 );                                                                                                     \
                    Eblock                                                                                                              \
                                        /* La mise dans un fichier '$I' de 'TRACE_D_UN_POINT_D_UN_DOUBLET(...)' est destine a        */ \
                                        /* eviter le message :                                                                       */ \
                                        /*                                                                                           */ \
                                        /*                  TRACE_D_UN_POINT_D_UN_DOUBLET: unterminated macro call                   */ \
                                        /*                                                                                           */ \
                                        /* qui apparait dans le cas ou cette definition serait dans le '$K' d'appel...               */