: a { n } n 1+ 1 do n 1+ 1 do 1 i n mod 1 > j n mod 1 > * - 0 .r loop cr loop ; key 48 - key 5 / 11 * 1+ * a