// Préliminaire : // revenir en début de bande 0 . 1 - Gauche 1 - 1 - G 1 . 3 - Droite // première case marquée a // (1 n'est pas premier) // seconde case marquée c 3 - 4 a D 4 - 5 c D // entiers pairs marqués a (sauf 2) // entiers impairs marqués b 5 - 6 b D 6 - 5 a D 5 . 41 - G // revenir en début 6 . 41 - G // de bande // Placer un repère sur la première case, // et déplacer la marque c sur // le nombre premier suivant. 10 a 12 A D 12 - 12 - D 12 c 13 b D 13 a 13 - D 13 b 20 c D // Crible par c : marquer t ou u // les positions multiples de c. // Deux positions, distantes de c, // sont repérées par des majuscules. // On déplace les repères vers la droite // jusqu'à ce que le repère gauche // bute sur c, t, ou u. // écrire le repère droit // et retourner au repère gauche 20 a 21 A G 20 b 21 B G 20 . 40 - G // fin de bande 21 - 21 - G 21 A 22 a D 21 B 22 b D // écrire le repère gauche // et retourner au repère droit 22 a 23 A D 22 b 23 B D 22 - 30 - D 23 - 23 - D 23 A 20 a D 23 B 20 b D // Le repère gauche franchit // une position multiple de c // (marquée c, t ou u). // Le repère droit doit l'imiter, // en écrivant t pour une position // déjà criblée, u sinon // (la première occurrence de u // est la position c*c). 30 a 31 A D 30 b 31 B D 31 - 31 - D 31 A 32 a D 31 B 32 b D 32 a 20 t D 32 b 20 u D 32 . 40 - G // Fin de bande, retourner au début // en nettoyant les marques. // Si aucune case n'est marquée u, // c'est fini. 40 A 40 a G 40 B 40 b G 40 t 40 a G 40 u 41 a G 40 - 40 - G 40 . 100 - D 41 A 41 a G 41 B 41 b G 41 t 41 a G 41 u 41 a G 41 - 41 - G 41 . 10 - D