_______________________________________________________________________________________________________________________________________
/*************************************************************************************************************************************/
/* */
/* D E F I N I T I O N D E L A B I B L I O T H E Q U E ' 5 ' : */
/* */
/* */
/* Definition : */
/* */
/* Dans ce fichier, on trouvera */
/* la bibliotheque des motifs */
/* quelconques bi- et tri-dimensionnels. */
/* */
/* */
/* Author of '$xiii/alphabet.5$FON' : */
/* */
/* Jean-Francois COLONNA (LACTAMME, 20161116094600). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* D E P L A C E M E N T S E L E M E N T A I R E S E T R O T A T I O N S : */
/* */
/*************************************************************************************************************************************/
#define DO0(deplacement) \
Bblock \
DO(ZERO,BLOC(deplacement;)); \
Eblock
#define DO1(deplacement) \
Bblock \
DO(UN,BLOC(deplacement;)); \
Eblock
#define DO2(deplacement) \
Bblock \
DO(DEUX,BLOC(deplacement;)); \
Eblock
#define DO3(deplacement) \
Bblock \
DO(TROIS,BLOC(deplacement;)); \
Eblock
#define DO4(deplacement) \
Bblock \
DO(QUATRE,BLOC(deplacement;)); \
Eblock
#define DO5(deplacement) \
Bblock \
DO(CINQ,BLOC(deplacement;)); \
Eblock
#define DO6(deplacement) \
Bblock \
DO(SIX,BLOC(deplacement;)); \
Eblock
#define DO7(deplacement) \
Bblock \
DO(SEPT,BLOC(deplacement;)); \
Eblock
#define DO8(deplacement) \
Bblock \
DO(HUIT,BLOC(deplacement;)); \
Eblock
#define DO9(deplacement) \
Bblock \
DO(NEUF,BLOC(deplacement;)); \
Eblock
#define DO10(deplacement) \
Bblock \
DO(DIX,BLOC(deplacement;)); \
Eblock
#define DO100(deplacement) \
Bblock \
DO(CENT,BLOC(deplacement;)); \
Eblock
#define ROTATION_D_UN_ELEMENT_1_PI_SUR_2(element) \
Bblock \
DO5(g1;);gA; \
CALS(FgMIC()); \
CALS(FgMIT()); \
CALS(FgT_INIT());CALS(FgTRZ1()); \
CALS(element); \
CALS(FgMOT()); \
CALS(FgMOC()); \
Eblock \
/* Rotation de 1.pi/2. */
#define ROTATION_D_UN_ELEMENT_2_PI_SUR_2(element) \
Bblock \
DO5(g1;);gA; \
CALS(FgMIC()); \
DO5(g2;);gA; \
CALS(FgMIT()); \
CALS(FgT_INIT());CALS(FgTRZ1());CALS(FgTRZ1()); \
CALS(element); \
CALS(FgMOT()); \
CALS(FgMOC()); \
Eblock \
/* Rotation de 2.pi/2. */
#define ROTATION_D_UN_ELEMENT_3_PI_SUR_2(element) \
Bblock \
CALS(FgMIC()); \
DO5(g2;);gA; \
CALS(FgMIT()); \
CALS(FgT_INIT());CALS(FgTRZ1());CALS(FgTRZ1());CALS(FgTRZ1()); \
CALS(element); \
CALS(FgMOT()); \
CALS(FgMOC()); \
DO5(g1;);gA; \
Eblock \
/* Rotation de 3.pi/2. */
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* D E F I N I T I O N D E S F O N C T I O N S E L E M E N T A I R E S : */
/* */
/*************************************************************************************************************************************/
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLspace_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLexclamation_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLquote_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLdiese_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLdollar_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpour_cent_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLet_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLapostrophe_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpg_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpd_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLetoile_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLplus_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLvirgule_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgMOC());
DO5(g2;);
)
)
)
/* Pour definir la fin d'une ligne. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLmoins_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpoint_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgMOC());
)
)
)
/* Pour definir la fin d'une image. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLslash_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgT_INIT());CALS(FgTRZ1());
)
)
)
/* Pour faire une rotation de +PI/2. */
/* */
/* ATTENTION : cela ne fonctionne correctement que si l'image est carree (par exemple au */
/* format 'Std') puisque, par cette rotation de l'axe des 'Z' de +pi/2, on permute en */
/* quelque sorte les axes 'X' et 'Y'... */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL0_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL1_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
/* Deplacement a droite. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL2_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g2;);
)
)
)
/* Deplacement vers le haut. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL3_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g3;);
)
)
)
/* Deplacement a gauche. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL4_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g4;);
)
)
)
/* Deplacement vers le bas. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL5_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL6_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL7_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL8_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL9_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLdeux_points_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpoint_virgule_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLinferieur_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgT_INIT());CALS(FgTRZ1());CALS(FgTRZ1());
)
)
)
/* Pour faire un rotation de PI. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLegal_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgMIC());
)
)
)
/* Pour definir un debut de ligne. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLsuperieur_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgT_INIT());
)
)
)
/* Pour reinitialiser la transformation courante. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLinterrogation_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgT_INIT());CALS(FgTRZ3());
)
)
)
/* Pour faire un rotation de -PI/2. */
/* */
/* ATTENTION : cela ne fonctionne correctement que si l'image est carree (par exemple au */
/* format 'Std') puisque, par cette rotation de l'axe des 'Z' de +pi/2, on permute en */
/* quelque sorte les axes 'X' et 'Y'... */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLa_rond_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLA_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO1(g1;g2;);gB;
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g4;);gB;
DO1(g1;);gB;
DO1(g4;);gB;
DO1(g1;g4;);gB;
)
)
)
/* Element 'A' : */
/* */
/* */
/* + + + + + + + + + + + */
/* + --- + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + --- --- + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + / \ + */
/* + / \ + */
/* +/ \+ */
/* + + + + + + + + + + + */
/* */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLB_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO1(g1;g2;);gB;
DO6(g1;);gB;
DO6(g2;);gB;
DO5(g3;);gB;
DO4(g4;);gB;
DO3(g1;);gB;
DO2(g2;);gB;
DO1(g3;);gB;
DO1(g4;);gB;
DO1(g3;);gB;
DO2(g2;);gB;
DO3(g1;);gB;
DO4(g4;);gB;
DO5(g3;);gB;
DO6(g2;);gB;
DO7(g1;);gB;
DO7(g4;);gB;
DO1(g1;g4;);gB;
)
)
)
/* Element 'B' : */
/* */
/* */
/* + + + + + + + + + + + + + + + + + + + */
/* + --- --- --- --- --- --- --- + */
/* + | | + */
/* + | --- --- --- --- --- | + */
/* + | | | | + */
/* + | | --- --- --- | | + */
/* + | | | | | | + */
/* + | | | --- | | | + */
/* + | | | | | | | | + */
/* + | | --- | | | | + */
/* + | | | | | | + */
/* + | --- --- --- | | | + */
/* + | | | | + */
/* + --- --- --- --- --- | | + */
/* + | | + */
/* + --- --- --- --- --- --- | + */
/* + / \ + */
/* + / \ + */
/* +/ \+ */
/* + + + + + + + + + + + + + + + + + + + */
/* */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLC_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO8(g1;);
DO1(g2;);gB;
DO7(g1;g2;);gB;
DO6(g2;g3;);gB;
DO5(g3;g4;);gB;
DO4(g4;g1;);gB;
DO3(g1;g2;);gB;
DO2(g2;g3;);gB;
DO1(g3;g4;);gB;
DO1(g4;g1;);gB;
DO1(g3;g4;);gB;
DO2(g2;g3;);gB;
DO3(g1;g2;);gB;
DO4(g4;g1;);gB;
DO5(g3;g4;);gB;
DO6(g2;g3;);gB;
DO7(g1;g2;);gB;
DO7(g4;g1;);gB;
DO9(g4;);
DO1(g1;);gB;
)
)
)
/* Element 'C'. Introduit le 20230517180252 par rotation de +pi/4 de 'B', cette rotation */
/* s'obtenant par les reecritures suivantes de la definition de 'B' : */
/* */
/* g(n) --> g(n);g(n+1) */
/* */
/* le 'g(n+1)' etant en quelque sorte "modulo 4"... */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLD_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO2(g1;g2;);gB;
DO1(g1;g4;);gB;
DO2(g1;g2;);gB;
DO1(g1;g4;);gB;
DO2(g1;g2;);gB;
DO2(g1;g4;);gB;
DO1(g1;g2;);gB;
DO2(g1;g4;);gB;
DO1(g1;g2;);gB;
DO2(g1;g4;);gB;
)
)
)
/* Element 'D' (introduit le 20230519104626) : */
/* */
/* */
/* + + + + + + + + + + + + + + */
/* + /\ + */
/* + / \ + */
/* + + */
/* + /\ / \ /\ + */
/* + / \/ \/ \ + */
/* + + */
/* + /\ / \ /\ + */
/* + / \/ \/ \ + */
/* + + */
/* + / \ + */
/* +/ \+ */
/* + + + + + + + + + + + + + + */
/* */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLE_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO1(g1;);gB;
DO1(g2;);gB;
DO1(g3;);gB;
DO1(g4;);gB;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g1;);gA;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g2;);gA;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g3;);gA;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g4;);gA;
DO1(g5;);gA;
DO1(g1;);gB;
DO1(g2;);gB;
DO1(g3;);gB;
DO1(g4;);gB;
DO1(g6;);gA;
DO1(g1;);gA;
)
)
)
/* Element 'E' (introduit le 20230522111236, en utilisant des conventions inversees par */
/* rapport a 'v $xrd/cube.01$K' en ce qui concerne {g5,g6}, ce qui donne de meilleurs */
/* resultats si on utilise 'v $xci/message$K vSZ=') : */
/* */
/* */
/* + + + + + + + + + + */
/* + ------------------------ + */
/* +|\ /|+ */
/* +| \ / |+ */
/* +| \ / |+ */
/* +| ---------------- |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| | | |+ */
/* +| ---------------- |+ */
/* +| / \ |+ */
/* +| / \ |+ */
/* +|/ \|+ */
/* + ------------------------ + */
/* + + + + + + + + + + */
/* */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLF_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO1(g1;g2;);DO10(g5;);gB;
DO6(g1;);DO6(g5;);gB;
DO6(g2;);DO6(g5;);gB;
DO5(g3;);DO5(g5;);gB;
DO4(g4;);DO4(g5;);gB;
DO3(g1;);DO3(g5;);gB;
DO2(g2;);DO2(g5;);gB;
DO1(g3;);gB;
DO1(g4;);gB;
DO1(g3;);DO1(g6;);gB;
DO2(g2;);DO2(g6;);gB;
DO3(g1;);DO3(g6;);gB;
DO4(g4;);DO4(g6;);gB;
DO5(g3;);DO5(g6;);gB;
DO6(g2;);DO6(g6;);gB;
DO7(g1;);DO7(g6;);gB;
DO7(g4;);DO7(g6;);gB;
DO1(g1;g4;);DO1(g6;);gB;
)
)
)
/* Element 'F'. Introduit le 20230522180546 par "elevation" de l'element 'B'. On notera */
/* qu'il y a dans la premiere partie autant de 'g5' (36) que de 'g6' dans la seconde (36). */
/* On notera de plus que les pentes sont identiques puisque les deplacements horizontaux */
/* {g1,g2,g3,g4} et les deplacements verticaux {g5,g6} sont en nombre egal... */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLG_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
gA;
DO1(g1;g2;g5;);gB;
/* Positionnement introduit le 20230530102527 pour permettre d'eviter des recouvrements */
/* de segments dans 'v $xiirv/PEAN.Q2.G.2' par exemple... */
/* */
/* D'autre part l'usage des coordonnees 'X' et 'Z' (via 'g1' et 'g5') est lie au fait que */
/* celles-ci sont permutees dans 'v $xci/valeurs_TransformationPeano3D$K 20220428110814' et */
/* que tout cela est utilise dans 'v $xiirv/.PEAN.Q2.1.$U _____Lettre' afin de generer, par */
/* exemple, l'image 'v $xiirv/HILB.l7.G.4'... */
DO3(g1;);gB;
DO3(g2;);gB;
DO3(g3;);gB;
DO3(g4;);gB;
DO3(g5;);gB;
DO3(g6;);gA;
DO3(g1;);gA;
DO3(g5;);gB;
DO3(g6;);gA;
DO3(g2;);gA;
DO3(g5;);gB;
DO3(g6;);gA;
DO3(g3;);gA;
DO3(g5;);gB;
DO3(g6;);gA;
DO3(g4;);gA;
DO3(g5;);gA;
DO3(g1;);gB;
DO3(g2;);gB;
DO3(g3;);gB;
DO3(g4;);gB;
DO3(g6;);gA;
/* Definition du grand cube externe... */
DO1(g1;g2;g5;);gA;
/* Positionnement du petit cube interne... */
DO1(g1;);gB;
DO1(g2;);gB;
DO1(g3;);gB;
DO1(g4;);gB;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g1;);gA;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g2;);gA;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g3;);gA;
DO1(g5;);gB;
DO1(g6;);gA;
DO1(g4;);gA;
DO1(g5;);gA;
DO1(g1;);gB;
DO1(g2;);gB;
DO1(g3;);gB;
DO1(g4;);gB;
DO1(g6;);gA;
/* Definition du petit cube interne (identique au grand cube en remplacant 'DO3(...)' */
/* par 'DO1(...)'). */
DO1(g3;g4;g6;);gA;
/* Retour a l'origine du grand cube externe et donc positionnement "a gauche"... */
DO1(g1;g2;g5;);gA;
DO1(g3;g4;g6;);gB;
DO3(g5;);gA;
DO1(g1;g2;g6;);gA;
DO1(g3;g4;g5;);gB;
DO3(g2;);gA;
DO1(g1;g4;g6;);gA;
DO1(g3;g2;g5;);gB;
DO3(g6;);gA;
DO1(g1;g4;g5;);gA;
DO1(g3;g2;g6;);gB;
/* Definition des 4 aretes joignant le grand et le petit cube "a gauche"... */
DO3(g4;);gA;
DO3(g1;);gA;
DO3(g5;);gA;
/* Positionnement "a droite"... */
DO1(g3;g2;g6;);gA;
DO1(g1;g4;g5;);gB;
DO3(g2;);gA;
DO1(g3;g4;g6;);gA;
DO1(g1;g2;g5;);gB;
DO3(g6;);gA;
DO1(g3;g4;g5;);gA;
DO1(g1;g2;g6;);gB;
DO3(g4;);gA;
DO1(g3;g2;g5;);gA;
DO1(g1;g4;g6;);gB;
/* Definition des 4 aretes joignant le grand et le petit cube "a droite"... */
DO1(g1;g4;g6;);gB;
/* Et enfin, positionnement final... */
/* */
/* On notera l'usage des coordonnees 'X' et 'Z' (via 'g1' et 'g6') est lie au fait que */
/* celles-ci sont permutees dans 'v $xci/valeurs_TransformationPeano3D$K 20220428110814' et */
/* que tout cela est utilise dans 'v $xiirv/.PEAN.Q2.1.$U _____Lettre' afin de generer, par */
/* exemple, l'image 'v $xiirv/HILB.l7.G.4'... */
)
)
)
/* Element 'G'. Hypercube introduit le 20230522180546 ('v $xiirv/CUBE.11.4'). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLH_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLI_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLJ_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLK_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLL_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLM_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLN_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLO_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLP_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLQ_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLR_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLS_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLT_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLU_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLV_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLW_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLX_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLY_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLZ_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLcrochet_gauche_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLanti_slash_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLcrochet_droit_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLcirconflexe_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLunder_score_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLanti_quote_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLa_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLb_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLc_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLd_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLe_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLaigu_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLgrave_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLf_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLg_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLh_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLi_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLi_trema_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLj_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLk_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLl_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLm_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLn_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLo_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLp_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLq_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLr_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLs_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLt_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLu_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLv_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLw_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLx_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLy_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLz_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLag_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpipe_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLad_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLtilda_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLline_feed_05,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
#undef ROTATION_D_UN_ELEMENT_3_PI_SUR_2
#undef ROTATION_D_UN_ELEMENT_2_PI_SUR_2
#undef ROTATION_D_UN_ELEMENT_1_PI_SUR_2
#undef DO100
#undef DO10
#undef DO9
#undef DO8
#undef DO7
#undef DO6
#undef DO5
#undef DO4
#undef DO3
#undef DO2
#undef DO1
#undef DO0
_______________________________________________________________________________________________________________________________________