size(7cm,0);

path chemin=(0,0){dir(45)}..(1,0)..(1,.5)..(0,1)..cycle;

pen[] p={red,green,blue,magenta};
int[] edge_flag={0,0,0,1};
draw(chemin);
gouraudshade(chemin,p,edge_flag);
dot(chemin);