k=$1{for(j=2;j<k;)k%j?j++:k/=j;for(;k>=1;k/=2)a=k%2<1?"_"a:"-"a}$0=a