import algorithm, sets, sequtils

let
  s = stdin.readLine
var
  cs = s.toSeq.sorted
  list: seq[seq[char]]

list.add cs

while cs.nextPermutation:
  list.add cs

echo list.toHashSet.len.pred