added afind primitive
wip *print-circle* support