//minamoto

 #include<iostream>

 #include<cstdio>

 #define ll long long

 using namespace std;

 const int N=;

 int a[N],v[N],n;ll c[N][N],ans;

 ll gc(int n,int m){

     if(c[n][m]) return c[n][m];

     if(m==) return n;

     if(m==||m==n) return ;

     if(m>n) return ;

     c[n][m]=gc(n-,m)+gc(n-,m-);

     return c[n][m];

 }

 ll calc(){

     ll res=;

     int m=n;

     for(int i=;i<;++i) if(a[i]) res*=gc(m,a[i]),m-=a[i];

     return res;

 }

 int main(){

     //freopen("testdata.in","r",stdin);

     char ch;

     while(cin>>ch)if(isdigit(ch))v[++n]=ch-,a[v[n]]++;

     int nn=n;

     for(int i=;i<=nn;++i){

         --n;

         for(int j=;j<v[i];++j)

         if(a[j]){--a[j],ans+=calc(),++a[j];}

         --a[v[i]];

     }

     printf("%lld\n",ans);

     return ;

 }