/*************************************************************************************************************************************/
/* */
/* R E F E R E N C E S A U X D O N N E S C O M M U N E S : */
/* */
/* */
/* Dans ce fichier, se trouvent */
/* toutes les references aux donnees */
/* communes de 'v image_drive_alpha_FONCTION_FON' */
/* et utiles aux autres modules. */
/* */
/* */
/* Author of '$xiida/fonction$EXT' sur 'LACT19' : */
/* */
/* Jean-Francois COLONNA (LACTAMME, 20240626122147). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* R E F E R E N C E S A U X D O N N E S C O M M U N E S : */
/* */
/*************************************************************************************************************************************/
#ifndef DejaInclus__image_drive_alpha_FONCTION_EXT
# ifdef DECLARATIONS_DES_FONCTIONS_ET_DE_LEURS_ARGUMENTS_VERSION_01
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0001 */
# ifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01
DEFV(Ailleurs,DEFV(Logical,_____LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01));
# Aifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01
# Eifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01
# ifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02
DEFV(Ailleurs,DEFV(Logical,_____LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02));
# Aifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02
# Eifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02
# ifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03
DEFV(Ailleurs,DEFV(Logical,_____LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03));
# Aifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03
# Eifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03
DEFV(Ailleurs,DEFV(Logical,Idumpc_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpc_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Positive,Idumpc_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,Idumpc_image()));
DEFV(Ailleurs,DEFV(Logical,Idumpd_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpd_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Positive,Idumpd_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,Idumpd_image()));
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0001 */
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0002 */
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y_somme_difference));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y_somme_difference));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____former_une_combinaison_lineaire_des_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____former_une_combinaison_lineaire_des_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____mettre_des_zeros_devant_les_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____mettre_des_zeros_devant_les_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____les_valeurs_sont_signees));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____les_valeurs_sont_signees));
DEFV(Ailleurs,DEFV(CHAR,DTb0(Idumpx_image_____separateur__niveau_index)));
DEFV(Ailleurs,DEFV(CHAR,DTb0(ValeurParDefautDe_____Idumpx_image_____separateur__niveau_index)));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Positive,Idumpx_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,Idumpx_image()));
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0002 */
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0003 */
DEFV(Ailleurs,DEFV(Positive,IPostScript_image_____version_du_PostScript));
DEFV(Ailleurs,DEFV(Positive,ValeurParDefautDe_____IPostScript_image_____version_du_PostScript));
DEFV(Ailleurs,DEFV(Logical,IPostScript_image_____inserer_la_BoundingBox_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____IPostScript_image_____inserer_la_BoundingBox_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,IPostScript_image_____inserer_le_PageSize_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____IPostScript_image_____inserer_le_PageSize_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,IPostScript_image_____conserver_les_echelles_horizontale_et_verticale));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____IPostScript_image_____conserver_les_echelles_horizontale_et_verticale));
DEFV(Ailleurs,DEFV(Positive,IPostScript_image_Noir_et_Blanc_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,IPostScript_image_Noir_et_Blanc()));
DEFV(Ailleurs,DEFV(Positive,IPostScript_image_en_vraies_couleurs_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,IPostScript_image_en_vraies_couleurs()));
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0003 */
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0004 */
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_1));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_1));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_2));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_2));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_3));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_3));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_4));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_4));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_5));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_5));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_6));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_6));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_7));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_7));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_8));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_8));
DEFV(Ailleurs,DEFV(Positive,Iliste_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,Iliste_image()));
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0004 */
# Aifdef DECLARATIONS_DES_FONCTIONS_ET_DE_LEURS_ARGUMENTS_VERSION_01
# Eifdef DECLARATIONS_DES_FONCTIONS_ET_DE_LEURS_ARGUMENTS_VERSION_01
# ifdef DECLARATIONS_DES_FONCTIONS_ET_DE_LEURS_ARGUMENTS_VERSION_02
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0001 */
# ifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01
DEFV(Ailleurs,DEFV(Logical,_____LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01));
# Aifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01
# Eifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_01
# ifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02
DEFV(Ailleurs,DEFV(Logical,_____LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02));
# Aifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02
# Eifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_02
# ifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03
DEFV(Ailleurs,DEFV(Logical,_____LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03));
# Aifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03
# Eifdef LISTE_IMAGE_ALPHA_NUMERIQUE_VERSION_03
DEFV(Ailleurs,DEFV(Logical,Idumpc_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpc_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Positive,Idumpc_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,PARE(Idumpc_image(DEFV(Argument,DEFV(image,Argument_____imageA))
)
)
)
);
DEFV(Ailleurs,DEFV(Logical,Idumpd_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpd_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Positive,Idumpd_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,PARE(Idumpd_image(DEFV(Argument,DEFV(image,Argument_____imageA))
)
)
)
);
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0001 */
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0002 */
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y_somme_difference));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____editer_sous_la_forme_niveau_coordonnees_X_et_Y_somme_difference));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____former_une_combinaison_lineaire_des_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____former_une_combinaison_lineaire_des_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____mettre_des_zeros_devant_les_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____mettre_des_zeros_devant_les_coordonnees_X_et_Y));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____les_valeurs_sont_signees));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____les_valeurs_sont_signees));
DEFV(Ailleurs,DEFV(CHAR,DTb0(Idumpx_image_____separateur__niveau_index)));
DEFV(Ailleurs,DEFV(CHAR,DTb0(ValeurParDefautDe_____Idumpx_image_____separateur__niveau_index)));
DEFV(Ailleurs,DEFV(Logical,Idumpx_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____Idumpx_image_____editer_le_message_d_introduction));
DEFV(Ailleurs,DEFV(Positive,Idumpx_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,PARE(Idumpx_image(DEFV(Argument,DEFV(image,Argument_____imageA))
)
)
)
);
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0002 */
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0003 */
DEFV(Ailleurs,DEFV(Positive,IPostScript_image_____version_du_PostScript));
DEFV(Ailleurs,DEFV(Positive,ValeurParDefautDe_____IPostScript_image_____version_du_PostScript));
DEFV(Ailleurs,DEFV(Logical,IPostScript_image_____inserer_la_BoundingBox_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____IPostScript_image_____inserer_la_BoundingBox_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,IPostScript_image_____inserer_le_PageSize_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____IPostScript_image_____inserer_le_PageSize_dans_le_fichier));
DEFV(Ailleurs,DEFV(Logical,IPostScript_image_____conserver_les_echelles_horizontale_et_verticale));
DEFV(Ailleurs,DEFV(Logical,ValeurParDefautDe_____IPostScript_image_____conserver_les_echelles_horizontale_et_verticale));
DEFV(Ailleurs,DEFV(Positive,IPostScript_image_Noir_et_Blanc_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,PARE(IPostScript_image_Noir_et_Blanc(DEFV(Argument,DEFV(image,Argument_____imageA))
,DEFV(Argument,DEFV(Int,Argument_____translation_horizontale))
,DEFV(Argument,DEFV(Int,Argument_____translation_verticale))
,DEFV(Argument,DEFV(Int,Argument_____echelle_horizontale))
,DEFV(Argument,DEFV(Int,Argument_____echelle_verticale))
,DEFV(Argument,DEFV(Logical,Argument_____optimiser_la_conversion_PostScript))
,DEFV(Argument,DEFV(Positive,Argument_____nombre_d_exemplaires))
)
)
)
);
DEFV(Ailleurs,DEFV(Positive,IPostScript_image_en_vraies_couleurs_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,PARE(IPostScript_image_en_vraies_couleurs(DEFV(Argument,DEFV(image,Argument_____imageA_ROUGE))
,DEFV(Argument,DEFV(image,Argument_____imageA_VERTE))
,DEFV(Argument,DEFV(image,Argument_____imageA_BLEUE))
,DEFV(Argument,DEFV(Int,Argument_____translation_horizontale))
,DEFV(Argument,DEFV(Int,Argument_____translation_verticale))
,DEFV(Argument,DEFV(Int,Argument_____echelle_horizontale))
,DEFV(Argument,DEFV(Int,Argument_____echelle_verticale))
,DEFV(Argument,DEFV(Logical,Argument_____optimiser_la_conversion_PostScript))
,DEFV(Argument,DEFV(Positive,Argument_____nombre_d_exemplaires))
)
)
)
);
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0003 */
/* -------------------------------------------------------------------------------------------------------------------- Bblock=0004 */
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_1));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_1));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_2));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_2));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_3));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_3));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_4));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_4));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_5));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_5));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_6));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_6));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_7));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_7));
DEFV(Ailleurs,DEFV(CHAR,Iliste_image_____caractere_GRIS_8));
DEFV(Ailleurs,DEFV(CHAR,ValeurParDefautDe_____Iliste_image_____caractere_GRIS_8));
DEFV(Ailleurs,DEFV(Positive,Iliste_image_____Fcompteur_DAppel));
DEFV(Ailleurs,DEFV(FonctionI,PARE(Iliste_image(DEFV(Argument,DEFV(image,Argument_____imageA))
,DEFV(Argument,DEFV(genere_p,Argument_____seuil_de_display))
,DEFV(Argument,DEFV(Logical,Argument_____editer_des_commentaires))
)
)
)
);
/* -------------------------------------------------------------------------------------------------------------------- Eblock=0004 */
# Aifdef DECLARATIONS_DES_FONCTIONS_ET_DE_LEURS_ARGUMENTS_VERSION_02
# Eifdef DECLARATIONS_DES_FONCTIONS_ET_DE_LEURS_ARGUMENTS_VERSION_02
# ifdef NePasInclure_____ARG
# Aifdef NePasInclure_____ARG
# include image_drive_alpha_FONCTION_ARG
# Eifdef NePasInclure_____ARG
# define DejaInclus__image_drive_alpha_FONCTION_EXT
#Aifndef DejaInclus__image_drive_alpha_FONCTION_EXT
#Eifndef DejaInclus__image_drive_alpha_FONCTION_EXT
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.