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