/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        F I L T R A G E   D ' U N E   I M A G E   P A R   T R A N S F O R M E E   D E   F O U R I E R   C O M P L E X E  :         */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xci/filtre.03$I' :                                                                                             */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 1994??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D O N N E E S   U T I L E S  :                                                                                             */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
     DEFV(Logical,INIT(etaler_le_filtre,ETALER_LE_FILTRE));
                                        /* Indique s'il faut etaler ('VRAI') ou pas ('FAUX') le filtre ; dans le cas ou il y a       */
                                        /* etalement, le filtre utilisera toutes les valeurs de [NOIR,BLANC], alors que dans le      */
                                        /* cas contraire, il est conserve en l'etat...                                               */
     DEFV(Int,INIT(seuil_d_etalement_du_filtre,SEUIL_D_ETALEMENT_DU_FILTRE));
                                        /* Seuil de definition du masque d'extraction des frequences basses, ce qui signifie         */
                                        /* que l'on ne garde que les points appartenant au segment                                   */
                                        /* [seuil_d_etalement_du_filtre,BLANC] du filtre.                                            */
     DEFV(Logical,INIT(binariser_le_filtre,BINARISER_LE_FILTRE));
                                        /* Indique s'il faut binariser ('VRAI') ou pas ('FAUX') le filtre ; dans le cas ou il y a    */
                                        /* binarisation, le filtre ne peut prendre que deux valeurs ('NOIR' ou 'BLANC'), alors que   */
                                        /* dans le cas contraire, toutes les valeurs de [NOIR,BLANC] sont possibles...               */
     DEFV(Float,INIT(translation_OX,FLOT__UNDEF));
     DEFV(Float,INIT(translation_OY,FLOT__UNDEF));
                                        /* Argument de translation du noyau initialise a priori en son centre...                     */
     DEFV(deltaF_2D,translation);
                                        /* Translation du champ.                                                                     */
     DEFV(Logical,INIT(renormaliser_l_image,RENORMALISER_L_IMAGE));
                                        /* Afin de renormaliser (eventuellement) l'image obtenue apres filtrage afin                 */
                                        /* qu'elle occupe tous les niveaux de [NOIR,BLANC].                                          */
     DEFV(Logical,INIT(tronquer_les_niveaux,TRONQUER_LES_NIVEAUX));
                                        /* Lorsque 'IL_NE_FAUT_PAS(renormaliser_l_image)', faut-il ou pas tronquer les niveaux,      */
                                        /* cette possibilite permettant de conserver la dynamique de l'image Argument.               */

     DEFV(genere_Float,INIT(minimum_reel_de_la_transformee,FLOT__UNDEF));
     DEFV(genere_Float,INIT(maximum_reel_de_la_transformee,FLOT__UNDEF));
                                        /* Donnent le minimum et le maximum de la partie reelle de la transformee                    */
                                        /* de Fourier, afin de faire ensuite la conversion en une image "standard"...                */
     DEFV(genere_Float,INIT(minimum_imaginaire_de_la_transformee,FLOT__UNDEF));
     DEFV(genere_Float,INIT(maximum_imaginaire_de_la_transformee,FLOT__UNDEF));
                                        /* Donnent le minimum et le maximum de la partie imaginaire de la transformee                */
                                        /* de Fourier.                                                                               */