defmodule Main do def input, do: IO.read(:line) |> String.trim def ii, do: input() |> String.to_integer def li, do: input() |> String.split |> Enum.map(&String.to_integer/1) def yn(b), do: IO.puts(if b, do: "Yes", else: "No") def main do [s, t] = input() |> String.split s = String.to_charlist(s) t = String.to_charlist(t) yn(f(s, t)) end def f(s, t) when length(s) < length(t), do: false def f(s, t) do ns = length(s) nt = length(t) Enum.zip(Enum.drop(s, ns-nt), t) |> Enum.all?(fn {a, b} -> a >= b end) end end