s = gets.chomp

fact = Array.new(s.length + 1, 1)
fact[0] = 1

1.upto(s.length) do |i|
  fact[i] = i * fact[i - 1]
end

alpha = Array.new(26, 0)
s.chars.each{|c| alpha[c.ord - 'A'.ord] += 1}

ans = fact[s.length]

alpha.each{|a| ans /= fact[a] }

ans -= 1

puts (ans % 573)