Hi,
Thanks, it works perfectly.
Fabrice

Le sam. 21 oct. 2023 à 20:33, Hans Hagen <j.hagen@xs4all.nl> a écrit :
On 10/21/2023 9:43 PM, Fabrice Couvreur wrote:
> Hi,
> I don't know if I will explain my problem clearly but I will try. For my
> students' tests, I use a master file. If I insert this piece of code, there
> is a large white space that is created between the horizontal line of the
> header and the first exercise.

\startMPcode makes an image so it will take space

for definitions use \startMPdefinitions


> \startMPcode
>    def suite (expr n, t) =
>    begingroup
>     numeric u;
>     u := 5mm;
>     pickup pencircle scaled 5pt;
>     for i=0 upto n:
>       for j=0 upto n:
>           drawdot (i*u,j*u) shifted(t*u,0) withcolor \MPcolor{darkred};
>       endfor
>     endfor
>    endgroup
>    enddef;
>
>    def Suite (expr n, t) =
>    begingroup
>    numeric u;
>    u := 5mm;
>    pickup pencircle scaled 5pt;
>    for i=0 upto n:
>       drawdot(i*u,0) shifted(t*u,0) withcolor \MPcolor{blue};
>    endfor
>    endgroup
>    enddef;
>
>    def cross (expr n, t) =
>    begingroup
>    numeric u;
>    u := 5mm;
>    pickup pencircle scaled 5pt;
>    for i=-n upto n:
>       drawdot(0,i*u) shifted(t*u,0) withcolor \MPcolor{blue};
>    endfor
>    endgroup
>    enddef;
> \stopMPcode
> __________________________________________________________ %horizontal line
>     % big unwanted white space
>     \starttext
>     % \startex First exercise
> \startlinecorrection[blank]
>          \startmidaligned
>            \startcombination[1*2]
>              {\startMPcode
>                Suite(2,0);
>                cross(1,1);
>                Suite(4,4);
>                cross(2,6);
>                Suite(6,10);
>                cross(3,13);
>                \stopMPcode
>              }{\tfx \bf Suite 1}
>             {\startMPcode
>                suite(0,0);
>                suite(1,2);
>                suite(2,5);
>                \stopMPcode
>              }{\tfx \bf Suite 2}
>          \stopcombination
>         \stopmidaligned
>       \stoplinecorrection
>    %\stopex
> \stoptext
>
>
> ___________________________________________________________________________________
> If your question is of interest to others as well, please add an entry to the Wiki!
>
> maillist : ntg-context@ntg.nl / https://mailman.ntg.nl/mailman3/lists/ntg-context.ntg.nl
> webpage  : https://www.pragma-ade.nl / https://context.aanhet.net (mirror)
> archive  : https://github.com/contextgarden/context
> wiki     : https://wiki.contextgarden.net
> ___________________________________________________________________________________

--

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
        tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-----------------------------------------------------------------

___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / https://mailman.ntg.nl/mailman3/lists/ntg-context.ntg.nl
webpage  : https://www.pragma-ade.nl / https://context.aanhet.net (mirror)
archive  : https://github.com/contextgarden/context
wiki     : https://wiki.contextgarden.net
___________________________________________________________________________________