frame eye { vec @(re, 0mm) circ @ . } set ro=10mm // radius of head set ri=7mm // radius of mouth set re=1.5mm // radius of eyes set ey=3mm // height of eyes from center set ex=4mm // horizontal distance of eyes from center set a=20 // angle to subtract from the mouth's edges // (total arc is thus 180-2*a degrees // outer circle vec @(ro, 0mm) circ @ . // mouth set mx=ri*cos(a) set my=-ri*sin(a) a: vec @(-mx, my) b: vec @(mx, my) arc @ a b // eyes m: vec @(0mm, ey) vec m(-ex, 0mm) frame eye . vec m(ex, 0mm) frame eye .