circle c   0 0 0 1 1
copy c cr
2dtranslate cr 0 -4
reverse cr
convert result cr
2dpl 
2dpl
2dpu
2dpu
checklength result -l 6.2831853071795853
checkview -display result -2d v2d -path ${imagedir}/${test_image}.png