/*************************************************************************************************************************************/ /* */ /* E X P L O I T A T I O N D E Q U E L Q U E S O P E R A T E U R S " I M A G E S " : */ /* */ /* */ /* Author of '$xcp/Loperators_I$K' : */ /* */ /* Jean-Francois COLONNA (LACTAMME, 20001222085142). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* 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 #include gener_EDITION_EXT /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* P A R A M E T R E S : */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* M A C R O S U T I L E S : */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* E X P L O I T A T I O N D E Q U E L Q U E S O P E R A T E U R S " I M A G E S " : */ /* */ /*************************************************************************************************************************************/ BCommande(nombre_d_arguments,arguments) /*-----------------------------------------------------------------------------------------------------------------------------------*/ Bblock DEFV(CHAR,INIC(POINTERc(operateur_image_recherche),NOM_UNDEF_VIDE)); /* Nom d'un eventuel operateur "image" a editer seul... */ /*..............................................................................................................................*/ EGAL(valider_les_axes_OX_OY_OZ,NE_PAS_VALIDER_LES_AXES_OX_OY_OZ); /* Afin de simplifier l'usage de cette commande... */ GET_ARGUMENTSi(nombre_d_arguments ,BLOC(GET_ARGUMENT_C("operateur=""o=",operateur_image_recherche); GET_ARGUMENT_L("arguments=""args=" ,Fexploitation_des_principaux_operateurs_images_____editer_args_operateur_unique ); /* Introduit le 20031209121027... */ GET_ARGUMENT_L("signe=""s=" ,Fexploitation_des_principaux_operateurs_images_____signer_les_valeurs_numeriques ); /* Peut s'utiliser conjointement avec : */ /* */ /* SigneInt= */ /* SigneFlot= */ /* */ /* ('v $xig/fonct$vv$DEF signe_de_FORMAT_') qui n'a pas tout a fait le meme effet que */ /* 'signe=' car, en effet, cette derniere reduit la precision du resultat car elle */ /* bascule entre {FORMAT_FLOT_EDITION,FORMAT_INTE_EDITION} et {FORMAT_FLOT,FORMAT_INTE} */ /* respectivement... */ ) ); CALS(Fexploitation_des_principaux_operateurs_images(operateur_image_recherche)); RETU_Commande; Eblock ECommande