$l[$_]=!grep$l[-$_],@@=(@@,(//>grep$'%$_<1,2..sqrt)&&$_)for 2..1e4;print$l[<>]?Lose:Win