/*
@copyright Louis Dionne 2014
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/detail/assert.hpp>
#include <boost/hana/detail/constexpr.hpp>
#include <boost/hana/functional.hpp>
#include <boost/hana/list/instance.hpp>
using namespace boost::hana;


int main() {
    //! [main]
    BOOST_HANA_CONSTEXPR_LAMBDA auto contains = infix(elem);

    BOOST_HANA_CONSTEXPR_ASSERT(
        flip(all)(list(1, '2', 3.3) ^ contains,
            list(1, '2', 3.3)
        )
    );

    BOOST_HANA_CONSTEXPR_ASSERT(
        flip(all)(contains ^ '2',
            list(
                list(1, '2'),
                list('2'),
                list('2', 3.3)
            )
        )
    );

    BOOST_HANA_CONSTEXPR_ASSERT(list(1, '2', 3.3) ^contains^ 3.3);
    //! [main]
}