You're not spelling the identifiers properly.
Code:
alias c3 {
  set %c $calc($len($1) - $pos($1,$chr(35)))
  echo .. $len($1) %c
  echo .. $right($1,%c)
  return $right($1,%c)
}