From 19fcec84d8d7d21e796c7624e521b60d28ee21ed Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel.baumann@progress-linux.org>
Date: Sun, 7 Apr 2024 20:45:59 +0200
Subject: Adding upstream version 16.2.11+ds.

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
---
 src/boost/libs/hana/example/zip_with.cpp | 51 ++++++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)
 create mode 100644 src/boost/libs/hana/example/zip_with.cpp

(limited to 'src/boost/libs/hana/example/zip_with.cpp')

diff --git a/src/boost/libs/hana/example/zip_with.cpp b/src/boost/libs/hana/example/zip_with.cpp
new file mode 100644
index 000000000..55ae01026
--- /dev/null
+++ b/src/boost/libs/hana/example/zip_with.cpp
@@ -0,0 +1,51 @@
+// Copyright Louis Dionne 2013-2017
+// Distributed under the Boost Software License, Version 1.0.
+// (See accompanying file LICENSE.md or copy at http://boost.org/LICENSE_1_0.txt)
+
+#include <boost/hana/equal.hpp>
+#include <boost/hana/ext/std/tuple.hpp>
+#include <boost/hana/mult.hpp>
+#include <boost/hana/transform.hpp>
+#include <boost/hana/tuple.hpp>
+#include <boost/hana/type.hpp>
+#include <boost/hana/unpack.hpp>
+#include <boost/hana/zip_with.hpp>
+
+#include <tuple>
+#include <type_traits>
+#include <utility>
+namespace hana = boost::hana;
+
+
+// Basic usage:
+static_assert(
+    hana::zip_with(hana::mult, hana::make_tuple(1, 2, 3, 4), hana::make_tuple(5, 6, 7, 8))
+    ==
+    hana::make_tuple(5, 12, 21, 32)
+, "");
+
+
+
+// Example of computing a tuple of all the common types of several tuples:
+template<typename... Ts>
+using common_tuple_t = typename decltype(
+    hana::unpack(
+        hana::zip_with(
+            hana::metafunction<std::common_type>,
+            hana::transform(std::declval<Ts>(), hana::decltype_)...
+        ),
+        hana::template_<std::tuple>
+    )
+)::type;
+
+
+static_assert(std::is_same<
+    common_tuple_t<
+        std::tuple<bool, int, unsigned>,
+        std::tuple<char, long, long>,
+        std::tuple<int, long long, double>
+    >,
+    std::tuple<int, long long, double>
+>::value, "");
+
+int main() { }
-- 
cgit v1.2.3