program main
    implicit none
    integer i, n, m, l, c, flag
    character s*99

    read(*,*) s
    n = len_trim(s)

    flag = 0

    do i = 1, (n-1)/2
        if(s(i:i) == s((n+1-i):(n+1-i))) then
            flag = 0
        else 
            flag = 1
        end if
    end do


    if (flag == 0) then
        m = (n-1)/2

        do i = 1, (m-1)/2
            if(s(i:i) == s((m+1-i):(m+1-i))) then
                flag = 0
            else 
                flag = 1
            end if
        end do
    end if
    
    if (flag == 0) then

        l = (n+3)/2
        c = 1

        do i = l, (n-l)/2+l-1
            if(s(i:i) == s((n+1-c):(n+1-c))) then
                flag = 0
            else 
                flag = 1
            end if
            c = c + 1
        end do
    end if


    if (flag == 0) then
        write(*,*) "Yes"
    else
        write(*,*) "No"
    end if

end program