char s[];f(u){int i=0,j,k,a=0,t,v;for(;t=s[j=i];++i)for(;u>>i&t>48&&(v=s[k=++j]);)for(;u>>j&t!=v&&s[++k];)u>>k&v==s[k]&&(a=fmax(a,100*t+11*v-5328+f(u^1<<i^1<<j^1<<k)));return a;}x;main(){gets(s);x=!printf("%d",f(-1));}