f=->x,y,z{x>y ?$*[y*z*3-x]||=f[f[x-5,y,z],f[y-5,z,x],f[z-5,x,y]]:z} lp{p f[*gt./.m(&:toi)]}