/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        O U T I L S   D E   C O M P R E S S I O N / D E C O M P R E S S I O N   O P T I M A L E  :                                 */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrC/CompressionDeCompressionOptimale.01$vv$I' :                                                                */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20130716090530).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#include  "CompressionDeCompression.01.vv.I"

#define   PostFixe_CDC__0X                                                                                                              \
                    Fgetenv("PostFixe_CDC__0X")
                                        /* Definition du couple {compresseur,decompresseur} X.                                       */

#define   NETTOYAGE(PostFixe)                                                                                                           \
                    {                                                                                                                   \
                    if        (LongueurFichier(CONCATENE_CHAINE_02(NOM_DU_FICHIER,PostFixe),FAUX) > TailleFichierCompresseLePlusCourt)  \
                              {                                                                                                         \
                              EXECUTION_COMMANDE(CONCATENE_CHAINE_04(DELETE,ESPACE,NOM_DU_FICHIER,PostFixe));                           \
                              }                                                                                                         \
                    else                                                                                                                \
                              {                                                                                                         \
                              EXECUTION_COMMANDE(CONCATENE_CHAINE_04(DELETE,ESPACE,NOM_DU_FICHIER,PostFixe_CDC__0X));                   \
                              EXECUTION_COMMANDE(CONCATENE_CHAINE_07(CP,ESPACE                                                          \
                                                                    ,NOM_DU_FICHIER,PostFixe,ESPACE                                     \
                                                                    ,NOM_DU_FICHIER,PostFixe_CDC__0X                                    \
                                                                     )                                                                  \
                                                 );                                                                                     \
                              }                                                                                                         \
                    }                                                                                                                   \
                                        /* Suppression des fichiers compresses les plus longs.                                       */



Copyright © Jean-François Colonna, 2013-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2013-2021.