prologues := 3; outputformat := "svg"; defaultfont := "cmr10"; defaultscale := 1.1; color Blue,Teal,Orange,Green,Grey,Light,Wash; Blue := (0,84/255,159/255); Teal := (0,177/255,183/255); Orange := (246/255,168/255,0); Green := (87/255,171/255,39/255); Grey := (100/255,101/255,103/255); Light := (236/255,236/255,237/255); Wash := (232/255,241/255,250/255); % Format displayed numbers to hundredths using integer strings. vardef numlabel(expr value)= save n,whole,frac; numeric n,whole,frac; n:=round(100abs value); whole:=floor(n/100); frac:=n mod 100; (if value<-.005: "-" & fi decimal whole if frac>0: & "." & if frac<10: "0" & fi decimal frac fi) enddef; pickup pencircle scaled .9; outputtemplate := "MPT-03-003.svg"; beginfig(1); fill unitsquare xscaled 320 yscaled 220 withcolor white; % BEGIN DRAWING path a,b; pair p,q; a:=fullcircle xscaled 170 yscaled 140 shifted (125,105); b:=fullcircle xscaled 170 yscaled 140 shifted (195,105); p:=a intersectionpoint b; q:=(reverse a) intersectionpoint b; fill a withcolor Wash; draw a withcolor Blue; draw b withcolor Teal; draw p--q dashed evenly withpen pencircle scaled 1.4 withcolor Orange; fill fullcircle scaled 5 shifted p withcolor Orange; fill fullcircle scaled 5 shifted q withcolor Orange; % END DRAWING label.lft("MPT-03-003" infont "cmr8",(312,210)); setbounds currentpicture to unitsquare xscaled 320 yscaled 220; endfig; end.