X-Git-Url: https://melusine.eu.org/syracuse/G/git/?p=mp-scratch.git;a=blobdiff_plain;f=doc%2Ffigures%2FSortieBloc.mp;fp=doc%2Ffigures%2FSortieBloc.mp;h=9232f1c619c491c66f53a86ec31c9b83c2c0bc7b;hp=0000000000000000000000000000000000000000;hb=98510de4ba0aff4f5d97eb29ee7779abe9c6b47c;hpb=45b57c4a264c463c8a0d5cd71ba351c6782804b3

diff --git a/doc/figures/SortieBloc.mp b/doc/figures/SortieBloc.mp
new file mode 100644
index 0000000..9232f1c
--- /dev/null
+++ b/doc/figures/SortieBloc.mp
@@ -0,0 +1,17 @@
+input mp-scratch;
+
+beginfig(1);
+  draw Repeter1(10);
+  draw Avancer(10);
+  draw Tournerd(90);
+  draw FinBlocRepeter1(10);
+  _coinprec:=_coinprec+(0,-1cm);
+  draw Si2("\opOp{$\opVar{i}\bm{<}10$}");
+  draw Avancer(10);
+  draw Tournerd("\opOp{$10\bm{\times}\opVar{i}$}");
+  draw Sinon2;
+  draw Stop("tout");
+  draw FinBlocSi2;
+endfig;
+
+end