File:Alpha Centauri relative sizes.svg

prologues := 3;

verbatimtex
\font\foo=cmss9 at 10pt
\foo
etex

sunrad=0.3in;
alpharad = 1.227*sunrad;
betarad = 0.865*sunrad;
proximarad = 0.145*sunrad;
gap = 0.8*sunrad;

pair sunpos, alphapos, betapos, proximapos;
sunpos = (0 + gap + sunrad, 1.9*sunrad);
alphapos = sunpos + (sunrad + gap + alpharad, 0);
betapos = alphapos + (alpharad + gap + betarad, 0);
proximapos = betapos + (betarad + gap + proximarad, 0);

beginfig(1);

  fill unitsquare xscaled ((xpart proximapos) + proximarad + gap)
    yscaled (2 * (ypart sunpos));

  fill fullcircle scaled (2*sunrad) shifted sunpos
    withcolor (1,0.960,0.949);   % Color is fff1ed
  label.bot(btex Sun etex, sunpos - (0, sunrad)) withcolor white;

  fill fullcircle scaled (2*alpharad)
    shifted alphapos
    withcolor (1,0.960,0.949);
  label.bot(btex $\alpha$ Centauri A etex, alphapos - (0, alpharad))
    withcolor white;

  fill fullcircle scaled (2*betarad)
    shifted betapos
    withcolor (1,0.878,0.737);  % ffe0bc
  label.bot(btex $\alpha$ Centauri B etex, betapos - (0, betarad))
    withcolor white;

  fill fullcircle scaled (2*proximarad)
    shifted proximapos
    withcolor (1,0.752,0.411);  % ffcc6f
  label.bot(btex Proxima etex, proximapos - (0, proximarad))
    withcolor white;

endfig;
end;