/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N S   R E L A T I V E S   A   L A   D E R I V A T I O N   F O R M E L L E                                */
/*        D ' U N E   I N T E R P O L A T I O N   E N T R E   U N   E L L I P O I D E   E T   L A   S U R F A C E   D E   B O Y  :   */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrs/elli_sBoy.11$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 19990121144036).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        D E F I N I T I O N   D E S   T R O I S   F O N C T I O N S   ' F '  :                                                     */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Definition ('v $xrs/elli_sBoy.11$K') :                                                                                     */
/*                                                                                                                                   */
/*                    L'interpolation entre l'ellipsoide et la                                                                       */
/*                  surface de Boy est definie parametriquement                                                                      */
/*                  en fonction des deux parametres 'u'                                                                              */
/*                  et 'v' :                                                                                                         */
/*                                                                                                                                   */
/*                                      F (u,v) = alpha.Ellipsoide (u,v) + beta.SurfaceDeBoy (u,v)                                   */
/*                                       x                        x                         x                                        */
/*                                                                                                                                   */
/*                                      F (u,v) = alpha.Ellipsoide (u,v) + beta.SurfaceDeBoy (u,v)                                   */
/*                                       y                        y                         y                                        */
/*                                                                                                                                   */
/*                                      F (u,v) = alpha.Ellipsoide (u,v) + beta.SurfaceDeBoy (u,v)                                   */
/*                                       z                        z                         z                                        */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
                                        /* ATTENTION, il est imperatif que les fonctions derivables formellement soient definies     */
                                        /* dans un fichier a part afin qu'elles ne soient pas l'objet d'une double definition. En    */
                                        /* effet, on trouve dans 'v $xcc/cpp$Z' :                                                    */
                                        /*                                                                                           */
                                        /*                  $CA  $module$w                                                           */
                                        /*                                 | $xcp/cpp$X          ... -c$PASSE_D -e$PASSE_5           */
                                        /*                                                                              > $fichierR  */
                                        /*                                                                                           */
                                        /* Ainsi, si par exemple la definition de 'Fx(u,v)' etait faite localement dans le           */
                                        /* fichier '$xrf/recursif.11$K', cette definition apparaitrait deux fois dans le fichier     */
                                        /* '$module$w' : une premiere fois en tete, provenant de '$PASSE_D' ou l'on ne trouve que    */
                                        /* les definitions du type '-define ...', puis une deuxieme fois a la suite, la ou se trouve */
                                        /* concatene au fichier '$module$W' des '-define ...' le fichier '$fichierA' a compiler...   */

-define   Fx_Ellipsoide_SurfaceDeBoy_1(u,v)                                                                                             \
-_-_-_-             LIZ2(ponderation_du_Ellipsoide                                                                                      \
-_-_-_-                 ,Fx_Ellipsoide_1(u,v)                                                                                           \
-_-_-_-                 ,ponderation_de_la_surface_de_Boy                                                                               \
-_-_-_-                 ,Fx_SurfaceDeBoy_1(u,v)                                                                                         \
-_-_-_-                  )
                                        /* Definition de la fonction F (u,v).                                                        */
                                        /*                            x                                                              */
-define   Fy_Ellipsoide_SurfaceDeBoy_1(u,v)                                                                                             \
-_-_-_-             LIZ2(ponderation_du_Ellipsoide                                                                                      \
-_-_-_-                 ,Fy_Ellipsoide_1(u,v)                                                                                           \
-_-_-_-                 ,ponderation_de_la_surface_de_Boy                                                                               \
-_-_-_-                 ,Fy_SurfaceDeBoy_1(u,v)                                                                                         \
-_-_-_-                  )
                                        /* Definition de la fonction F (u,v).                                                        */
                                        /*                            y                                                              */
-define   Fz_Ellipsoide_SurfaceDeBoy_1(u,v)                                                                                             \
-_-_-_-             LIZ2(ponderation_du_Ellipsoide                                                                                      \
-_-_-_-                 ,Fz_Ellipsoide_1(u,v)                                                                                           \
-_-_-_-                 ,ponderation_de_la_surface_de_Boy                                                                               \
-_-_-_-                 ,Fz_SurfaceDeBoy_1(u,v)                                                                                         \
-_-_-_-                  )
                                        /* Definition de la fonction F (u,v).                                                        */
                                        /*                            z                                                              */

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        I N I T I A L I S A T I O N S   R E L A T I V E S   A   L A   P S E U D O - P R O J E C T I O N  :                         */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
-define   Pxyz_Ellipsoide_SurfaceDeBoy_1                                                                                                \
-_-_-_-             Bblock                                                                                                              \
-_-_-_-             Pxyz_Ellipsoide_1;                                                                                                  \
-_-_-_-             Pxyz_SurfaceDeBoy_1;                                                                                                \
-_-_-_-             Eblock
                                        /* Initialisations specifiques a cette surface destinees a permettre la reinjection des      */
                                        /* trois pseudo-projections {Projection_de_Fx,Projection_de_Fy,Projection_de_Fz} dans        */
                                        /* 'v $xrs/project2D.11$K' (introduit le 20050203092944)...                                  */



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