let is_interp = function
  | App(Pair _, _) -> true
  | _ -> false