/*************************************************************************************************************************************/
/* */
/* S O M M E " U N I V E R S E L L E " D E D E U X F I C H I E R S N U M E R I Q U E S : */
/* */
/* */
/* Author of '$xrv/UNI2.11$K' : */
/* */
/* Jean-Francois COLONNA (LACTAMME, 20050303110412). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* 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 GENERER_LES_GET_ARGUMENTS_DE_CONTROLE_DE_L_ARITHMETIQUE_ETENDUE_DES_NOMBRES_FLOTTANTS
/* Introduit le 20181224182314... */
@define PRAGMA_CL_____MODULE_NON_OPTIMISABLE_CMAP28
/* Introduit le 20080117085542, date a laquelle, j'ai ete oblige d'aborter la compilation */
/* de ce module au bout de sept heures. Les experiences faites alors ont montrees que le */
/* probleme disparaissait en passant de l'optimisation '-O3' (par defaut sur '$CMAP28') a */
/* '-O2', d'ou cette modification qui plus simplement provoque l'optimisation '-O1'. Cela */
/* venait de 'LIO16(...)' utilise dans 'v $xig/fonct$vv$DEF GENERE__FonctionF_UNI2_02'... */
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* F I C H I E R S D ' I N C L U D E S : */
/* */
/*************************************************************************************************************************************/
#include INCLUDES_BASE
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* V A L E U R S I M P L I C I T E S D E S P A R A M E T R E S : */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* D E F I N I T I O N D E S F I C H I E R S : */
/* */
/*************************************************************************************************************************************/
#include xrv/ARITHMET.1d.I"
/* Passage a l'allocation dynamique le 20060214183416... */
#include xrv/ARITHMET.21.I"
#include xrv/champs_5.41.I"
#define VALEUR_1_IMPLICITE \
FZERO
#define VALEUR_2_IMPLICITE \
FZERO
#define FLOT_IMPLICITE \
FLOT(VRAI)
#define PONDERATION_ADD2_IMPLICITE \
FU
#define PONDERATION_SOUS_IMPLICITE \
FZERO
#define PONDERATION_SOUSnc_IMPLICITE \
FZERO
#define PONDERATION_MUL2_IMPLICITE \
FZERO
#define PONDERATION_DIVZ_IMPLICITE \
FZERO
#define PONDERATION_DIVZnc_IMPLICITE \
FZERO
#define PONDERATION_MIN2_IMPLICITE \
FZERO
#define PONDERATION_MAX2_IMPLICITE \
FZERO
#define PONDERATION_MINMAX_IMPLICITE \
FZERO
#define PONDERATION_MAXMIN_IMPLICITE \
FZERO
#define PONDERATION_IMINMAX_IMPLICITE \
FZERO
#define PONDERATION_IMAXMIN_IMPLICITE \
FZERO
#define PONDERATION_MOYE_IMPLICITE \
FZERO
#define PONDERATION_MOYZ_IMPLICITE \
FZERO
#define PONDERATION_MOYZSI_IMPLICITE \
FZERO
#define PONDERATION_MOYQ_IMPLICITE \
FZERO
#define PONDERATION_MOYQSI_IMPLICITE \
FZERO
#define PONDERATION_MOYH_IMPLICITE \
FZERO
#define PONDERATION_SPUIX_IMPLICITE \
FZERO
#define PONDERATION_SPUIXnc_IMPLICITE \
FZERO
#define PONDERATION_SE12_IMPLICITE \
FZERO
#define PONDERATION_SE12nc_IMPLICITE \
FZERO
#define PONDERATION_SE22_IMPLICITE \
FZERO
#define PONDERATION_SE22nc_IMPLICITE \
FZERO
#define PONDERATION_ATAN_IMPLICITE \
FZERO
#define PONDERATION_ATANnc_IMPLICITE \
FZERO
#define PONDERATION_MULH24_IMPLICITE \
FZERO
gGENERATION_D_UN_FICHIER(fichier1_des_valeurs,liste1_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier2_des_valeurs,liste2_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_FLOT_des_valeurs,liste_FLOT_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_ADD2_des_valeurs,liste_ADD2_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SOUS_des_valeurs,liste_SOUS_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SOUSnc_des_valeurs,liste_SOUSnc_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MUL2_des_valeurs,liste_MUL2_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_DIVZ_des_valeurs,liste_DIVZ_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_DIVZnc_des_valeurs,liste_DIVZnc_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MIN2_des_valeurs,liste_MIN2_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MAX2_des_valeurs,liste_MAX2_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MINMAX_des_valeurs,liste_MINMAX_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MAXMIN_des_valeurs,liste_MAXMIN_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_IMINMAX_des_valeurs,liste_IMINMAX_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_IMAXMIN_des_valeurs,liste_IMAXMIN_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MOYE_des_valeurs,liste_MOYE_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MOYZ_des_valeurs,liste_MOYZ_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MOYZSI_des_valeurs,liste_MOYZSI_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MOYQ_des_valeurs,liste_MOYQ_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MOYQSI_des_valeurs,liste_MOYQSI_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MOYH_des_valeurs,liste_MOYH_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SPUIX_des_valeurs,liste_SPUIX_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SPUIXnc_des_valeurs,liste_SPUIXnc_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SE12_des_valeurs,liste_SE12_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SE12nc_des_valeurs,liste_SE12nc_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SE22_des_valeurs,liste_SE22_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_SE22nc_des_valeurs,liste_SE22nc_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_ATAN_des_valeurs,liste_ATAN_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_ATANnc_des_valeurs,liste_ATANnc_des_valeurs);
gGENERATION_D_UN_FICHIER(fichier_MULH24_des_valeurs,liste_MULH24_des_valeurs);
/* Definition en memoire des fichiers. */
#define ELEMENT_DU_FICHIER1(index) \
gELEMENT_DU_FICHIER(liste1_des_valeurs,index)
#define ELEMENT_DU_FICHIER2(index) \
gELEMENT_DU_FICHIER(liste2_des_valeurs,index)
#define ELEMENT_DU_FICHIER_FLOT(index) \
gELEMENT_DU_FICHIER(liste_FLOT_des_valeurs,index)
#define ELEMENT_DU_FICHIER_ADD2(index) \
gELEMENT_DU_FICHIER(liste_ADD2_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SOUS(index) \
gELEMENT_DU_FICHIER(liste_SOUS_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SOUSnc(index) \
gELEMENT_DU_FICHIER(liste_SOUSnc_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MUL2(index) \
gELEMENT_DU_FICHIER(liste_MUL2_des_valeurs,index)
#define ELEMENT_DU_FICHIER_DIVZ(index) \
gELEMENT_DU_FICHIER(liste_DIVZ_des_valeurs,index)
#define ELEMENT_DU_FICHIER_DIVZnc(index) \
gELEMENT_DU_FICHIER(liste_DIVZnc_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MIN2(index) \
gELEMENT_DU_FICHIER(liste_MIN2_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MAX2(index) \
gELEMENT_DU_FICHIER(liste_MAX2_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MINMAX(index) \
gELEMENT_DU_FICHIER(liste_MINMAX_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MAXMIN(index) \
gELEMENT_DU_FICHIER(liste_MAXMIN_des_valeurs,index)
#define ELEMENT_DU_FICHIER_IMINMAX(index) \
gELEMENT_DU_FICHIER(liste_IMINMAX_des_valeurs,index)
#define ELEMENT_DU_FICHIER_IMAXMIN(index) \
gELEMENT_DU_FICHIER(liste_IMAXMIN_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MOYE(index) \
gELEMENT_DU_FICHIER(liste_MOYE_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MOYZ(index) \
gELEMENT_DU_FICHIER(liste_MOYZ_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MOYZSI(index) \
gELEMENT_DU_FICHIER(liste_MOYZSI_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MOYQ(index) \
gELEMENT_DU_FICHIER(liste_MOYQ_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MOYQSI(index) \
gELEMENT_DU_FICHIER(liste_MOYQSI_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MOYH(index) \
gELEMENT_DU_FICHIER(liste_MOYH_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SPUIX(index) \
gELEMENT_DU_FICHIER(liste_SPUIX_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SPUIXnc(index) \
gELEMENT_DU_FICHIER(liste_SPUIXnc_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SE12(index) \
gELEMENT_DU_FICHIER(liste_SE12_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SE12nc(index) \
gELEMENT_DU_FICHIER(liste_SE12nc_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SE22(index) \
gELEMENT_DU_FICHIER(liste_SE22_des_valeurs,index)
#define ELEMENT_DU_FICHIER_SE22nc(index) \
gELEMENT_DU_FICHIER(liste_SE22nc_des_valeurs,index)
#define ELEMENT_DU_FICHIER_ATAN(index) \
gELEMENT_DU_FICHIER(liste_ATAN_des_valeurs,index)
#define ELEMENT_DU_FICHIER_ATANnc(index) \
gELEMENT_DU_FICHIER(liste_ATANnc_des_valeurs,index)
#define ELEMENT_DU_FICHIER_MULH24(index) \
gELEMENT_DU_FICHIER(liste_MULH24_des_valeurs,index)
/* Acces a un element courant des fichiers. */
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* F O N C T I O N S O M M E " U N I V E R S E L L E " D E D E U X N O M B R E S : */
/* */
/*************************************************************************************************************************************/
DEFV(Local,DEFV(Float,INIT(courante_____utiliser_evidemment_la_precision_Float,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_ADD2,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SOUS,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SOUSnc,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MUL2,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_DIVZ,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_DIVZnc,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MIN2,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MAX2,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MINMAX,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MAXMIN,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_IMINMAX,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_IMAXMIN,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MOYE,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MOYZ,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MOYZSI,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MOYQ,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MOYQSI,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MOYH,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SPUIX,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SPUIXnc,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SE12,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SE12nc,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SE22,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_SE22nc,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_ATAN,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_ATANnc,FLOT__UNDEF)));
DEFV(Local,DEFV(Float,INIT(courante_____ponderation_de_MULH24,FLOT__UNDEF)));
DEFV(Local,DEFV(Positive,INIT(courante_____compteur_de_reference,ZERO)));
/* Ponderations courantes a utiliser... */
/* */
/* Le 20130514123227, 'courante_____compteur_de_reference' a ete introduit... */
BFonctionF
GENERE__FonctionF_UNI2_02(Fsomme_universelle(argument1,argument2),courante_____)
EFonctionF
/* Introduit le 20061024122908 apres la suppression de 'UNI2(...)' pour des raisons de */
/* difficulte de ses mises a jour ('v $xil/defi_K2$vv$DEF 20061024122449')... */
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* S O M M E " U N I V E R S E L L E " D E D E U X F I C H I E R S N U M E R I Q U E S : */
/* */
/*************************************************************************************************************************************/
BCommande(nombre_d_arguments,arguments)
/*-----------------------------------------------------------------------------------------------------------------------------------*/
Bblock
#include xrv/ARITHMET.22.I"
#include xci/valeurs.03.I"
/*..............................................................................................................................*/
#include xrv/champs_5.1A.I"
/* Ceci fut introduit le 20070103173027... */
GET_ARGUMENTS_(nombre_d_arguments
,BLOC(PROCESS_ARGUMENT_I("nombre_elements=""ne=",nombre_d_elements
,BLOC(VIDE;)
,BLOC(Bblock
PRINT_AVERTISSEMENT("'ne=' doit etre defini avant toute entree de fichiers");
Eblock
)
);
PROCESS_ARGUMENTS_DE_DEFINITION_DES_FICHIERS_01;
PROKESF_ARGUMENT_FICHIER("fichier1="
,fichier1_des_valeurs
,liste1_des_valeurs
,VALEUR_1_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("fichier2="
,fichier2_des_valeurs
,liste2_des_valeurs
,VALEUR_2_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("FLOT="
,fichier_FLOT_des_valeurs
,liste_FLOT_des_valeurs
,FLOT_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("ADD2="
,fichier_ADD2_des_valeurs
,liste_ADD2_des_valeurs
,PONDERATION_ADD2_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("SOUS="
,fichier_SOUS_des_valeurs
,liste_SOUS_des_valeurs
,PONDERATION_SOUS_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("SOUSnc="
,fichier_SOUSnc_des_valeurs
,liste_SOUSnc_des_valeurs
,PONDERATION_SOUSnc_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SOUSnc=" a ete introduit le 20080102132921... */
PROKESF_ARGUMENT_FICHIER("MUL2="
,fichier_MUL2_des_valeurs
,liste_MUL2_des_valeurs
,PONDERATION_MUL2_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("DIVZ="
,fichier_DIVZ_des_valeurs
,liste_DIVZ_des_valeurs
,PONDERATION_DIVZ_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("DIVZnc="
,fichier_DIVZnc_des_valeurs
,liste_DIVZnc_des_valeurs
,PONDERATION_DIVZnc_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "DIVZnc=" a ete introduit le 20080102132921... */
PROKESF_ARGUMENT_FICHIER("MIN2="
,fichier_MIN2_des_valeurs
,liste_MIN2_des_valeurs
,PONDERATION_MIN2_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("MAX2="
,fichier_MAX2_des_valeurs
,liste_MAX2_des_valeurs
,PONDERATION_MAX2_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("MINMAX="
,fichier_MINMAX_des_valeurs
,liste_MINMAX_des_valeurs
,PONDERATION_MINMAX_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "MINMAX=" a ete introduit le 20061024114734... */
PROKESF_ARGUMENT_FICHIER("MAXMIN="
,fichier_MAXMIN_des_valeurs
,liste_MAXMIN_des_valeurs
,PONDERATION_MAXMIN_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "MAXMIN=" a ete introduit le 20061024114734... */
PROKESF_ARGUMENT_FICHIER("MOYE="
,fichier_MOYE_des_valeurs
,liste_MOYE_des_valeurs
,PONDERATION_MOYE_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("IMINMAX="
,fichier_IMINMAX_des_valeurs
,liste_IMINMAX_des_valeurs
,PONDERATION_IMINMAX_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "IMINMAX=" a ete introduit le 20080102132921... */
PROKESF_ARGUMENT_FICHIER("IMAXMIN="
,fichier_IMAXMIN_des_valeurs
,liste_IMAXMIN_des_valeurs
,PONDERATION_IMAXMIN_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "IMAXMIN=" a ete introduit le 20080102132921... */
PROKESF_ARGUMENT_FICHIER("MOYZ="
,fichier_MOYZ_des_valeurs
,liste_MOYZ_des_valeurs
,PONDERATION_MOYZ_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("MOYZSI="
,fichier_MOYZSI_des_valeurs
,liste_MOYZSI_des_valeurs
,PONDERATION_MOYZSI_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "MOYZSI=" a ete introduit le 20061025134345... */
PROKESF_ARGUMENT_FICHIER("MOYQ="
,fichier_MOYQ_des_valeurs
,liste_MOYQ_des_valeurs
,PONDERATION_MOYQ_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
PROKESF_ARGUMENT_FICHIER("MOYQSI="
,fichier_MOYQSI_des_valeurs
,liste_MOYQSI_des_valeurs
,PONDERATION_MOYQSI_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "MOYQSI=" a ete introduit le 20061025134345... */
PROKESF_ARGUMENT_FICHIER("MOYH="
,fichier_MOYH_des_valeurs
,liste_MOYH_des_valeurs
,PONDERATION_MOYH_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "MOYH=" a ete introduit le 20180823102430... */
PROKESF_ARGUMENT_FICHIER("SPUIX="
,fichier_SPUIX_des_valeurs
,liste_SPUIX_des_valeurs
,PONDERATION_SPUIX_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SPUIX=" a ete introduit le 20080104155116... */
PROKESF_ARGUMENT_FICHIER("SPUIXnc="
,fichier_SPUIXnc_des_valeurs
,liste_SPUIXnc_des_valeurs
,PONDERATION_SPUIXnc_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SPUIXnc=" a ete introduit le 20201004122007... */
PROKESF_ARGUMENT_FICHIER("SE12="
,fichier_SE12_des_valeurs
,liste_SE12_des_valeurs
,PONDERATION_SE12_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SE12=" a ete introduit le 20180823102430... */
PROKESF_ARGUMENT_FICHIER("SE12nc="
,fichier_SE12nc_des_valeurs
,liste_SE12nc_des_valeurs
,PONDERATION_SE12nc_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SE12nc=" a ete introduit le 20201004122007... */
PROKESF_ARGUMENT_FICHIER("SE22="
,fichier_SE22_des_valeurs
,liste_SE22_des_valeurs
,PONDERATION_SE22_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SE22=" a ete introduit le 20180823102430... */
PROKESF_ARGUMENT_FICHIER("SE22nc="
,fichier_SE22nc_des_valeurs
,liste_SE22nc_des_valeurs
,PONDERATION_SE22nc_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "SE22nc=" a ete introduit le 20201004122007... */
PROKESF_ARGUMENT_FICHIER("ATAN="
,fichier_ATAN_des_valeurs
,liste_ATAN_des_valeurs
,PONDERATION_ATAN_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "ATAN=" a ete introduit le 20181009172059... */
PROKESF_ARGUMENT_FICHIER("ATANnc="
,fichier_ATANnc_des_valeurs
,liste_ATANnc_des_valeurs
,PONDERATION_ATANnc_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "ATANnc=" a ete introduit le 20201004122007... */
PROKESF_ARGUMENT_FICHIER("MULH24="
,fichier_MULH24_des_valeurs
,liste_MULH24_des_valeurs
,PONDERATION_MULH24_IMPLICITE
,lTRANSFORMAT_0d
,iGENERATION_D_UN_FICHIER
);
/* Le parametre "MULH24=" a ete introduit le 20181203163522... */
PROCESS_ARGUMENTS_DE_PARAMETRAGE_DE_LA_GENERATION_DE_SUITE_DE_VALEURS_3;
/* Cette procedure fut introduite le 20070103173027... */
PROCESS_ARGUMENTS_DE_PARAMETRAGE_DE_LA_GENERATION_DE_SUITE_DE_VALEURS_1;
/* Cette procedure fut introduite le 20061226193518... */
PROCESS_ARGUMENTS_DE_PARAMETRAGE_DE_LA_GENERATION_DE_SUITE_DE_VALEURS_5;
/* Cette procedure fut introduite le 20211005105253... */
)
);
gOPERATION_SUR_LES_FICHIERS(BLOC(
DEFV(Float,INIT(valeur1_courante,ELEMENT_DU_FICHIER1(index)));
DEFV(Float,INIT(valeur2_courante,ELEMENT_DU_FICHIER2(index)));
EGAL(courante_____utiliser_evidemment_la_precision_Float,ELEMENT_DU_FICHIER_FLOT(index));
EGAL(courante_____ponderation_de_ADD2,ELEMENT_DU_FICHIER_ADD2(index));
EGAL(courante_____ponderation_de_SOUS,ELEMENT_DU_FICHIER_SOUS(index));
EGAL(courante_____ponderation_de_SOUSnc,ELEMENT_DU_FICHIER_SOUSnc(index));
EGAL(courante_____ponderation_de_MUL2,ELEMENT_DU_FICHIER_MUL2(index));
EGAL(courante_____ponderation_de_DIVZ,ELEMENT_DU_FICHIER_DIVZ(index));
EGAL(courante_____ponderation_de_DIVZnc,ELEMENT_DU_FICHIER_DIVZnc(index));
EGAL(courante_____ponderation_de_MIN2,ELEMENT_DU_FICHIER_MIN2(index));
EGAL(courante_____ponderation_de_MAX2,ELEMENT_DU_FICHIER_MAX2(index));
EGAL(courante_____ponderation_de_MINMAX,ELEMENT_DU_FICHIER_MINMAX(index));
EGAL(courante_____ponderation_de_MAXMIN,ELEMENT_DU_FICHIER_MAXMIN(index));
EGAL(courante_____ponderation_de_IMINMAX,ELEMENT_DU_FICHIER_IMINMAX(index));
EGAL(courante_____ponderation_de_IMAXMIN,ELEMENT_DU_FICHIER_IMAXMIN(index));
EGAL(courante_____ponderation_de_MOYE,ELEMENT_DU_FICHIER_MOYE(index));
EGAL(courante_____ponderation_de_MOYZ,ELEMENT_DU_FICHIER_MOYZ(index));
EGAL(courante_____ponderation_de_MOYZSI,ELEMENT_DU_FICHIER_MOYZSI(index));
EGAL(courante_____ponderation_de_MOYQ,ELEMENT_DU_FICHIER_MOYQ(index));
EGAL(courante_____ponderation_de_MOYQSI,ELEMENT_DU_FICHIER_MOYQSI(index));
EGAL(courante_____ponderation_de_MOYH,ELEMENT_DU_FICHIER_MOYH(index));
EGAL(courante_____ponderation_de_SPUIX,ELEMENT_DU_FICHIER_SPUIX(index));
EGAL(courante_____ponderation_de_SPUIXnc,ELEMENT_DU_FICHIER_SPUIXnc(index));
EGAL(courante_____ponderation_de_SE12,ELEMENT_DU_FICHIER_SE12(index));
EGAL(courante_____ponderation_de_SE12nc,ELEMENT_DU_FICHIER_SE12nc(index));
EGAL(courante_____ponderation_de_SE22,ELEMENT_DU_FICHIER_SE22(index));
EGAL(courante_____ponderation_de_SE22nc,ELEMENT_DU_FICHIER_SE22nc(index));
EGAL(courante_____ponderation_de_ATAN,ELEMENT_DU_FICHIER_ATAN(index));
EGAL(courante_____ponderation_de_ATANnc,ELEMENT_DU_FICHIER_ATANnc(index));
EGAL(courante_____ponderation_de_MULH24,ELEMENT_DU_FICHIER_MULH24(index));
/* Recuperation des valeurs courantes dans les fichiers. */
)
,Fsomme_universelle(valeur1_courante,valeur2_courante)
,EDITER_LA_VALEUR_RESULTANTE_DANS_gOPERATION_SUR_LES_FICHIERS
,nombre_d_exemplaires_du_resultat_de_l_operation_sur_les_valeurs_courantes
);
/* Somme "universelle" des deux fichiers arguments. */
lGENERATION_D_UN_FICHIER(liste_MULH24_des_valeurs,PONDERATION_MULH24_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_ATANnc_des_valeurs,PONDERATION_ATANnc_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_ATAN_des_valeurs,PONDERATION_ATAN_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SE22nc_des_valeurs,PONDERATION_SE22nc_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SE22_des_valeurs,PONDERATION_SE22_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SE12nc_des_valeurs,PONDERATION_SE12nc_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SE12_des_valeurs,PONDERATION_SE12_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SPUIXnc_des_valeurs,PONDERATION_SPUIXnc_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SPUIX_des_valeurs,PONDERATION_SPUIX_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MOYH_des_valeurs,PONDERATION_MOYH_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MOYQSI_des_valeurs,PONDERATION_MOYQSI_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MOYQ_des_valeurs,PONDERATION_MOYQ_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MOYZSI_des_valeurs,PONDERATION_MOYZSI_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MOYZ_des_valeurs,PONDERATION_MOYZ_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_IMAXMIN_des_valeurs,PONDERATION_IMAXMIN_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_IMINMAX_des_valeurs,PONDERATION_IMINMAX_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MOYE_des_valeurs,PONDERATION_MOYE_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MAXMIN_des_valeurs,PONDERATION_MAXMIN_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MINMAX_des_valeurs,PONDERATION_MINMAX_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MAX2_des_valeurs,PONDERATION_MAX2_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MIN2_des_valeurs,PONDERATION_MIN2_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_DIVZnc_des_valeurs,PONDERATION_DIVZnc_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_DIVZ_des_valeurs,PONDERATION_DIVZ_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_MUL2_des_valeurs,PONDERATION_MUL2_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SOUSnc_des_valeurs,PONDERATION_SOUSnc_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_SOUS_des_valeurs,PONDERATION_SOUS_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_ADD2_des_valeurs,PONDERATION_ADD2_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste_FLOT_des_valeurs,PONDERATION_ADD2_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste2_des_valeurs,VALEUR_2_IMPLICITE);
lGENERATION_D_UN_FICHIER(liste1_des_valeurs,VALEUR_1_IMPLICITE);
RETU_Commande;
Eblock
ECommande
Copyright © Jean-François COLONNA, 2019-2024.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / École polytechnique, Institut Polytechnique de Paris, 2019-2024.