/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        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   C A L A B I - Y A U   6 - D I M E N S I O N N E L L E  :                                 */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrs/CalabiYau.24$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois COLONNA (LACTAMME, 20010530172418).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        C O O R D O N N E E S   C U R V I L I G N E S  :                                                                           */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

#define   MINIMUM_DE_U1                                                                                                                 \
                    FZERO
#define   MAXIMUM_DE_U1                                                                                                                 \
                    PI_SUR_2
#define   PAS_DE_U1                                                                                                                     \
                    FRA4(FRA10(SOUS(MAXIMUM_DE_U1,MINIMUM_DE_U1)))
DEFV(Local,DEFV(Float,INIT(minimum_de_u1,MINIMUM_DE_U1)));
DEFV(Local,DEFV(Float,INIT(maximum_de_u1,MAXIMUM_DE_U1)));
DEFV(Local,DEFV(Float,INIT(pas_de_u1,PAS_DE_U1)));
DEFV(Local,DEFV(Float,INIT(u1,FLOT__UNDEF)));
                                        /* Definition de la coordonnee parametrique 'u1' de la surface.                              */
#define   MINIMUM_DE_V1                                                                                                                 \
                    NEGA(FU)
#define   MAXIMUM_DE_V1                                                                                                                 \
                    NEUT(FU)
#define   PAS_DE_V1                                                                                                                     \
                    FRA4(FRA10(SOUS(MAXIMUM_DE_V1,MINIMUM_DE_V1)))
DEFV(Local,DEFV(Float,INIT(minimum_de_v1,MINIMUM_DE_V1)));
DEFV(Local,DEFV(Float,INIT(maximum_de_v1,MAXIMUM_DE_V1)));
DEFV(Local,DEFV(Float,INIT(pas_de_v1,PAS_DE_V1)));
DEFV(Local,DEFV(Float,INIT(v1,FLOT__UNDEF)));
                                        /* Definition de la coordonnee parametrique 'v1' de la surface.                              */

#define   MINIMUM_DE_U2                                                                                                                 \
                    FZERO
#define   MAXIMUM_DE_U2                                                                                                                 \
                    PI_SUR_2
#define   PAS_DE_U2                                                                                                                     \
                    FRA4(FRA10(SOUS(MAXIMUM_DE_U2,MINIMUM_DE_U2)))
DEFV(Local,DEFV(Float,INIT(minimum_de_u2,MINIMUM_DE_U2)));
DEFV(Local,DEFV(Float,INIT(maximum_de_u2,MAXIMUM_DE_U2)));
DEFV(Local,DEFV(Float,INIT(pas_de_u2,PAS_DE_U2)));
DEFV(Local,DEFV(Float,INIT(u2,FLOT__UNDEF)));
                                        /* Definition de la coordonnee parametrique 'u2' de la surface.                              */
#define   MINIMUM_DE_V2                                                                                                                 \
                    NEGA(FU)
#define   MAXIMUM_DE_V2                                                                                                                 \
                    NEUT(FU)
#define   PAS_DE_V2                                                                                                                     \
                    FRA4(FRA10(SOUS(MAXIMUM_DE_V2,MINIMUM_DE_V2)))
DEFV(Local,DEFV(Float,INIT(minimum_de_v2,MINIMUM_DE_V2)));
DEFV(Local,DEFV(Float,INIT(maximum_de_v2,MAXIMUM_DE_V2)));
DEFV(Local,DEFV(Float,INIT(pas_de_v2,PAS_DE_V2)));
DEFV(Local,DEFV(Float,INIT(v2,FLOT__UNDEF)));
                                        /* Definition de la coordonnee parametrique 'v2' de la surface.                              */