Skier rides on a snowy field. Its movements can be described by a string of characters 'S', 'N', 'W', 'E' (which correspond to 1 meter movement in the south, north, west or east direction respectively).

It is known that if he moves along a previously unvisited segment of a path (i.e. this segment of the path is visited the first time), then the time of such movement is 5 seconds. If he rolls along previously visited segment of a path (i.e., this segment of the path has been covered by his path before), then it takes 1 second.

Find the skier's time to roll all the path.

Input

The first line contains an integer t (1 ≤ t ≤ 10^4) — the number of test cases in the input. Then t test cases follow.

Each set is given by one nonempty string of the characters 'S', 'N', 'W', 'E'. The length of the string does not exceed 10^5 characters.

The sum of the lengths of t given lines over all test cases in the input does not exceed 10^5.

Output

For each test case, print the desired path time in seconds.

Example

Input


5
NNN
NS
WWEN
WWEE
NWNWS


Output


15
6
16
12
25
for _ in range(input()):
    s=raw_input()
    dy={}
    dx={}
    currx=0
    curry=0
    time=0
    for i in s:
        if i=="N":
            if (str(currx)+" "+str(curry)+" "+str(curry+1)) in dy or (str(currx)+" "+str(curry+1)+" "+str(curry)) in dy:
                
                time+=1
            else:
                time+=5
                dy[(str(currx)+" "+str(curry)+" "+str(curry+1))]=1
            curry+=1
        elif i=="S":
            if (str(currx)+" "+str(curry)+" "+str(curry-1)) in dy or (str(currx)+" "+str(curry-1)+" "+str(curry)) in dy:
                
                time+=1
            else:
                time+=5
                dy[(str(currx)+" "+str(curry)+" "+str(curry-1))]=1
            curry-=1
        elif i=="E":
            if (str(curry)+" "+str(currx)+" "+str(currx+1)) in dx or (str(curry)+" "+str(currx+1)+" "+str(currx)) in dx:
                 time+=1
            else:
                time +=5
                dx[(str(curry)+" "+str(currx)+" "+str(currx+1))]=1
            currx+=1
        else:
            if (str(curry)+" "+str(currx)+" "+str(currx-1)) in dx or (str(curry)+" "+str(currx-1)+" "+str(currx)) in dx:
                 time+=1
            else:
                time+=5
                dx[(str(curry)+" "+str(currx)+" "+str(currx-1))]=1
            currx-=1
    print time
                
            
                    
            
            