import Data.List main=interact(\s->let l=map(take 3.reverse).inits$s;g r=findIndex(==r)l;t=(>)<$>g"OOO"<*>g"XXX" in case t of Just True->"East";Just False->"West";_->"NA")