mapfile a
echo $[a[S=~++E,--W]-a&3]