i:for(`seq 2 10007|factor`){
	/: \d*$/&&push@p,$`;
	/^/;
	$l{$'-$_}&&next i for@p;
	$l{$'+0}=Lose;
}
print $l{<>+0}||Win;