/*************************************************************************************************************************************/
/* */
/* 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 V A R I E T E D E H O R N E R " L I N E A I R E " D U T R O I S I E M E D E G R E : */
/* */
/* */
/* Author of '$xrs/Horner33.12$I' : */
/* */
/* Jean-Francois Colonna (LACTAMME, 20201121121819). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* 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)));
DEFV(Local,DEFV(Float,INIT(pX_a333,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a332,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a331,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a330,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a323,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a322,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a321,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a320,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a313,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a312,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a311,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a310,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a303,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a302,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a301,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a300,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a233,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a232,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a231,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a230,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a223,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a213,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a203,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a200,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a133,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a132,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a131,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a130,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a123,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a113,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a103,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a100,FU)));
DEFV(Local,DEFV(Float,INIT(pX_a033,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a032,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a031,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a030,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a023,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a013,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a003,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pX_a000,FZERO)));
/* Definition de la valeur des parametres de 'Fx(u,v,w)'. */
/* */
/* Les valeurs par defaut sont telles que : */
/* */
/* Fx(u,v,w) = u */
/* */
DEFV(Local,DEFV(Float,INIT(parametre_RY,FU)));
DEFV(Local,DEFV(Float,INIT(pY_a333,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a332,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a331,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a330,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a323,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a322,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a321,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a320,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a313,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a312,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a311,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a310,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a303,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a302,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a301,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a300,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a233,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a232,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a231,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a230,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a223,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a213,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a203,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a200,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a133,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a132,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a131,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a130,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a123,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a113,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a103,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a100,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a033,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a032,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a031,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a030,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a023,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a013,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a010,FU)));
DEFV(Local,DEFV(Float,INIT(pY_a003,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a001,FZERO)));
DEFV(Local,DEFV(Float,INIT(pY_a000,FZERO)));
/* Definition de la valeur des parametres de 'Fy(u,v,w)'. */
/* */
/* Les valeurs par defaut sont telles que : */
/* */
/* Fx(u,v,w) = v */
/* */
DEFV(Local,DEFV(Float,INIT(parametre_RZ,FU)));
DEFV(Local,DEFV(Float,INIT(pZ_a333,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a332,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a331,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a330,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a323,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a322,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a321,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a320,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a313,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a312,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a311,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a310,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a303,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a302,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a301,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a300,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a233,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a232,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a231,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a230,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a223,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a222,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a221,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a220,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a213,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a212,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a211,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a210,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a203,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a202,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a201,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a200,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a133,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a132,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a131,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a130,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a123,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a122,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a121,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a120,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a113,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a112,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a111,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a110,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a103,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a102,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a101,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a100,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a033,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a032,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a031,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a030,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a023,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a022,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a021,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a020,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a013,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a012,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a011,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a010,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a003,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a002,FZERO)));
DEFV(Local,DEFV(Float,INIT(pZ_a001,FU)));
DEFV(Local,DEFV(Float,INIT(pZ_a000,FZERO)));
/* Definition de la valeur des parametres de 'Fz(u,v,w)'. */
/* */
/* Les valeurs par defaut sont telles que : */
/* */
/* Fx(u,v,w) = w */
/* */
Copyright © Jean-François Colonna, 2020-2021.
Copyright © CMAP (Centre de Mathématiques APpliquées) UMR CNRS 7641 / Ecole Polytechnique, 2020-2021.