roundrect 0 0 60 40 5 5
label -10 12 pitch
label 30 20 C_p
// pijl naar boven
solidpen 255 0 0 0 
moveto 20 0
lineto 20 -20
moveto 18 -12
lineto 20 -20
moveto 22 -12
lineto 20 -20