let rec range a b = if a >= b then [] else a::(range (a+1) b) let solve n k = let rec inner m = if m < 0 then "Win" else if m = 0 then "Lose" else inner (m-k-1) in (inner (n-1)) ^ "\n" let _ = let p = int_of_string @@ read_line() in let inputs = List.map (fun _ -> let cond = String.split_on_char ' ' (read_line ()) in (int_of_string @@ List.nth cond 0, int_of_string @@ List.nth cond 1 )) @@ range 0 p in List.iter (fun (n, k) -> print_string @@ solve n k) inputs