1 beginfig(1)%François Morellet - Oeuvre Pi piquant, 1=1°, 38 décimales
7 draw Tournerg("\opList{élément \opSimple{1} de \opSousList{Pi}}");
9 draw MettreVar("varpi","\opSimple{2}");
10 draw RepeterJ1("\opOp{\opVar{varpi}\,$\bm{>}$\,38}");
11 draw Si2("$\opOp{\opVar{varpi}\mbox{ modulo }\opSimple{2}\,=\,\opSimple{0}}$");
12 draw Tournerg("$\opOp{\opSimple{180}}\bm{-}\opList{élément \opVar{varpi} de \opSousList{pi}}$");
14 draw Tournerd("$\opOp{\opSimple{180}}-\opList{élément \opVar{varpi} de \opSousList{pi}}$");
17 draw AjouterVar("varpi","\opSimple{1}");
18 draw FinBlocRepeter1(10);