/*************************************************************************************************************************************/ /* */ /* I N I T I A L I S A T I O N D ' U N E I M A G E P A R U N C H A M P D E B A S E ' ASIX ' : */ /* */ /* */ /* Author of '$xci/ASIX.01$K' : */ /* */ /* Jean-Francois COLONNA (LACTAMME, 20041130122427). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* 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 : */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* F I C H I E R S D ' I N C L U D E S : */ /* */ /*************************************************************************************************************************************/ #include INCLUDES_BASE #include image_image_IMAGESF_EXT /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P A R A M E T R E S : */ /* */ /*************************************************************************************************************************************/ #include xci/genere_ch.01.I" /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* M A C R O S U T I L E S : */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* I N I T I A L I S A T I O N D ' U N E I M A G E P A R U N C H A M P D E B A S E ' ASIX ' : */ /* */ /*************************************************************************************************************************************/ BCommande(nombre_d_arguments,arguments) /*-----------------------------------------------------------------------------------------------------------------------------------*/ Bblock DEFV(CHAR,INIC(POINTERc(nom_imageR),NOM_PIPE)); #include xci/genere_ch.02.I" /*..............................................................................................................................*/ #include xci/genere_ch.03.I" #include xci/genere_ch.11.I" GET_ARGUMENTSi(nombre_d_arguments ,BLOC(GET_ARGUMENT_C("imageR=""R=",nom_imageR); GET_ARGUMENT_L("standard=",les_images_sont_standards); GET_ARGUMENT_F("pX=",GENERE__FonctionF_Champ_de_base_____ponderation_X_Champ_de_base); GET_ARGUMENT_F("pY=",GENERE__FonctionF_Champ_de_base_____ponderation_Y_Champ_de_base); GET_ARGUMENT_F("pZ=",GENERE__FonctionF_Champ_de_base_____ponderation_Z_Champ_de_base); GET_ARGUMENT_F("tXYZ=",GENERE__FonctionF_Champ_de_base_____translation___Champ_de_base); PROCESS_ARGUMENTS_DE_PARAMETRAGE_3D_DE_____ACCES_A_UN_CHAMP_3D; /* Introduit le 20060516112611... */ ) ); #include xci/genere_ch.04.I" GENERATION_DU_CHAMP_DEMANDE(Fchamp_ASIX,nom_imageR,Zf,Tf_ARGUMENT_INUTILE,UPD_CHAMP_S); /* On n'oubliera pas que si l'on souhaite qu'un nombre precis de periodes occupe 'dimX' */ /* et/ou 'dimY' (dans le cas d'un chmap periodique), il conviendra d'utiliser les options : */ /* */ /* carre_X_CHAMP_3D=FAUX (pour 'dimX'), */ /* carre_Y_CHAMP_3D=FAUX (pour 'dimY'), */ /* */ /* ('v $xiii/mono_image$DEF ACCES_A_LA_COORDONNEE_._D_UN_CHAMP_3D_____coordonnees_dans_un'). */ /* */ /* L'argument 'Tf_ARGUMENT_INUTILE' a ete introduit le 20100209110410. */ RETU_Commande; Eblock ECommande