Funkcia gcd v programe Asymptote:

${\tt int\ gcd(int\ k,int\ n)}$
$\hskip5ex{\tt\unicode{123} if\ (k==n)\ return\ n;}$
$\hskip7ex{\tt else\ \unicode{123}if\ (k>n)\ return\ gcd(k\unicode{45}n,n); }$
$\hskip14ex{\tt else \ return\ gcd(k,n\unicode{45}k);}$
$\hskip14ex{\tt \unicode{125}}$
$\hskip6ex{\tt \unicode{125}}$

súbor pdf