/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        P R O B L E M E   L O R S   D ' E R R E U R   D E   T Y P A G E                                                            */
/*        D E S   A R G U M E N T S   D ' U N E   F O N C T I O N  :                                                                 */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xtc/CastArgumentsFonction.01$c' :                                                                              */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20091218184850).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#include  <stdio.h>

unsigned  char      FAload_point(albumA
                                ,X,Y,Z
                                ,periodiser_X,periodiser_Y,periodiser_Z
                                ,symetriser_X,symetriser_Y,symetriser_Z
                                ,prolonger_X,prolonger_Y,prolonger_Z
                                ,niveau_hors_album
                                 )
                                        /* Il s'agit evidemment de 'v $xiipf/fonction.2$FON FonctionP.FAload_point'...               */
unsigned  char*     albumA;
int                 X;
int                 Y;
int                 Z;
unsigned  int       periodiser_X;
unsigned  int       periodiser_Y;
unsigned  int       periodiser_Z;
unsigned  int       symetriser_X;
unsigned  int       symetriser_Y;
unsigned  int       symetriser_Z;
unsigned  int       prolonger_X;
unsigned  int       prolonger_Y;
unsigned  int       prolonger_Z;
unsigned  char      niveau_hors_album;
          {
          printf("NiveauHorsAlbum=%d\n",niveau_hors_album);
                                        /* La valeur editee ici depend de la MACHINE sur laquelle est execute le '$aPout' de ce      */
                                        /* '$c' (et non pas de celle sur laquelle a ete faite le '$Cc'...) :                         */
                                        /*                                                                                           */
                                        /*                  LACT18                                            =0                     */
                                        /*                                                                                           */
                                        /*                  CMAP28 (='belleville.polytechnique.fr')           =180                   */
                                        /*                  CMAP28 (='courcelle.polytechnique.fr')            =180                   */
                                        /*                  CMAP28 (='europe.polytechnique.fr')               =148                   */
                                        /*                  CMAP28 (='grenelle.polytechnique.fr')             =148                   */
                                        /*                  CMAP28 (='maubert.polytechnique.fr')              =148                   */
                                        /*                  CMAP28 (='segur.polytechnique.fr')                =42                    */
                                        /*                  CMAP28 (='villiers.polytechnique.fr')             =180                   */
                                        /*                                                                                           */
                                        /* ce qui est etrange. Il conviendrait peut-etre alors de comparer physiquement ces          */
                                        /* MACHINEs (type de processeur, constructeur,...). En fait, les commandes :                 */
                                        /*                                                                                           */
                                        /*                  config             (donne le "model name" du processeur)                 */
                                        /*                  $UNAM     -a       (donne des informations sur le SYSTEME)               */
                                        /*                                                                                           */
                                        /* n'ont montre aucune correlation avec les resultats ci-dessus...                           */

          return(X+Y+Z
                +periodiser_X+periodiser_Y+periodiser_Z
                +symetriser_X+symetriser_Y+symetriser_Z
                +prolonger_X+prolonger_Y+prolonger_Z
                 );
                                        /* Cette expression compliquee est juste destinee a utiliser les differents arguments de la  */
                                        /* fonction 'FAload_point(...)', on ne sait jamais...                                        */
          }

main()
          {
          unsigned  char*     albumA;
          int                 X=0;
          int                 Y=0;
          int                 Z=0;
          unsigned  int       periodiser_X=0;
          unsigned  int       periodiser_Y=0;
          unsigned  int       periodiser_Z=0;
          unsigned  int       symetriser_X=0;
          unsigned  int       symetriser_Y=0;
          unsigned  int       symetriser_Z=0;
          unsigned  int       prolonger_X=0;
          unsigned  int       prolonger_Y=0;
          unsigned  int       prolonger_Z=0;
          double              niveau_hors_album=0;
          unsigned  char      retour;

          retour=FAload_point(albumA
                             ,X,Y,Z
                             ,periodiser_X,periodiser_Y,periodiser_Z
                             ,symetriser_X,symetriser_Y,symetriser_Z
                             ,prolonger_X,prolonger_Y,prolonger_Z
                             ,niveau_hors_album
                              );
                                        /* Volontairement le type ('double') de 'niveau_hors_album' est errone (il devrait etre      */
                                        /* 'unsigned char') tel que cela avait ete fait, cette fois-ci accidentellement dans         */
                                        /* 'v $xiii/di_album$FON 20091218110248'...                                                  */

          printf("retour=%d\n",retour);
          }