/*************************************************************************************************************************************/
/* */
/* 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.85$I' : */
/* */
/* Jean-Francois COLONNA (LACTAMME, 20230225190127). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* P A R A M E T R E S ' A ' E T ' B ' : */
/* */
/*************************************************************************************************************************************/
#define PARTIE_REELLE_DU_PARAMETRE_oA \
R1_Octonion
#define PARTIE_IMAGINAIRE_DU_PARAMETRE_oA \
I0_Octonion
#define PARTIE_JMAGINAIRE_DU_PARAMETRE_oA \
J0_Octonion
#define PARTIE_KMAGINAIRE_DU_PARAMETRE_oA \
K0_Octonion
#define PARTIE_SMAGINAIRE_DU_PARAMETRE_oA \
S0_Octonion
#define PARTIE_TMAGINAIRE_DU_PARAMETRE_oA \
T0_Octonion
#define PARTIE_UMAGINAIRE_DU_PARAMETRE_oA \
U0_Octonion
#define PARTIE_VMAGINAIRE_DU_PARAMETRE_oA \
V0_Octonion
DEFV(Local,DEFV(hyper_hyper_complexe,INIS(parametre_oA
,IstructL08(PARTIE_REELLE_DU_PARAMETRE_oA
,PARTIE_IMAGINAIRE_DU_PARAMETRE_oA
,PARTIE_JMAGINAIRE_DU_PARAMETRE_oA
,PARTIE_KMAGINAIRE_DU_PARAMETRE_oA
,PARTIE_SMAGINAIRE_DU_PARAMETRE_oA
,PARTIE_TMAGINAIRE_DU_PARAMETRE_oA
,PARTIE_UMAGINAIRE_DU_PARAMETRE_oA
,PARTIE_VMAGINAIRE_DU_PARAMETRE_oA
)
)
)
);
/* Parametre 'A' initialise avec le nombre (1,0,0,0,0,0,0,0). */
#define PARTIE_REELLE_DU_PARAMETRE_oB \
R1_Octonion
#define PARTIE_IMAGINAIRE_DU_PARAMETRE_oB \
I0_Octonion
#define PARTIE_JMAGINAIRE_DU_PARAMETRE_oB \
J0_Octonion
#define PARTIE_KMAGINAIRE_DU_PARAMETRE_oB \
K0_Octonion
#define PARTIE_SMAGINAIRE_DU_PARAMETRE_oB \
S0_Octonion
#define PARTIE_TMAGINAIRE_DU_PARAMETRE_oB \
T0_Octonion
#define PARTIE_UMAGINAIRE_DU_PARAMETRE_oB \
U0_Octonion
#define PARTIE_VMAGINAIRE_DU_PARAMETRE_oB \
V0_Octonion
DEFV(Local,DEFV(hyper_hyper_complexe,INIS(parametre_oB
,IstructL08(PARTIE_REELLE_DU_PARAMETRE_oB
,PARTIE_IMAGINAIRE_DU_PARAMETRE_oB
,PARTIE_JMAGINAIRE_DU_PARAMETRE_oB
,PARTIE_KMAGINAIRE_DU_PARAMETRE_oB
,PARTIE_SMAGINAIRE_DU_PARAMETRE_oB
,PARTIE_TMAGINAIRE_DU_PARAMETRE_oB
,PARTIE_UMAGINAIRE_DU_PARAMETRE_oB
,PARTIE_VMAGINAIRE_DU_PARAMETRE_oB
)
)
)
);
/* Parametre 'B' initialise avec le nombre (1,0,0,0,0,0,0,0). */