DEFINE avg == dup 0. [+] fold swap size 1 max /.