integer :: piyo(3),i
character(3) :: s
read*,s

piyo = 0
do i = 1,3
  select case( s(i:i) )
  case( 'a' )
    piyo(1) = piyo(1) + 1
  case( 'b' )
    piyo(2) = piyo(2) + 1
  case( 'c' )
    piyo(3) = piyo(3) + 1
  end select
end do

do i = 1,3
  if( piyo(i)/=1 )then
    print*,'No'
    stop
  end if
end do
print*,'Yes'
end