/*************************************************************************************************************************************/ /* */ /* 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 1 6 - D I M E N S I O N N E L L E : */ /* */ /* */ /* Author of '$xrs/CalabiYau.84$I' : */ /* */ /* Jean-Francois COLONNA (LACTAMME, 20230225185852). */ /* */ /*************************************************************************************************************************************/ /*===================================================================================================================================*/ /*************************************************************************************************************************************/ /* */ /* 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_W1 \ pEPSILON #define MAXIMUM_DE_W1 \ PI_SUR_2 #define PAS_DE_W1 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W1,MINIMUM_DE_W1))) /* Definition de la coordonnee parametrique 'w1' de la surface. */ #define MINIMUM_DE_W2 \ NEGA(FU) #define MAXIMUM_DE_W2 \ NEUT(FU) #define PAS_DE_W2 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W2,MINIMUM_DE_W2))) /* Definition de la coordonnee parametrique 'w2' de la surface. */ #define MINIMUM_DE_W3 \ NEGA(FU) #define MAXIMUM_DE_W3 \ NEUT(FU) #define PAS_DE_W3 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W3,MINIMUM_DE_W3))) /* Definition de la coordonnee parametrique 'w3' de la surface. */ #define MINIMUM_DE_W4 \ NEGA(FU) #define MAXIMUM_DE_W4 \ NEUT(FU) #define PAS_DE_W4 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W4,MINIMUM_DE_W4))) /* Definition de la coordonnee parametrique 'w4' de la surface. */ #define MINIMUM_DE_W5 \ NEGA(FU) #define MAXIMUM_DE_W5 \ NEUT(FU) #define PAS_DE_W5 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W5,MINIMUM_DE_W5))) /* Definition de la coordonnee parametrique 'w5' de la surface. */ #define MINIMUM_DE_W6 \ NEGA(FU) #define MAXIMUM_DE_W6 \ NEUT(FU) #define PAS_DE_W6 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W6,MINIMUM_DE_W6))) /* Definition de la coordonnee parametrique 'w6' de la surface. */ #define MINIMUM_DE_W7 \ NEGA(FU) #define MAXIMUM_DE_W7 \ NEUT(FU) #define PAS_DE_W7 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W7,MINIMUM_DE_W7))) /* Definition de la coordonnee parametrique 'w7' de la surface. */ #define MINIMUM_DE_W8 \ NEGA(FU) #define MAXIMUM_DE_W8 \ NEUT(FU) #define PAS_DE_W8 \ FRA4(FRA10(SOUS(MAXIMUM_DE_W8,MINIMUM_DE_W8))) /* Definition de la coordonnee parametrique 'w8' de la surface. */