/*************************************************************************************************************************************/ /* */ /* P R E - G E N E R A T I O N D E S C O N S T A N T E S " C O M P L I Q U E E S " : */ /* */ /* */ /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ /* * * * ** * * * * * ** * */ /* * * * * * * * * * * * * * * * */ /* * * * * * * * * * * * * * */ /* * * * * * * * * * * * * * * * */ /* * * * * * * * * * * * * * * * */ /* * * * * * * * * * * * * * * * * * */ /* * * * * * * * * * * * * * */ /* * * * * * * * * * * * * * * * */ /* * * * * ** * * * * * ** */ /* * * * * * * * * * * * * * * * * * * * * * * */ /* */ /* */ /* ATTENTION : */ /* */ /* En transferant la version "stand-alone" */ /* '$xcp/Konstantes$c' d'une machine a une autre */ /* un probleme transitoire peut etre rencontre. */ /* Par exemple, en passant de 'SYSTEME_DPX5000_SPIX_CC' */ /* (machine 32 bits) a 'SYSTEME_CRAY2_UNICOS_SCC' */ /* (machine 64 bits), une constante telle 'MMOT' */ /* sera incorrecte puisque correspondant a la machine */ /* 32 bits. En fait cela a peu d'importance, car en */ /* effet, ces constantes ne sont pas utilisees dans */ /* les outils de '$xcp'. Ainsi, apres les compilations */ /* "stand-alone"s par '$xcp/BOOTSTRAP$Z', il suffit de */ /* recompiler "normalement" par '$xcp/GENERE$Z'... */ /* */ /* */ /* Author of '$xcp/Konstantes$K' : */ /* */ /* Jean-Francois COLONNA (LACTAMME, 1990??????????). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* I N T E R F A C E ' listG ' : */ /* */ /* */ /* :Debut_listG: */ /* :Fin_listG: */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* D I R E C T I V E S S P E C I F I Q U E S D E C O M P I L A T I O N : */ /* */ /*************************************************************************************************************************************/ @define PRAGMA_CL_____PAS_DE_LIBRAIRIES_DYNAMIQUES /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* F I C H I E R S D ' I N C L U D E S : */ /* */ /*************************************************************************************************************************************/ #include INCLUDES_BASE /* Le INCLUDES_MINI 'INCLUDES_BASE' a remplace 'INCLUDES_MINI' lors de l'introduction des */ /* constantes {Xorigine,FXorigine,Yorigine,FYorigine,Zorigine,FZorigine} qui necessitent */ /* {Xmin,Ymin,Zmin} et {Xmax,Ymax,Zmax}... */ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P A R A M E T R E S : */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* M A C R O S U T I L E S : */ /* */ /*************************************************************************************************************************************/ #define EDITION_D_UN_MESSAGE(condition,message) \ Bblock \ Test(condition) \ Bblock \ MESSAGE(message); \ Eblock \ ATes \ Bblock \ Eblock \ ETes \ Eblock \ /* Edition conditionnelle d'un message '#message'... */ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P R E - G E N E R A T I O N D E S C O N S T A N T E S " C O M P L I Q U E E S " : */ /* */ /*************************************************************************************************************************************/ BCommande(nombre_d_arguments,arguments) /*-----------------------------------------------------------------------------------------------------------------------------------*/ Bblock /*..............................................................................................................................*/ EGAL(valider_les_axes_OX_OY_OZ,FAUX); /* Introduit le 20080108140054 pour eviter des messages genants au cas ou... */ GET_ARGUMENTSi(nombre_d_arguments ,BLOC(GET_ARGUMENT_L("DEFINEF_____compatibilite_20120501=""compatibilite_20120501=" ,DEFINEF_____compatibilite_20120501 ); /* Arguments introduits le 20120501092425... */ ) ); /* Le 20071204111708 'GET_ARGUMENTS_(...)' fut remplace par 'GET_ARGUMENTSi(...)' pour */ /* plus de generalite (mais voir 'v $xil/defi_K2$vv$DEF 20071202113349' pour les problemes */ /* que cela a pose...). */ BSaveModifyVariable(Logical ,FPrin_____supprimer_les_K_BLANCs_redondants ,FAUX ); /* Introduit le 20210324095057 afin de garantir de belles tabulations ci-apres... */ /* */ /* On notera que cela rend les arguments 'v $xig/fonct$vv$DEF .SupprimerBlancRedondant=.' */ /* ineffectifs... */ EDITION_D_UN_MESSAGE(IFNE(BEGIN_AT_0,UN) ,"un certain nombre de 'TRMU(...)'s et de 'TRPU(...)'s seront peut-etre defaillants" ); EDITION_D_UN_MESSAGE(IZEQ(UNDEF) ,"les constantes indefinies entieres ne doivent pas etre nulles, voir 'v $xig/fonct$vv$DEF 20101025135756'" ); /* Ce test concerne historiquement v $xcg/remote.01$K RemoteCommande'... */ EDITION_D_UN_MESSAGE(IFOU(IZEQ(FLOT__UNDEF),IZEQ(FLOT__NIVEAU_UNDEF)) ,"les constantes indefinies flottantes ne doivent pas etre nulles, voir 'v $xig/fonct$vv$DEF 20101025135756'" ); /* Test introduit le 20101025141033... */ EDITION_D_UN_MESSAGE(IZNE(ADRESSE_NON_DEFINIE) ,"la constante 'ADRESSE_NON_DEFINIE' doit etre nulle, voir 'v $xil/defi_c1$vv$DEF RemoteCommande'" ); EDITION_D_UN_MESSAGE(IFEQ(SOUS(FU,GRAND_EPSILON),FU) ,"la constante 'GRAND_EPSILON' a une valeur incorrecte, voir 'v $xtc/epsilon.01$c'" ); DEFINED("BIT",k___BIT,"BIT."); DEFINED("NBITHX",k___NBITHX,"Nombre de bits dans un chiffre hexa-decimal,"); DEFINED("NHXOC",k___NHXOC,"Nombre de chifres hexa-decimaux par octet,"); /* Introduit le 20130705132723 (tres tres tardivement...). */ DEFINED("NBITOC",k___NBITOC,"Nombre de bits dans un octet,"); DEFINED("NOCHW",k___NOCHW,"Nombre d'octets dans un demi-mot,"); DEFINED("NBITHW",k___NBITHW,"Nombre de bits dans un demi-mot,"); DEFINED("NBITMO",k___NBITMO,"Nombre de bits par mot."); DEFINED("NCHXOC",k___NCHXOC,"Nombre de chiffres hexa-decimaux par octet."); DEFINED("NCHXMO",k___NCHXMO,"Nombre de chiffres hexa-decimaux par mot."); /* Introduit le 20120329135228 (tres tres tardivement...). */ DEFINED("size_Float",k___size_Float,"Taille d'un element 'Float'."); DEFINEX("MHEXA",k___MHEXA,"Masque d'un chiffre hexa-decimal,"); DEFINEX("MOCD",k___MOCD,"Masque de l'octet droit,"); DEFINEX("MHWD",k___MHWD,"Masque du demi-mot droit,"); DEFINEX("MMOT",k___MMOT,"Masque d'un mot."); DEFINED("VALEUR_MINIMALE_DANS_UN_OCTET",k___VALEUR_MINIMALE_DANS_UN_OCTET,"Valeur minimale contenable dans un octet."); DEFINED("VALEUR_MAXIMALE_DANS_UN_OCTET",k___VALEUR_MAXIMALE_DANS_UN_OCTET,"Valeur maximale contenable dans un octet."); DEFINED("NOMBRE_D_OCTETS_DIFFERENTS",k___NOMBRE_D_OCTETS_DIFFERENTS,"Nombre de valeurs d'octets differentes."); DEFINEL("FAUX",k___FAUX,"FAUX,"); DEFINEL("VRAI",k___VRAI,"VRAI."); DEFINEL("INDECIS",k___INDECIS,"INDECIS."); DEFINEL("NEXIST",k___NEXIST,"NEXIST,"); DEFINEL("EXIST",k___EXIST,"EXIST."); DEFINEL("INACTIF",k___INACTIF,"INACTIF,"); DEFINEL("ACTIF",k___ACTIF,"ACTIF."); DEFINEL("INTERDIT",k___INTERDIT,"INTERDIT,"); DEFINEL("AUTORISE",k___AUTORISE,"AUTORISE."); DEFINEL("INVALIDE",k___INVALIDE,"INVALIDE,"); DEFINEL("VALIDE",k___VALIDE,"VALIDE."); DEFINED("SIGNE_PLUS",k___SIGNE_PLUS,"SIGNE PLUS."); DEFINED("SIGNE_MOINS",k___SIGNE_MOINS,"SIGNE MOINS."); /* Introduit le 20101119165021... */ DEFINED("NOMBRE_DE_CHIFFRES_DES_EDITIONS_FLOTTANTES" ,k___NOMBRE_DE_CHIFFRES_DES_EDITIONS_FLOTTANTES ,"Nombre de chiffres des editions flottantes." ); /* Introduit le 20101119165021... */ DEFINED("OK",k___OK,"OK."); DEFINED("DEUX",k___DEUX,"DEUX,"); DEFINED("TROIS",k___TROIS,"TROIS,"); DEFINED("QUATRE",k___QUATRE,"QUATRE,"); DEFINED("CINQ",k___CINQ,"CINQ,"); DEFINED("SIX",k___SIX,"SIX,"); DEFINED("SEPT",k___SEPT,"SEPT,"); DEFINED("HUIT",k___HUIT,"HUIT,"); DEFINED("NEUF",k___NEUF,"NEUF,"); DEFINED("DIX",k___DIX,"DIX,"); DEFINED("ONZE",k___ONZE,"ONZE,"); DEFINED("DOUZE",k___DOUZE,"DOUZE,"); DEFINED("TREIZE",k___TREIZE,"TREIZE,"); DEFINED("QUATORZE",k___QUATORZE,"QUATORZE,"); DEFINED("QUINZE",k___QUINZE,"QUINZE,"); DEFINED("SEIZE",k___SEIZE,"SEIZE,"); DEFINED("DIX_SEPT",k___DIX_SEPT,"DIX SEPT,"); DEFINED("DIX_HUIT",k___DIX_HUIT,"DIX HUIT,"); DEFINED("DIX_NEUF",k___DIX_NEUF,"DIX NEUF,"); DEFINED("VINGT",k___VINGT,"VINGT,"); DEFINED("VINGT_ET_UN",k___VINGT_ET_UN,"VINGT ET UN,"); DEFINED("VINGT_DEUX",k___VINGT_DEUX,"VINGT DEUX,"); DEFINED("VINGT_TROIS",k___VINGT_TROIS,"VINGT TROIS,"); DEFINED("VINGT_QUATRE",k___VINGT_QUATRE,"VINGT QUATRE,"); DEFINED("VINGT_CINQ",k___VINGT_CINQ,"VINGT CINQ."); /* Le 20210307111245, la pre-generation des constantes {DIX_SEPT,...VINGT_CINQ} a ete */ /* introduite... */ DEFINED("CENT",k___CENT,"CENT."); DEFINED("MILLE",k___MILLE,"MILLE."); DEFINED("DIX_MILLE",k___DIX_MILLE,"DIX MILLE."); DEFINED("CENT_MILLE",k___CENT_MILLE,"CENT MILLE."); DEFINED("MILLION",k___MILLION,"MILLION."); DEFINED("MILLIARD",k___MILLIARD,"MILLIARD."); /* La pre-generation des puissances de 10 a ete introduite le 20071204112238... */ DEFINEX("INFINI",k___INFINI,"+INFINI,"); DEFINEX("MOINS_L_INFINI",k___MOINS_L_INFINI,"-INFINI."); DEFINED("PETIT_INFINI",k___PETIT_INFINI,"+petit INFINI."); BSaveModifyVariable(Positive ,nombre_de_chiffres_des_editions_flottantes ,COND(IL_FAUT(DEFINEF_____compatibilite_20120501),nombre_de_chiffres_des_editions_flottantes,SIX) ); /* Introduit le 20120501094724 afin de garantir les valeurs des constantes infinies */ /* flottantes, quelle que soit la compatibilite 'DEFINEF_____compatibilite_20120501'... */ DEFINEF("F_INFINI",k___F_INFINI,"+INFINI flottant,"); DEFINEF("F_MOINS_L_INFINI",k___F_MOINS_L_INFINI,"+INFINI flottant,"); DEFINEF("F_PETIT_INFINI",k___F_PETIT_INFINI,"+petit INFINI flottant,"); DEFINEF("F_MOINS_LE_PETIT_INFINI",k___F_MOINS_LE_PETIT_INFINI,"-petit INFINI flottant,"); ESaveModifyVariable(Positive ,nombre_de_chiffres_des_editions_flottantes ); DEFINEF("FZERO",k___FZERO,"Zero flottant,"); DEFINEF("FU",k___FU,"Unite flottant,"); DEFINEF("FDU",k___FDU,"Demi-unite flottant,"); DEFINEF("FDEUX",k___FDEUX,"Double-unite flottant,"); DEFINEF("FTROIS",k___FTROIS,"Triple-unite flottant."); DEFINEF("FQUATRE",k___FQUATRE,"Quadruple-unite flottant."); DEFINEF("FCINQ",k___FCINQ,"Quintuple-unite flottant."); DEFINEF("FSIX",k___FSIX,"Sextuple-unite flottant."); DEFINEF("FSEPT",k___FSEPT,"Septuple-unite flottant."); DEFINEF("FHUIT",k___FHUIT,"Octuple-unite flottant."); /* Introduits le 20220425112212... */ DEFINED("BEGIN_AT_0",k___BEGIN_AT_0,"Translation des index."); /* Introduit le 20101119161036... */ DEFINEF("FDEUXp30",k___FDEUXp30,"Deux a la puissance 30."); DEFINEF("COSINUS_DE_0",k___COSINUS_DE_0,"Cosinus de 0."); DEFINEF("COSINUS_DE_PI",k___COSINUS_DE_PI,"Cosinus de pi."); DEFINEF("SINUS_DE_PI_SUR_2",k___SINUS_DE_PI_SUR_2,"Sinus de pi/2."); DEFINEF("SINUS_DE_3_PI_SUR_2",k___SINUS_DE_3_PI_SUR_2,"Sinus de 3.pi/2."); DEFINEF("NOMBRE_D_OR",k___NOMBRE_D_OR,"Nombre d'or."); DEFINEF("INVERSE_DU_NOMBRE_D_OR",k___INVERSE_DU_NOMBRE_D_OR,"Inverse du nombre d'or."); /* Introduits le 20120501081256... */ DEFINED("MASQUER_PARCOURS",k___MASQUER_PARCOURS,"Fonction MASQUER_PARCOURS,"); DEFINED("MASQUER_LOAD",k___MASQUER_LOAD,"Fonction MASQUER_LOAD,"); DEFINED("MASQUER_STORE",k___MASQUER_STORE,"Fonction MASQUER_STORE,"); DEFINED("MASQUER_LOAD_ET_STORE",k___MASQUER_LOAD_ET_STORE,"Fonction MASQUER_LOAD_ET_STORE,"); DEFINED("MASQUER_TOUTES_LES_FONCTIONS",k___MASQUER_TOUTES_LES_FONCTIONS,"Fonction MASQUER_TOUTES_LES_FONCTIONS."); #if ( (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_01)) \ ) DEFINED("Xmin",k___Xmin,"Valeur minimale de 'X',"); DEFINED("Xmax",k___Xmax,"Valeur maximale de 'X',"); DEFINED("dimX",k___dimX,"Longueur de l'axe des 'X',"); DEFINED("dimX2",k___dimX2,"Longueur de la moitie de l'axe des 'X',"); DEFINED("Xmin2",k___Xmin2,"Abscisse minimale de [Xmax/2,Xmax],"); DEFINED("Xmax2",k___Xmax2,"Abscisse maximale de [Xmin,Xmax/2],"); DEFINED("Xcentre",k___Xcentre,"Valeur centrale de 'X'."); DEFINED("Ymin",k___Ymin,"Valeur minimale de 'Y',"); DEFINED("Ymax",k___Ymax,"Valeur maximale de 'Y',"); DEFINED("dimY",k___dimY,"Longueur de l'axe des 'Y',"); DEFINED("dimY2",k___dimY2,"Longueur de la moitie de l'axe des 'Y',"); DEFINED("Ymin2",k___Ymin2,"Ordonnee minimale de [Ymax/2,Ymax],"); DEFINED("Ymax2",k___Ymax2,"Ordonnee maximale de [Ymin,Ymax/2],"); DEFINED("Ycentre",k___Ycentre,"Valeur centrale de 'Y'."); DEFINED("Zmin",k___Zmin,"Valeur minimale de 'Z',"); DEFINED("Zmax",k___Zmax,"Valeur maximale de 'Z',"); DEFINED("dimZ",k___dimZ,"Longueur de l'axe des 'Z',"); DEFINED("dimZ2",k___dimZ2,"Longueur de la moitie de l'axe des 'Z',"); DEFINED("Zmin2",k___Zmin2,"Profondeur minimale de [Zmax/2,Zmax],"); DEFINED("Zmax2",k___Zmax2,"Profondeur maximale de [Zmin,Zmax/2],"); DEFINED("Zcentre",k___Zcentre,"Valeur centrale de 'Z'."); DEFINED("Tmin",k___Tmin,"Valeur minimale de 'T',"); DEFINED("Tmax",k___Tmax,"Valeur maximale de 'T',"); DEFINED("dimT",k___dimT,"Longueur de l'axe des 'T',"); DEFINED("dimT2",k___dimT2,"Longueur de la moitie de l'axe des 'T',"); DEFINED("Tmin2",k___Tmin2,"Temps minimal de [Tmax/2,Tmax],"); DEFINED("Tmax2",k___Tmax2,"Temps maximal de [Tmin,Tmax/2],"); DEFINED("Tcentre",k___Tcentre,"Valeur centrale de 'T'."); /* Introduits le 20171219110154... */ DEFINED("MdimXY",k___MdimXY,"Plus grande dimension 2D,"); DEFINED("MdimXYZ",k___MdimXYZ,"Plus grande dimension 3D."); DEFINED("MdimXYZT",k___MdimXYZT,"Plus grande dimension 4D."); DEFINED("dimXY",k___dimXY,"Surface du carre (OX,OY),"); DEFINED("dimXYZ",k___dimXYZ,"Volume du cube (OX,OY,OZ)."); DEFINED("dimXYZT",k___dimXYZT,"Volume du cube (OX,OY,OZ,OT)."); DEFINED("PLUS_GRANDE_IMAGE_CARREE_INSCRITE",k___PLUS_GRANDE_IMAGE_CARREE_INSCRITE,"Image carre inscrite,"); DEFINED("PLUS_PETITE_IMAGE_CARREE_CIRCONSCRITE",k___PLUS_PETITE_IMAGE_CARREE_CIRCONSCRITE,"Image carre circonscrite."); #Aif ( (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_01)) \ ) #Eif ( (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_01)) \ ) #if ( (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_02)) \ || (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_03)) \ ) # ifdef GESTION_DES_IMAGES_STATIQUES_VERSION_01 DEFINED("K___dimX",k___K___dimX,"Longueur maximale de l'axe des 'X',"); DEFINED("K___dimY",k___K___dimY,"Longueur maximale de l'axe des 'Y',"); DEFINED("K___dimZ",k___K___dimZ,"Longueur maximale de l'axe des 'Z'."); DEFINED("K___dimT",k___K___dimT,"Longueur maximale de l'axe des 'T'."); DEFINED("KK___dimX",k___K___dimX,"Longueur maximale de l'axe des 'X',"); DEFINED("KK___dimY",k___K___dimY,"Longueur maximale de l'axe des 'Y',"); DEFINED("KK___dimZ",k___K___dimZ,"Longueur maximale de l'axe des 'Z'."); DEFINED("KK___dimT",k___K___dimT,"Longueur maximale de l'axe des 'T'."); # Aifdef GESTION_DES_IMAGES_STATIQUES_VERSION_01 # Eifdef GESTION_DES_IMAGES_STATIQUES_VERSION_01 # ifdef GESTION_DES_IMAGES_STATIQUES_VERSION_02 DEFINED("KK___dimX",k___K___dimX,"Longueur maximale de l'axe des 'X',"); DEFINED("KK___dimY",k___K___dimY,"Longueur maximale de l'axe des 'Y',"); DEFINED("KK___dimZ",k___K___dimZ,"Longueur maximale de l'axe des 'Z'."); DEFINED("KK___dimT",k___K___dimT,"Longueur maximale de l'axe des 'T'."); # Aifdef GESTION_DES_IMAGES_STATIQUES_VERSION_02 # Eifdef GESTION_DES_IMAGES_STATIQUES_VERSION_02 #Aif ( (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_02)) \ || (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_03)) \ ) #Eif ( (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_02)) \ || (defined(GESTION_DU_FORMAT_DES_IMAGES_VERSION_03)) \ ) DEFINED("PasX",k___PasX,"Pas de parcours de l'axe des 'X',"); DEFINED("PasY",k___PasY,"Pas de parcours de l'axe des 'Y',"); DEFINED("PasZ",k___PasZ,"Pas de parcours de l'axe des 'Z'."); DEFINED("PasT",k___PasT,"Pas de parcours de l'axe des 'T'."); DEFINEF("FXorigine",k___FXorigine,"Origine flottante de l'axe 'OX'."); DEFINEF("FYorigine",k___FYorigine,"Origine flottante de l'axe 'OY'."); DEFINEF("FZorigine",k___FZorigine,"Origine flottante de l'axe 'OZ'."); DEFINEF("FTorigine",k___FTorigine,"Origine flottante de l'axe 'OT'."); /* Introduit le 20071130144039 (a cause de 'v $xiii/vecteurs$DEF 20071130142626'). */ /* */ /* On notera que l'on ne pregenere pas le 20071201095204 {Xorigine,Yorigine,Zorigine} qui */ /* ne sont pas des constantes (elles dependent de {Xmin,Ymin,Zmin}), alors que sont nulles */ /* {FXorigine,FYorigine,FZorigine} par definition de '_____cNORMALISE_O?(...)'. */ DEFINED("NOIR",k___NOIR,"Definition du niveau minimal,"); DEFINED("GRIS",k___GRIS,"Definition du niveau intermediaire,"); DEFINED("BLANC",k___BLANC,"Definition du niveau maximal,"); DEFINED("COULEURS",k___COULEURS,"Definition du nombre de niveaux."); DEFINED("NOMBRE_DE_COMPOSANTES_CHROMATIQUES",k___NOMBRE_DE_COMPOSANTES_CHROMATIQUES,"Nombre de composantes chromatiques."); DEFINED("PRECISION_MINIMALE_DU_ROUGE",k___PRECISION_MINIMALE_DU_ROUGE,"Minimum bits ROUGE dans 'MULTIPLEXAGE_RVB(...)',"); DEFINED("PRECISION_MINIMALE_DU_VERTE",k___PRECISION_MINIMALE_DU_VERTE,"Minimum bits VERTE dans 'MULTIPLEXAGE_RVB(...)',"); DEFINED("PRECISION_MINIMALE_DU_BLEUE",k___PRECISION_MINIMALE_DU_BLEUE,"Minimum bits BLEUE dans 'MULTIPLEXAGE_RVB(...)'."); DEFINED("PRECISION_MAXIMALE_DU_ROUGE",k___PRECISION_MAXIMALE_DU_ROUGE,"Maximum bits ROUGE dans 'MULTIPLEXAGE_RVB(...)',"); DEFINED("PRECISION_MAXIMALE_DU_VERTE",k___PRECISION_MAXIMALE_DU_VERTE,"Maximum bits VERTE dans 'MULTIPLEXAGE_RVB(...)',"); DEFINED("PRECISION_MAXIMALE_DU_BLEUE",k___PRECISION_MAXIMALE_DU_BLEUE,"Maximum bits BLEUE dans 'MULTIPLEXAGE_RVB(...)'."); DEFINED("NOMBRE_DE_SUBSTITUTIONS",k___NOMBRE_DE_SUBSTITUTIONS,"Nombre de listes de SUBSTITUTIONs."); DEFINED("LONGUEUR_DE_L_ONDELETTE_1D",k___LONGUEUR_DE_L_ONDELETTE_1D,"Nombre d'echantillons pour l'ondelette 1D."); ESaveModifyVariable(Logical ,FPrin_____supprimer_les_K_BLANCs_redondants ); /* Introduit le 20210324095057 afin de garantir de belles tabulations ci-apres... */ RETU_Commande; Eblock ECommande