Problem:
Score : 100 points

Problem Statement

Given is a string S representing the day of the week today.

S is SUN, MON, TUE, WED, THU, FRI, or SAT, for Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, and Saturday, respectively.

After how many days is the next Sunday (tomorrow or later)?

Constraints

S is SUN, MON, TUE, WED, THU, FRI, or SAT.

Input

Input is given from Standard Input in the following format:

S

Output

Print the number of days before the next Sunday.

Sample Input 1

SAT

Sample Output 1

1

It is Saturday today, and tomorrow will be Sunday.

Sample Input 2

SUN

Sample Output 2

7

It is Sunday today, and seven days later, it will be Sunday again.

Solution in Fortran (GNU Fortran 9.2.1) (judge verdict: Accepted)

program sample
	implicit none
    character(len=3) :: a
    
    read(*,*) a
    
    if (a=='SUN') then
    	write(*,*) 7
    else if (a=='MON') then    
        write(*,*) 6
    else if (a=='TUE') then    
        write(*,*) 5  
    else if (a=='WED') then    
        write(*,*) 4      
    else if (a=='THU') then    
        write(*,*) 3
    else if (a=='FRI') then    
        write(*,*) 2
    else
    	write(*,*) 1
    end if    
    stop
end program sample