make " rcs 2 for[x -: :][for[y -: :][type ifelse x*x+y*y>:*:["\ ]["*]]pr[]]bye