_______________________________________________________________________________________________________________________________________
/*************************************************************************************************************************************/
/* */
/* 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 ' 4 ' : */
/* */
/* */
/* Definition : */
/* */
/* Dans ce fichier, on trouvera */
/* la bibliotheque des labyrinthes */
/* que l'on assemble matriciellement. */
/* */
/* On notera que chaque element */
/* est inscrit dans un carre 5x5 */
/* et son trace commence en bas et */
/* a gauche... */
/* */
/* */
/* Author of '$xiii/alphabet.4$FON' : */
/* */
/* Jean-Francois COLONNA (LACTAMME, 20161116094600). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* M A R Q U A G E D ' U N P O I N T I N T E R I E U R A U N E " F A C E T T E " : */
/* */
/*************************************************************************************************************************************/
DEFV(Common,DEFV(Logical,ZINT(FgL_All_04_____marquer_l_interieur_des_contours,FAUX)));
/* Indicateur introduit le 20161118093252 afin d'aider a reperer l'interieur des contours. */
#define g12 \
Bblock \
DO1(g1;); \
DO1(g2;); \
Eblock
#define g32 \
Bblock \
DO1(g3;); \
DO1(g2;); \
Eblock
#define g14 \
Bblock \
DO1(g1;); \
DO1(g4;); \
Eblock
#define g34 \
Bblock \
DO1(g3;); \
DO1(g4;); \
Eblock
/* Procedures introduites le 20161125051132... */
#define MARQUE_POINT_INTERIEUR(deplacement) \
Bblock \
Test(IL_FAUT(FgL_All_04_____marquer_l_interieur_des_contours)) \
Bblock \
CALS(FgMIC()); \
/* Sauvegarde du point courant. */ \
CALS(FgMIX()); \
CALS(FgMIY()); \
CALS(FgMIZ()); \
CALS(FgMIK()); \
/* Sauvegarde des echelles. */ \
SK(DOUB(UNITE)); \
/* Afin de diviser par 2... */ \
CALS(FgXDIVI()); \
CALS(FgYDIVI()); \
CALS(FgZDIVI()); \
/* Pour faire des "demi-deplacements", */ \
CALS(FgMOK()); \
/* ATTAENTION : la restauration de 'K' doit avoir lieu avant le deplacement... */ \
BLOC(deplacement;); \
/* Et on se deplace d'un demi-pas dans la direction argument... */ \
gA;gB \
/* Et on marque le point courant... */ \
CALS(FgMOZ()); \
CALS(FgMOY()); \
CALS(FgMOX()); \
/* Restauration des echelles. */ \
CALS(FgMOC()); \
/* Restauration du point courant. */ \
gA; \
Eblock \
ATes \
Bblock \
Eblock \
ETes \
Eblock \
/* Cette fonction permet de marquer un point ; en general ce point est */ \
/* considere comme etant un point interieur d'un contour "ouvert". Ceci a ete introduit */ \
/* le 20161118080654... */
/*************************************************************************************************************************************/
/* */
/* 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 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
/* Procedures introduites le 20161125045620... */
#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 (introduite le 20161125043430). */
#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 (introduite le 20161125043430). */
#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 (introduite le 20161125043430). */
/*************************************************************************************************************************************/
/* */
/* C O L O R I A G E E V E N T U E L : */
/* */
/*************************************************************************************************************************************/
DEFV(Common,DEFV(genere_p,ZINT(FgL_All_04_____niveau_1,GRIS_8)));
DEFV(Common,DEFV(genere_p,ZINT(FgL_All_04_____niveau_2,GRIS_4)));
/* Afin de gerer les traces utilisant plusieurs couleurs (introduits le 20181022142144)... */
#define FgL_All_04_______SET_COULEURS(niveau) \
Bblock \
CALS(FgMIN()); \
SET_COULEURS(NOIR,niveau); \
Eblock
#define FgL_All_04_____UNSET_COULEURS \
Bblock \
CALS(FgMON()); \
Eblock
/* Gestion des couleurs (introduit le 20181022142144). */
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* 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_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLexclamation_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLquote_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLdiese_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLdollar_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpour_cent_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLet_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLapostrophe_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpg_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpd_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLetoile_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLplus_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLvirgule_04,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_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpoint_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgMOC());
)
)
)
/* Pour definir la fin d'une image. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLslash_04,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_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL1_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
/* Deplacement a droite. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL2_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g2;);
)
)
)
/* Deplacement vers le haut. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL3_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g3;);
)
)
)
/* Deplacement a gauche. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL4_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g4;);
)
)
)
/* Deplacement vers le bas. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL5_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL6_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL7_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL8_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgL9_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO5(g1;);
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLdeux_points_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpoint_virgule_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLinferieur_04,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_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgMIC());
)
)
)
/* Pour definir un debut de ligne. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLsuperieur_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
CALS(FgT_INIT());
)
)
)
/* Pour reinitialiser la transformation courante. */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLinterrogation_04,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_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLA_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO2(g1;);gA;
MARQUE_POINT_INTERIEUR(g12);
DO2(g2;);gB;
DO2(g3;);gB;
DO1(g2;);gA;
DO2(g1;);gB;
DO2(g2;);gB;
DO1(g1;);gA;
DO2(g4;);gB;
DO2(g1;);gB;
DO1(g4;);gA;
DO2(g3;);gB;
DO2(g4;);gB;
DO2(g1;);gA;
)
)
)
/* Element 'A' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +----- -----+ */
/* + + */
/* +----- -----+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLB_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO2(g1;);gA;
MARQUE_POINT_INTERIEUR(g12);
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g4;);gB;
DO2(g1;);gA;
DO2(g2;);gA;
MARQUE_POINT_INTERIEUR(g32);
DO5(g3;);gB;
DO1(g2;);gA;
DO5(g1;);gB;
DO2(g2;);gA;
DO2(g3;);gA;
MARQUE_POINT_INTERIEUR(g34);
DO1(g4;);gB;
DO1(g3;);gB;
DO1(g2;);gB;
DO3(g1;);gA;
DO5(g4;);gA;
)
)
)
/* Element 'B' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + - + */
/* + + */
/* + + */
/* +-------------+ */
/* + + */
/* +-------------+ */
/* + + */
/* + + */
/* + - + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLC_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(FgLB_04());
)
)
)
/* Element 'C' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +-- | | --+ */
/* + | | | | + */
/* +-- | | --+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLD_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO2(g1;);gA;
MARQUE_POINT_INTERIEUR(g12);
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g4;);gB;
DO2(g1;);gA;
DO2(g2;);gA;
MARQUE_POINT_INTERIEUR(g32);
DO5(g3;);gB;
DO1(g2;);gA;
DO2(g1;);gB;
DO2(g2;);gB;
DO1(g1;);gA;
DO2(g4;);gB;
DO2(g1;);gB;
DO3(g4;);gA;
)
)
)
/* Element 'D' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +----- -----+ */
/* + + */
/* +-------------+ */
/* + + */
/* + + */
/* + - + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLE_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(FgLD_04());
)
)
)
/* Element 'E' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +----- | --+ */
/* + | | + */
/* +----- | --+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLF_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_2_PI_SUR_2(FgLD_04());
)
)
)
/* Element 'F' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + - + */
/* + + */
/* + + */
/* +-------------+ */
/* + + */
/* +----- -----+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLG_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_3_PI_SUR_2(FgLD_04());
)
)
)
/* Element 'G' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +-- | -----+ */
/* + | | + */
/* +-- | -----+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLH_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO2(g1;);gA;
MARQUE_POINT_INTERIEUR(g12);
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g4;);gB;
DO2(g1;);gA;
DO2(g2;);gA;
MARQUE_POINT_INTERIEUR(g32);
DO1(g3;);gB;
DO1(g2;);gB;
DO1(g1;);gB;
DO2(g2;);gA;
DO2(g3;);gA;
MARQUE_POINT_INTERIEUR(g34);
DO1(g4;);gB;
DO1(g3;);gB;
DO1(g2;);gB;
DO2(g3;);gA
DO2(g4;);gA;
MARQUE_POINT_INTERIEUR(g14);
DO1(g1;);gB;
DO1(g4;);gB;
DO1(g3;);gB;
DO2(g4;);gA;
DO5(g1;);gA;
)
)
)
/* Element 'H' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + - + */
/* + + */
/* + + */
/* +-- --+ */
/* + | | + */
/* +-- --+ */
/* + + */
/* + + */
/* + - + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLI_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
DO2(g1;);gA;
MARQUE_POINT_INTERIEUR(g12);
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g4;);gB;
DO2(g1;);gA;
DO2(g2;);gA;
MARQUE_POINT_INTERIEUR(g32);
DO1(g3;);gB;
DO1(g2;);gB;
DO1(g1;);gB;
DO1(g4;);gA;
DO5(g3;);gA;
MARQUE_POINT_INTERIEUR(g12);
DO3(g1;);gB;
DO3(g2;);gB;
DO1(g3;);gA;
DO2(g4;);gB;
DO2(g3;);gB;
DO3(g4;);gA;
DO5(g1;);gA;
)
)
)
/* Element 'I' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +----- | --+ */
/* + | | + */
/* +------- --+ */
/* + + */
/* + + */
/* + - + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20161124173424). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLJ_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(FgLI_04());
)
)
)
/* Element 'J' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + - + */
/* + + */
/* + + */
/* +------- --+ */
/* + | | + */
/* +----- | --+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20161124173424). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLK_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_2_PI_SUR_2(FgLI_04());
)
)
)
/* Element 'K' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + - + */
/* + + */
/* + + */
/* +-- -------+ */
/* + | | + */
/* +-- | -----+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20161124173424). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLL_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
ROTATION_D_UN_ELEMENT_3_PI_SUR_2(FgLI_04());
)
)
)
/* Element 'L' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +-- | -----+ */
/* + | | + */
/* +-- -------+ */
/* + + */
/* + + */
/* + - + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20161124173424). */
EFonctionI
#define LMNOP_04 \
Bblock \
DO2(g2;);gA; \
MARQUE_POINT_INTERIEUR(g12); \
DO3(g1;);gB; \
DO3(g2;);gB; \
DO1(g3;);gA; \
DO2(g4;);gB; \
DO2(g3;);gB; \
DO3(g4;);gA; \
DO5(g1;);gA; \
Eblock
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLM_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
LMNOP_04;
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'M' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +----- | + */
/* + | + */
/* +------- + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLN_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(LMNOP_04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'N' : */
/* */
/* + + + + + + + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* +------- + */
/* + | + */
/* +----- | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLO_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
ROTATION_D_UN_ELEMENT_2_PI_SUR_2(LMNOP_04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'O' : */
/* */
/* + + + + + + + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + -------+ */
/* + | + */
/* + | -----+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLP_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
ROTATION_D_UN_ELEMENT_3_PI_SUR_2(LMNOP_04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'P' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | -----+ */
/* + | + */
/* + -------+ */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
#define LQR___04 \
Bblock \
DO2(g1;);gA; \
MARQUE_POINT_INTERIEUR(g12); \
DO5(g2;);gB; \
DO1(g1;);gA; \
DO5(g4;);gB; \
DO2(g1;);gA; \
Eblock
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLQ_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
LQR___04;
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'Q' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLR_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(LQR___04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'R' : */
/* */
/* + + + + + + + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* +-------------+ */
/* + + */
/* +-------------+ */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLS_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_1);
LQR___04;
FgL_All_04_____UNSET_COULEURS;
DO5(g3;);gA;
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(LQR___04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'S' : */
/* */
/* + + + + + + + + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* +-----+-+-----+ */
/* + | | + */
/* +-----+-+-----+ */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + | | + */
/* + + + + + + + + */
/* */
/* (introduit le 20181015153248 avec l'idee de faire de nouveaux pavages non periodiques : */
/* voir l'article "The unsolvable problem" dans Scientific American, 10/2018). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLT_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLU_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLV_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLW_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLX_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLY_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLZ_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLcrochet_gauche_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLanti_slash_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLcrochet_droit_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLcirconflexe_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLunder_score_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLanti_quote_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLa_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLb_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLc_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLd_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLe_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLaigu_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLgrave_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLf_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLg_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLh_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLi_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLi_trema_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLj_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLk_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLl_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLm_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
LMNOP_04;
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'm' : voir l'element 'M' avec d'autres couleurs (introduit le 20181022142144). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLn_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(LMNOP_04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'n' : voir l'element 'N' avec d'autres couleurs (introduit le 20181022142144). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLo_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
ROTATION_D_UN_ELEMENT_2_PI_SUR_2(LMNOP_04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'o' : voir l'element 'O' avec d'autres couleurs (introduit le 20181022142144). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLp_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
ROTATION_D_UN_ELEMENT_3_PI_SUR_2(LMNOP_04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'p' : voir l'element 'P' avec d'autres couleurs (introduit le 20181022142144). */
EFonctionI
#undef LMNOP_04
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLq_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
LQR___04;
FgL_All_04_____UNSET_COULEURS
)
)
)
/* Element 'q' : voir l'element 'Q' avec d'autres couleurs (introduit le 20181022142144). */
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLr_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
FgL_All_04_______SET_COULEURS(FgL_All_04_____niveau_2);
ROTATION_D_UN_ELEMENT_1_PI_SUR_2(LQR___04);
FgL_All_04_____UNSET_COULEURS;
)
)
)
/* Element 'r' : voir l'element 'R' avec d'autres couleurs (introduit le 20181022142144). */
EFonctionI
#undef LQR___04
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLs_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLt_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLu_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLv_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLw_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLx_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLy_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLz_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLag_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLpipe_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLad_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLtilda_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
BFonctionI
DEFV(Common,GENERE__FonctionI_GRAPHIQUES(FgLline_feed_04,PARENTHESES_DES_FONCTIONS /* Common,DEFV(Fonction,) : */
,BLOC(
Linex;
)
)
)
EFonctionI
#undef FgL_All_04_____UNSET_COULEURS
#undef FgL_All_04_______SET_COULEURS
#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 DO5
#undef DO4
#undef DO3
#undef DO2
#undef DO1
#undef MARQUE_POINT_INTERIEUR
#undef g12
#undef g32
#undef g14
#undef g34
_______________________________________________________________________________________________________________________________________