#include <cstdio>
#include <cstring>
#include <algorithm>
using namespace std;
const int N=1000003;
char s[N];
int n;
int las[N],nx[N];
bool ed[N];
inline void append(int x,int y){
	nx[las[x]]=y;las[x]=las[y];
}
int main(){
	scanf("%s",s+1);
	n=strlen(s+1);
	sort(s+1,s+n+1);
	int p=1;
	while(p<=n&&s[p]==s[1]) ++p;
	--p;
	for(int i=1;i<=n;++i) las[i]=i,nx[i]=0;
	s[n+1]='#';
	for(int i=1;i<=n;++i) ed[i]=(s[i]!=s[i+1]);
	for(int i=n;i>1;){
		if(i<=p){
			if(p==i) --p;
			append(p,i);
			if(p>1) ed[--p]=1;
			--i;
		}
		else{
			int x=i;
			while(x&&!ed[x-1]) --x;
			for(int t=x;t<=i;++t) append(p-(t-x)%p,t);
			p-=(i-x+1)%p;
			ed[p]=1;
			i=x-1;
		}
	}
	for(int t=1;t;t=nx[t]) putchar(s[t]);
	putchar('\n');
	return 0;
}