/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N S   R E L A T I V E S   A U X   P A R A M E T R E S                                                    */
/*        D ' U N E   S U R F A C E   D E   H O R N E R   " C I R C U L A I R E "   D U   D E U X I E M E   D E G R E  :             */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrs/Horner42.12$I' :                                                                                           */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 20201012123044).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D E S   P A R A M E T R E S  :                                                                       */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
DEFV(Local,DEFV(Float,INIT(parametre_RX,FU)));
                                        /* Parametre introduit le 20201020105745...                                                  */

DEFV(Local,DEFV(Float,INIT(pX_a2222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a2122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a2022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a2000,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a1222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a1122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a1022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a1000,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a0222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a0122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0110,FU)));
DEFV(Local,DEFV(Float,INIT(pX_a0102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pX_a0022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a0000,FZERO)));
                                        /* Definition de la valeur des parametres de 'Fx(u,v)'.                                      */
                                        /*                                                                                           */
                                        /* Les valeurs par defaut sont telles que :                                                  */
                                        /*                                                                                           */
                                        /*                  Fx(u,v) = 1 *       sin(u) *  cos(v) *  1                                */
                                        /*                                                                                           */
                                        /* soit les indices :                                                                        */
                                        /*                                                                                           */
                                        /*                            0         1         1         0                                */
                                        /*                                                                                           */

DEFV(Local,DEFV(Float,INIT(parametre_RY,FU)));
                                        /* Parametre introduit le 20201020105745...                                                  */

DEFV(Local,DEFV(Float,INIT(pY_a2222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a2122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a2022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a2000,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a1222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a1122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a1022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a1000,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a0222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a0122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0101,FU)));
DEFV(Local,DEFV(Float,INIT(pY_a0100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pY_a0022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a0000,FZERO)));
                                        /* Definition de la valeur des parametres de 'Fy(u,v)'.                                      */
                                        /*                                                                                           */
                                        /* Les valeurs par defaut sont telles que :                                                  */
                                        /*                                                                                           */
                                        /*                  Fx(u,v) = 1 *       sin(u) *  1      *  sin(v)                           */
                                        /*                                                                                           */
                                        /* soit les indices :                                                                        */
                                        /*                                                                                           */
                                        /*                            0         1         0         1                                */
                                        /*                                                                                           */

DEFV(Local,DEFV(Float,INIT(parametre_RZ,FU)));
                                        /* Parametre introduit le 20201020105745...                                                  */

DEFV(Local,DEFV(Float,INIT(pZ_a2222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a2122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a2022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a2000,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a1222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a1122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a1022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a1000,FU)));

DEFV(Local,DEFV(Float,INIT(pZ_a0222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0200,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a0122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0100,FZERO)));

DEFV(Local,DEFV(Float,INIT(pZ_a0022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a0000,FZERO)));
                                        /* Definition de la valeur des parametres de 'Fz(u,v)'.                                      */
                                        /*                                                                                           */
                                        /* Les valeurs par defaut sont telles que :                                                  */
                                        /*                                                                                           */
                                        /*                  Fx(u,v) = cos(u) *  1      *  1      *  1                                */
                                        /*                                                                                           */
                                        /* soit les indices :                                                                        */
                                        /*                                                                                           */
                                        /*                            1         0         0         0                                */
                                        /*                                                                                           */

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D E S   D E R I V E E S   D E S   P A R A M E T R E S  :                                             */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
DEFV(Local,DEFV(Float,INIT(d_pX_a2222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a2122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a2022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a2000,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a1222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a1122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a1022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a1000,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a0222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a0122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pX_a0022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pX_a0000,d_FCONSTANTES)));
                                        /* Definition de la valeur des derivees des parametres de 'Fx(u,v)'.                         */

DEFV(Local,DEFV(Float,INIT(d_pY_a2222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a2122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a2022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a2000,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a1222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a1122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a1022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a1000,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a0222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a0122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pY_a0022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pY_a0000,d_FCONSTANTES)));
                                        /* Definition de la valeur des derivees des parametres de 'Fy(u,v)'.                         */

DEFV(Local,DEFV(Float,INIT(d_pZ_a2222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a2122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a2022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a2000,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a1222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a1122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a1022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a1000,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a0222,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0221,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0220,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0212,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0211,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0210,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0202,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0201,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0200,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a0122,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0121,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0120,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0112,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0111,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0110,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0102,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0101,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0100,d_FCONSTANTES)));

DEFV(Local,DEFV(Float,INIT(d_pZ_a0022,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0021,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0020,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0012,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0011,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0010,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0002,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0001,d_FCONSTANTES)));
DEFV(Local,DEFV(Float,INIT(d_pZ_a0000,d_FCONSTANTES)));
                                        /* Definition de la valeur des derivees des parametres de 'Fz(u,v)'.                         */



Copyright © Jean-François Colonna, 2020-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2020-2021.