test f =
  let k = f + 1
  in case k of
      10 -> 9
      _ -> 100
test f =
  let k = f + 1
  in case k of
      10 -> 9
      _ -> 100
test f =
  let k = f + 1
  in case k of
      10 -> 9
      _ -> 100