You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
116 lines
2.8 KiB
116 lines
2.8 KiB
![]()
11 years ago
|
/*
|
||
|
* Copyright 2008-2012 NVIDIA Corporation
|
||
|
*
|
||
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
||
|
* you may not use this file except in compliance with the License.
|
||
|
* You may obtain a copy of the License at
|
||
|
*
|
||
|
* http://www.apache.org/licenses/LICENSE-2.0
|
||
|
*
|
||
|
* Unless required by applicable law or agreed to in writing, software
|
||
|
* distributed under the License is distributed on an "AS IS" BASIS,
|
||
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
||
|
* See the License for the specific language governing permissions and
|
||
|
* limitations under the License.
|
||
|
*/
|
||
|
|
||
|
#pragma once
|
||
|
|
||
|
#include <thrust/detail/config.h>
|
||
|
#include <thrust/tuple.h>
|
||
|
#include <thrust/detail/type_traits.h>
|
||
|
|
||
|
namespace thrust
|
||
|
{
|
||
|
namespace detail
|
||
|
{
|
||
|
namespace functional
|
||
|
{
|
||
|
|
||
|
// this thing (which models Eval) is an adaptor for the unary
|
||
|
// functors inside functional.h
|
||
|
template<template<typename> class UnaryOperator>
|
||
|
struct unary_operator
|
||
|
{
|
||
|
template<typename Env>
|
||
|
struct argument
|
||
|
: thrust::detail::eval_if<
|
||
|
(thrust::tuple_size<Env>::value == 0),
|
||
|
thrust::detail::identity_<thrust::null_type>,
|
||
|
thrust::tuple_element<0,Env>
|
||
|
>
|
||
|
{
|
||
|
};
|
||
|
|
||
|
template<typename Env>
|
||
|
struct operator_type
|
||
|
{
|
||
|
typedef UnaryOperator<
|
||
|
typename thrust::detail::remove_reference<
|
||
|
typename argument<Env>::type
|
||
|
>::type
|
||
|
> type;
|
||
|
};
|
||
|
|
||
|
template<typename Env>
|
||
|
struct result
|
||
|
{
|
||
|
typedef typename operator_type<Env>::type op_type;
|
||
|
typedef typename op_type::result_type type;
|
||
|
};
|
||
|
|
||
|
template<typename Env>
|
||
|
__host__ __device__
|
||
|
typename result<Env>::type eval(const Env &e) const
|
||
|
{
|
||
|
typename operator_type<Env>::type op;
|
||
|
return op(thrust::get<0>(e));
|
||
|
} // end eval()
|
||
|
}; // end unary_operator
|
||
|
|
||
|
// this thing (which models Eval) is an adaptor for the binary
|
||
|
// functors inside functional.h
|
||
|
template<template<typename> class BinaryOperator>
|
||
|
struct binary_operator
|
||
|
{
|
||
|
template<typename Env>
|
||
|
struct first_argument
|
||
|
: thrust::detail::eval_if<
|
||
|
(thrust::tuple_size<Env>::value == 0),
|
||
|
thrust::detail::identity_<thrust::null_type>,
|
||
|
thrust::tuple_element<0,Env>
|
||
|
>
|
||
|
{
|
||
|
};
|
||
|
|
||
|
template<typename Env>
|
||
|
struct operator_type
|
||
|
{
|
||
|
typedef BinaryOperator<
|
||
|
typename thrust::detail::remove_reference<
|
||
|
typename first_argument<Env>::type
|
||
|
>::type
|
||
|
> type;
|
||
|
};
|
||
|
|
||
|
template<typename Env>
|
||
|
struct result
|
||
|
{
|
||
|
typedef typename operator_type<Env>::type op_type;
|
||
|
typedef typename op_type::result_type type;
|
||
|
};
|
||
|
|
||
|
template<typename Env>
|
||
|
__host__ __device__
|
||
|
typename result<Env>::type eval(const Env &e) const
|
||
|
{
|
||
|
typename operator_type<Env>::type op;
|
||
|
return op(thrust::get<0>(e), thrust::get<1>(e));
|
||
|
} // end eval()
|
||
|
}; // end binary_operator
|
||
|
|
||
|
} // end functional
|
||
|
} // end detail
|
||
|
} // end thrust
|
||
|
|