Untitled Metapost Sample #metapost-sandbox

main.mp

beginfig(1);

u := 1cm;

% Нарисуем уровневые линии V1 и V
draw fullcircle scaled 2.4u shifted (0,0) withpen pencircle scaled 1pt; % V
label("$V$", (1.2u, 1.2u));

draw fullcircle xscaled 1.8u yscaled 1.2u shifted (0,0) withpen pencircle scaled 1pt; % V1
label("$V_1$", (0.8u, -1u));

% Начальная точка x(0)
dotlabel.bot("$x(0)$", (0,0));

% Точка x (вдоль траектории)
dotlabel.rt("$\vec{x}$", (0.8u,0.3u));

% Стрелка направления движения
drawarrow (0.3u,0.15u) .. (0.5u,0.2u) .. (0.7u,0.3u);

% Траектория — эллиптическая кривая
draw (0.3u,0.15u)
    .. (0.6u,0.6u)
    .. (0.8u,0.3u)
    .. (1.0u,0)
    .. (0.7u,-0.5u)
    .. (0.3u,0.15u);

label.bot("a)", (0,-1.7u));

endfig;
end

beginfig(1);
u := 1cm;

% Внешняя окружность V
draw fullcircle scaled 3u withpen pencircle scaled 1pt;
label("$V$", (1.6u, 1.5u));

% Внутренний эллипс V1 — кольцо как у Сатурна
path ellipse;
ellipse := (1.6u,0)..(1.2u,0.6u)..(0,0.8u)..(-1.2u,0.6u)..
           (-1.6u,0)..(-1.2u,-0.6u)..(0,-0.8u)..(1.2u,-0.6u)..cycle;

% Повернем эллипс на угол (например, 30 градусов)
transform t;
t := identity rotated 30;
draw ellipse transformed t withpen pencircle scaled 1pt;
label("$V_1$", point 3 of (ellipse transformed t) shifted (0.2u, 0.1u));

% Начальная точка x(0)
dotlabel.bot("$x(0)$", (0,0));

% Точка x вдоль траектории
dotlabel.rt("$\vec{x}$", (0.8u,0.3u));

% Стрелка направления движения
drawarrow (0.3u,0.15u) .. (0.5u,0.2u) .. (0.7u,0.3u);

% Пример траектории (условная)
draw (0.3u,0.15u)
    .. (0.6u,0.6u)
    .. (0.8u,0.3u)
    .. (1.0u,0)
    .. (0.7u,-0.5u)
    .. (0.3u,0.15u);

label.bot("a)", (0,-2u));

endfig;
end