$c[5-int(5.2*cos($a=$_*.524))][8+int(8.2*sin($a))]

$c[5-int 5.2*cos$_*.52][8+int 8.2*sin$_*.524]

$c[5-int 5.2*cos$_*.52][8+7.8*sin$_*.523]

$c[5-int 5.2*cos($_*=.523)][8+7.8*sin]

$c[5.61-4.7*cos($_*=.523)][8+7.8*sin]

$c[5.5-4.7*cos($_*=.523)][8+7.8*sin]

$c[$_*=.523,5.5-4.7*cos][8+7.8*sin]

$c[$_*=.52,5.5-4.7*cos][8+7.4*sin]