Centrer une figure MetaPost
Je ne réussis pas à centrer une figure MetaPost, même avec l'environnement `figure` et la commande `\centering` (et je crois bien qu'avec MetaPost, on peut s'en passer).
Qu'est-ce qui cloche dans le code suivant, en termes de centrage ?
\documentclass{article}
% pour composer cet ECM selon des usages vaguement européens
\documentclass[french]{scrartcl}
% choix de la fonte plex dans sa version sans empattements
\usepackage[sfdefault]{plex-sans}
% pour intégrer des dessins MetaPost compilés directement avec LuaLaTeX
\usepackage{luamplib}
% pour franciser la chose selon le paramètre passé à la classe
\usepackage{babel}
\begin{document}
Et voici un carré :
\hspace{10pt}
% Centrage dans un environnement MetaPost
\begin{mplibcode}
beginfig(1);
% Dimensions et points
numeric u;
u := 72; % Taille d'un côté (1 inch en points typographiques)
pair A, B, C, D;
A = (0, 0);
B = (u, 0);
C = (u, u);
D = (0, u);
% Dessin du carré
draw A--B--C--D--cycle withpen pencircle scaled 1pt;
% Centrage
currentpicture := currentpicture shifted - center currentpicture;
endfig;
\end{mplibcode}
\hspace{10pt}
Et le texte continue ici, ce qui montre bien que cette figure n'est pas centrée !
\end{document}