def superthinlines = pickup pencircle scaled .1pt enddef; def thinlines = pickup pencircle scaled .3 enddef; def normallines = pickup pencircle scaled .7 enddef; def thicklines = pickup pencircle scaled 1 enddef; def superthicklines = pickup pencircle scaled 3pt enddef; % Нормальная точка def Dot expr a = draw a withpen pencircle scaled dotlabeldiam enddef; beginfig(0) numeric unit; unit=1cm; z.a=unit*(0,0); z.b=unit*(0, 1); z.c=unit*(1,1); z.d=unit*(1,0); Dot z.a; Dot z.b; Dot z.c; Dot z.d; normallines; draw z.a--z.b--z.c--z.d; endfig; beginfig(1) numeric unit; unit=1cm; z.a=unit*(0,0); z.b=unit*(0, 1); z.c=unit*(1,1); z.d=unit*(1,0); z.e=unit*(0.5, 1.85); Dot z.a; Dot z.b; Dot z.c; Dot z.d; normallines; draw z.a--z.b--z.c--z.d; draw z.b--z.e--z.c; endfig; %3-расческа beginfig(2) numeric unit; unit=1cm; z.a=unit*(0,0); z.b=unit*(0, 2); z.c=unit*(-0.4, 1); z.d=unit*(1,0); z.e=unit*(1,2); z.f=unit*(1,1); Dot z.a; Dot z.b; Dot z.c; Dot z.d; Dot z.e; Dot z.f; normallines; draw z.a--z.b--z.c--z.a; draw z.a--z.d; draw z.b--z.e; draw z.c--z.f; endfig; %3-антирасческа beginfig(3) numeric unit; unit=1.2cm; z.a=unit*(0,0); z.b=unit*(2, 0); z.c=unit*(1,1.7); z.d=unit*(1,0); z.e=unit*(0.5,0.85); z.f=unit*(1.5,0.85); Dot z.a; Dot z.b; Dot z.c; Dot z.d; Dot z.e; Dot z.f; normallines; draw z.a--z.b--z.c--z.a; draw z.d--z.e--z.f--z.d; endfig; %гребешок beginfig(4) numeric unit; unit=1cm; z.a=unit*(0,0); z.b=unit*(0, 1); z.c=unit*(-0.4, 0.5); z.d=unit*(1,0); z.e=unit*(1,1); z.f=unit*(1,0.5); z.g=unit*(-0.4,2); Dot z.a; Dot z.b; Dot z.c; Dot z.d; Dot z.e; Dot z.f; Dot z.g; normallines; draw z.a--z.b--z.c--z.a; draw z.a--z.d; draw z.b--z.e; draw z.c--z.f; draw z.a--z.g--z.b; draw z.c--z.g; endfig; %антигребешок beginfig(5) numeric unit; unit=1.2cm; z.a=unit*(0,0); z.b=unit*(2, 0); z.c=unit*(1,1.7); z.d=unit*(1,0); z.e=unit*(0.5,0.85); z.f=unit*(1.5,0.85); z.g=unit*(1,0.56); Dot z.a; Dot z.b; Dot z.c; Dot z.d; Dot z.e; Dot z.f; Dot z.g; normallines; draw z.a--z.b--z.c--z.a; draw z.d--z.e--z.f--z.d--z.g--z.e; draw z.f--z.g; endfig; %G_10 beginfig(6) numeric unit; unit=1cm; numeric rad; rad=0.6cm; z.v0=unit*(1,0.6); z.v1=unit*(0,2); z.v2=unit*(1.4,1.4); z.v3=unit*(2,0); z.v4=unit*(1.4,-1.4); z.v5=unit*(0,-2); z.v6=unit*(-1.4,-1.4); z.v7=unit*(-2,0); z.v8=unit*(-1.4,1.4); z.v9=unit*(1,-0.6); draw z.v1--z.v2--z.v3--z.v4--z.v5--z.v6--z.v7--z.v8--z.v1--z.v5--z.v0--z.v9--z.v3 --z.v7--z.v0--z.v3; draw z.v0--z.v1--z.v9--z.v4; draw z.v5--z.v9--z.v7; draw z.v2--z.v0--z.v6; draw z.v8--z.v9; unfill fullcircle scaled rad shifted z.v0; unfill fullcircle scaled rad shifted z.v1; unfill fullcircle scaled rad shifted z.v2; unfill fullcircle scaled rad shifted z.v3; unfill fullcircle scaled rad shifted z.v4; unfill fullcircle scaled rad shifted z.v5; unfill fullcircle scaled rad shifted z.v6; unfill fullcircle scaled rad shifted z.v7; unfill fullcircle scaled rad shifted z.v8; unfill fullcircle scaled rad shifted z.v9; draw fullcircle scaled rad shifted z.v0; draw fullcircle scaled rad shifted z.v1; draw fullcircle scaled rad shifted z.v2; draw fullcircle scaled rad shifted z.v3; draw fullcircle scaled rad shifted z.v4; draw fullcircle scaled rad shifted z.v5; draw fullcircle scaled rad shifted z.v6; draw fullcircle scaled rad shifted z.v7; draw fullcircle scaled rad shifted z.v8; draw fullcircle scaled rad shifted z.v9; label(btex$v_1$etex,z.v0); label(btex$v_9$etex,z.v1); label(btex$v_0$etex,z.v2); label(btex$v_3$etex,z.v3); label(btex$v_4$etex,z.v4); label(btex$v_5$etex,z.v5); label(btex$v_6$etex,z.v6); label(btex$v_7$etex,z.v7); label(btex$v_8$etex,z.v8); label(btex$v_2$etex,z.v9); endfig; %Peterson beginfig(7) numeric unit; unit=1cm; numeric rad; rad=0.6cm; z.v0=unit*(1.75,0.8); z.v1=unit*(1.15,3.5); z.v2=unit*(-0.8,2.2); z.v3=unit*(0,0); z.v4=unit*(2.3,0); z.v5=unit*(3.1,2.2); z.v6=unit*(2.1,1.85); z.v7=unit*(0.55,0.8); z.v8=unit*(1.15,2.5); z.v9=unit*(0.2,1.85); draw z.v1--z.v2--z.v3--z.v4--z.v5--z.v1--z.v8--z.v7--z.v6--z.v9--z.v0--z.v8; draw z.v2--z.v9; draw z.v3--z.v7; draw z.v4--z.v0; draw z.v5--z.v6; unfill fullcircle scaled rad shifted z.v0; unfill fullcircle scaled rad shifted z.v1; unfill fullcircle scaled rad shifted z.v2; unfill fullcircle scaled rad shifted z.v3; unfill fullcircle scaled rad shifted z.v4; unfill fullcircle scaled rad shifted z.v5; unfill fullcircle scaled rad shifted z.v6; unfill fullcircle scaled rad shifted z.v7; unfill fullcircle scaled rad shifted z.v8; unfill fullcircle scaled rad shifted z.v9; draw fullcircle scaled rad shifted z.v0; draw fullcircle scaled rad shifted z.v1; draw fullcircle scaled rad shifted z.v2; draw fullcircle scaled rad shifted z.v3; draw fullcircle scaled rad shifted z.v4; draw fullcircle scaled rad shifted z.v5; draw fullcircle scaled rad shifted z.v6; draw fullcircle scaled rad shifted z.v7; draw fullcircle scaled rad shifted z.v8; draw fullcircle scaled rad shifted z.v9; label(btex$v_0$etex,z.v0); label(btex$v_1$etex,z.v1); label(btex$v_2$etex,z.v2); label(btex$v_3$etex,z.v3); label(btex$v_4$etex,z.v4); label(btex$v_5$etex,z.v5); label(btex$v_6$etex,z.v6); label(btex$v_7$etex,z.v7); label(btex$v_8$etex,z.v8); label(btex$v_9$etex,z.v9); endfig; beginfig(8) numeric unit; unit=1cm; z.u1=unit*(0,0); z.u2=unit*(1,0); z.u3=unit*(1,1); z.u4=unit*(0,1); z.u5=z.u6+unit*(((0,1) rotated 15)); z.u6=unit*(-0.7,1.7); z.u7=z.u6+unit*(((0,1) rotated 75)); %z.u8=z.u7+unit*(0.5,0.8); dotlabel.ulft(btex$A$etex,z.u4); label(btex$G_1$etex,z.u7+unit*(0.2,0.6)); label(btex$G_2$etex,z.u1+unit*(-0.4,0.4)); normallines; draw z.u1--z.u2--z.u3--z.u4--z.u1; draw z.u5--z.u6--z.u7--z.u5; z.vpravo=unit*(6,0); z.v1=unit*(0,0); z.v2=unit*(1,0); z.v3=unit*(1,1); z.v5=z.v6+unit*(((0,1) rotated 15)); z.v6=unit*(0.3,0.7); z.v7=z.v6+unit*(((0,1) rotated 75)); draw (z.v1--z.v2--z.v3--z.v5--z.v6--z.v7--z.v5--z.v1-- z.v7--z.v3--z.v6--z.v1) shifted z.vpravo; Dot z.v1 shifted z.vpravo; Dot z.v2 shifted z.vpravo; Dot z.v3 shifted z.vpravo; Dot z.v5 shifted z.vpravo; Dot z.v6 shifted z.vpravo; Dot z.v7 shifted z.vpravo; Dot z.u1; Dot z.u2; Dot z.u3; Dot z.u4; Dot z.u5; Dot z.u6; Dot z.u7; z.x=unit*(2,1); z.y=unit*(4,1); drawarrow z.x--z.y dashed evenly; endfig; % coloured Pi beginfig(9) numeric unit; unit=1cm; z.a=unit*(0,0); z.b=unit*(0, 1); z.c=unit*(1,1); z.d=unit*(1,0); Dot z.a; Dot z.b; Dot z.c; Dot z.d; normallines; draw z.a--z.b--z.c--z.d; draw z.b--z.d--z.a--z.c dashed withdots scaled 0.5; endfig; % Delta beginfig(10) numeric unit; unit=1.6cm; z.a=unit*(0,0); z.b=unit*(1, 0); z.c=unit*(0.5,0.85); Dot z.a; Dot z.b; Dot z.c; normallines; draw z.a--z.b; draw z.b--z.c dashed withdots scaled 0.5; superthicklines; draw z.a--z.c dashed evenly scaled 2pt; endfig; %12 beginfig(11) numeric unit; unit=1cm; numeric rad; rad=0.6cm; z.v1=unit*(1,0); z.v2=unit*(4,0); z.v3=unit*(7,0); z.v4=unit*(10,0); z.v5=unit*(13,0); z.v12=unit*(0,3); z.v13=unit*(1.5,3); z.v14=unit*(3,3); z.v15=unit*(4.5,3); z.v23=unit*(6,3); z.v24=unit*(7.5,3); z.v25=unit*(9,3); z.v34=unit*(10.5,3); z.v35=unit*(12,3); z.v45=unit*(13.5,3); normallines; draw z.v1--z.v12--z.v2--z.v23--z.v3--z.v34--z.v4--z.v14--z.v1--z.v13--z.v3-- z.v35--z.v5--z.v45--z.v4--z.v24--z.v2--z.v25--z.v5--z.v15--z.v1; unfill fullcircle scaled rad shifted z.v1; unfill fullcircle scaled rad shifted z.v2; unfill fullcircle scaled rad shifted z.v3; unfill fullcircle scaled rad shifted z.v4; unfill fullcircle scaled rad shifted z.v5; unfill fullcircle scaled rad shifted z.v12; unfill fullcircle scaled rad shifted z.v13; unfill fullcircle scaled rad shifted z.v14; unfill fullcircle scaled rad shifted z.v15; unfill fullcircle scaled rad shifted z.v23; unfill fullcircle scaled rad shifted z.v24; unfill fullcircle scaled rad shifted z.v25; unfill fullcircle scaled rad shifted z.v34; unfill fullcircle scaled rad shifted z.v35; unfill fullcircle scaled rad shifted z.v45; draw fullcircle scaled rad shifted z.v1; draw fullcircle scaled rad shifted z.v2; draw fullcircle scaled rad shifted z.v3; draw fullcircle scaled rad shifted z.v4; draw fullcircle scaled rad shifted z.v5; draw fullcircle scaled rad shifted z.v12; draw fullcircle scaled rad shifted z.v13; draw fullcircle scaled rad shifted z.v14; draw fullcircle scaled rad shifted z.v15; draw fullcircle scaled rad shifted z.v23; draw fullcircle scaled rad shifted z.v24; draw fullcircle scaled rad shifted z.v25; draw fullcircle scaled rad shifted z.v34; draw fullcircle scaled rad shifted z.v35; draw fullcircle scaled rad shifted z.v45; label(btex$v_1$etex,z.v1); label(btex$v_2$etex,z.v2); label(btex$v_3$etex,z.v3); label(btex$v_4$etex,z.v4); label(btex$v_5$etex,z.v5); label(btex$v_{12}$etex,z.v12); label(btex$v_{13}$etex,z.v13); label(btex$v_{14}$etex,z.v14); label(btex$v_{15}$etex,z.v15); label(btex$v_{23}$etex,z.v23); label(btex$v_{24}$etex,z.v24); label(btex$v_{25}$etex,z.v25); label(btex$v_{34}$etex,z.v34); label(btex$v_{35}$etex,z.v35); label(btex$v_{45}$etex,z.v45); endfig; % 3-col cis beginfig(12) numeric unit; unit=2cm; z.a=unit*(0,0); z.b=unit*(1,0); z.c=unit*(1,1); z.d=unit*(0,1); Dot z.a; Dot z.b; Dot z.c; Dot z.d; normallines; draw z.a--z.d--z.b--z.c--z.a; draw z.a--z.b dashed withdots scaled 0.5; superthicklines; draw z.c--z.d dashed evenly scaled 2pt; endfig; % 3-col gall not cis beginfig(13) numeric unit; unit=1cm; z.a=unit*(1.75,0.8); z.b=unit*(2.1,1.85); z.c=unit*(1.15,2.5); z.d=unit*(0.2,1.85); z.e=unit*(0.55,0.8); Dot z.a; Dot z.b; Dot z.c; Dot z.d; Dot z.e; normallines; draw z.a--z.c--z.b; draw z.d--z.c--z.e; draw z.b--z.e--z.a--z.d dashed withdots scaled 0.5; superthicklines; draw z.a--z.b--z.d--z.e dashed evenly scaled 2pt; endfig; % sol 13 beginfig(14) numeric unit; unit=1cm; z.u=unit*(0,0); z.v1=unit*(1,1); z.w1=unit*(1,-1); z.w2=unit*(2,-0.955); z.w3=unit*(3,-0.9); z.w4=unit*(4,-0.8); Dot z.u; Dot z.v1; Dot z.w1; Dot z.w2; Dot z.w3; normallines; draw z.w1--z.v1--z.w2; draw z.w3--z.v1--z.w4; %draw z.b--z.e--z.a--z.d dashed withdots scaled 0.5; superthicklines; draw z.v1--z.u--z.w2 dashed evenly scaled 2pt; draw z.w3--z.u--z.w4 dashed evenly scaled 2pt; label.lft(btex$u$etex,z.u); label.top(btex$v_1$etex,z.v1); label.bot(btex$w_1$etex,z.w1); label.bot(btex$w_2$etex,z.w2); label.bot(btex$w_3$etex,z.w3); label.bot(btex$\cdots$etex,z.w4); endfig; end